git.mutantstargoat.com Git - dosrtxon/blob - libs/mikmod/drivers/drv_wss.c

   1 /*      MikMod sound library
   2         (c) 1998, 1999 Miodrag Vallat and others - see file AUTHORS for
   3         complete list.
   4
   5         This library is free software; you can redistribute it and/or modify
   6         it under the terms of the GNU Library General Public License as
   7         published by the Free Software Foundation; either version 2 of
   8         the License, or (at your option) any later version.
   9
  10         This program is distributed in the hope that it will be useful,
  11         but WITHOUT ANY WARRANTY; without even the implied warranty of
  12         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13         GNU Library General Public License for more details.
  14
  15         You should have received a copy of the GNU Library General Public
  16         License along with this library; if not, write to the Free Software
  17         Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
  18         02111-1307, USA.
  19 */
  20
  21 /*==============================================================================
  22
  23   $Id$
  24
  25   Driver for Windows Sound System under DOS
  26
  27 ==============================================================================*/
  28
  29 /*
  30
  31         Written by Andrew Zabolotny <bit@eltech.ru>
  32
  33 */
  34
  35 #ifdef HAVE_CONFIG_H
  36 #include "config.h"
  37 #endif
  38
  39 #ifdef DRV_WSS
  40
  41 #ifdef HAVE_UNISTD_H
  42 #include <unistd.h>
  43 #endif
  44 #ifdef HAVE_FCNTL_H
  45 #include <fcntl.h>
  46 #endif
  47
  48 #include "mikmod_internals.h"
  49
  50 #include "doswss.h"
  51
  52 static void WSS_CommandLine(const CHAR *cmdline)
  53 {
  54         char *ptr, *end;
  55
  56         if ((ptr=MD_GetAtom("port",cmdline,0)) != NULL) {
  57                 wss.port = strtol(ptr, &end, 16);
  58                 MikMod_free(ptr);
  59         }
  60         if ((ptr=MD_GetAtom("irq",cmdline,0)) != NULL) {
  61                 wss.irq = strtol(ptr, &end, 10);
  62                 MikMod_free(ptr);
  63         }
  64         if ((ptr=MD_GetAtom("dma",cmdline,0)) != NULL) {
  65                 wss.dma = strtol(ptr, &end, 10);
  66                 MikMod_free(ptr);
  67         }
  68 }
  69
  70 static BOOL WSS_IsThere(void)
  71 {
  72         return wss_detect();
  73 }
  74
  75 static int WSS_Init(void)
  76 {
  77         if (!wss_open()) {
  78                 _mm_errno = MMERR_INVALID_DEVICE;
  79                 return 1;
  80         }
  81
  82         /* Adjust mixing frequency according to card capabilities */
  83         md_mixfreq = wss_adjust_freq(md_mixfreq);
  84
  85         return VC_Init();
  86 }
  87
  88 static void WSS_Exit(void)
  89 {
  90         VC_Exit();
  91         wss_close();
  92 }
  93
  94 /* The last buffer byte filled with sound */
  95 static unsigned int buff_tail = 0;
  96
  97 static void WSS_Callback(void)
  98 {
  99         unsigned int dma_size, dma_pos;
 100         ULONG (*mixer)(SBYTE *buf, ULONG todo);
 101
 102         wss_query_dma(&dma_size, &dma_pos);
 103         /* There isn't much sense in filling less than 256 bytes */
 104         dma_pos &= ~255;
 105
 106         /* If nothing to mix, quit */
 107         if (buff_tail == dma_pos)
 108                 return;
 109
 110         if (Player_Paused_internal())
 111                 mixer = VC_SilenceBytes;
 112         else
 113                 mixer = VC_WriteBytes;
 114
 115         /* If DMA pointer still didn't wrapped around ... */
 116         if (dma_pos > buff_tail) {
 117                 buff_tail += mixer ((SBYTE *)(wss.dma_buff->linear + buff_tail), dma_pos - buff_tail);
 118                 /* If we arrived right to the DMA buffer end, jump to the beginning */
 119                 if (buff_tail >= dma_size)
 120                         buff_tail = 0;
 121         } else {
 122                 /* If wrapped around, fill first to the end of buffer */
 123                 mixer ((SBYTE *)(wss.dma_buff->linear + buff_tail), dma_size - buff_tail);
 124                 /* Now fill from buffer beginning to current DMA pointer */
 125                 buff_tail = mixer ((SBYTE *)wss.dma_buff->linear, dma_pos);
 126         }
 127 }
 128
 129 static void WSS_Update(void)
 130 {
 131         /* Do nothing: the real update is done during SB interrupts */
 132 }
 133
 134 static int WSS_PlayStart(void)
 135 {
 136         if (VC_PlayStart())
 137                 return 1;
 138
 139         /* Set our routine to be called during WSS IRQs */
 140         buff_tail = 0;
 141         wss.timer_callback = WSS_Callback;
 142
 143         /* Start cyclic DMA transfer */
 144         if (!wss_start_dma(((md_mode & DMODE_16BITS) ? WSSMODE_16BITS | WSSMODE_SIGNED : 0) |
 145                 ((md_mode & DMODE_STEREO) ? WSSMODE_STEREO : 0), md_mixfreq))
 146         {
 147                 _mm_errno = MMERR_DOSWSS_STARTDMA;
 148                 return 1;
 149         }
 150
 151         /* Enable speaker output */
 152         wss_output(TRUE);
 153
 154         return 0;
 155 }
 156
 157 static int WSS_Reset(void)
 158 {
 159         wss_reset();
 160         VC_Exit();
 161         return VC_Init();
 162 }
 163
 164 static void WSS_PlayStop(void)
 165 {
 166         wss.timer_callback = NULL;
 167         wss_output(FALSE);
 168         wss_stop_dma();
 169         VC_PlayStop();
 170 }
 171
 172 MDRIVER drv_wss =
 173 {
 174         NULL,
 175         "Windows Sound System",
 176         "Windows Sound System (CS423*,ESS*) v1.0",
 177         0, 255,
 178         "wss",
 179         "port:c:32C,530,604,E80,F40,530:Windows Sound System base I/O port\n"
 180         "irq:c:2,3,5,7,10,5:Windows Sound System IRQ\n"
 181         "dma:c:0,1,3,0:Windows Sound System DMA channel\n",
 182
 183         WSS_CommandLine,
 184         WSS_IsThere,
 185         VC_SampleLoad,
 186         VC_SampleUnload,
 187         VC_SampleSpace,
 188         VC_SampleLength,
 189         WSS_Init,
 190         WSS_Exit,
 191         WSS_Reset,
 192         VC_SetNumVoices,
 193         WSS_PlayStart,
 194         WSS_PlayStop,
 195         WSS_Update,
 196         NULL,
 197         VC_VoiceSetVolume,
 198         VC_VoiceGetVolume,
 199         VC_VoiceSetFrequency,
 200         VC_VoiceGetFrequency,
 201         VC_VoiceSetPanning,
 202         VC_VoiceGetPanning,
 203         VC_VoicePlay,
 204         VC_VoiceStop,
 205         VC_VoiceStopped,
 206         VC_VoiceGetPosition,
 207         VC_VoiceRealVolume
 208 };
 209
 210 #else /* ifdef DRV_WSS */
 211
 212 #include "mikmod_internals.h"
 213 MISSING(drv_wss);
 214
 215 #endif
 216
 217 /* ex:set ts=4: */