git.oblomov.eu Git - wine/blob - dlls/winmm/lolvldrv.c

   1 /* -*- tab-width: 8; c-basic-offset: 4 -*- */
   2
   3 /*
   4  * MMSYSTEM low level drivers handling functions
   5  *
   6  * Copyright 1999 Eric Pouech
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2.1 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with this library; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  21  */
  22
  23 #include "config.h"
  24 #include "wine/port.h"
  25
  26 #include <string.h>
  27 #include <stdarg.h>
  28 #include <stdio.h>
  29 #include <assert.h>
  30 #include "windef.h"
  31 #include "winbase.h"
  32 #include "winreg.h"
  33 #include "winemm.h"
  34 #include "wine/debug.h"
  35 #include "wine/exception.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(winmm);
  38
  39 /* Default set of drivers to be loaded */
  40 #define WINE_DEFAULT_WINMM_DRIVER "alsa,oss,coreaudio,esd"
  41
  42 /* each known type of driver has an instance of this structure */
  43 typedef struct tagWINE_LLTYPE {
  44     /* those attributes depend on the specification of the type */
  45     LPCSTR              typestr;        /* name (for debugging) */
  46     /* those attributes reflect the loaded/current situation for the type */
  47     UINT                wMaxId;         /* number of loaded devices (sum across all loaded drivers) */
  48     LPWINE_MLD          lpMlds;         /* "static" mlds to access the part though device IDs */
  49     int                 nMapper;        /* index to mapper */
  50 } WINE_LLTYPE;
  51
  52 static WINE_LLTYPE llTypes[MMDRV_MAX] = {
  53     { "Aux", 0, 0, -1 },
  54     { "Mixer", 0, 0, -1 },
  55     { "MidiIn", 0, 0, -1 },
  56     { "MidiOut", 0, 0, -1 },
  57     { "WaveIn", 0, 0, -1 },
  58     { "WaveOut", 0, 0, -1 }
  59 };
  60
  61 static int drivers_loaded, MMDrvsHi;
  62 static WINE_MM_DRIVER   MMDrvs[8];
  63 static LPWINE_MLD       MM_MLDrvs[40];
  64 #define MAX_MM_MLDRVS   (sizeof(MM_MLDrvs) / sizeof(MM_MLDrvs[0]))
  65
  66 static void MMDRV_Init(void);
  67
  68 static void MMDRV_InitSingleType(UINT type) {
  69     if (!drivers_loaded) {
  70         drivers_loaded = 1;
  71         MMDRV_Init();
  72     }
  73 }
  74
  75 /**************************************************************************
  76  *                      MMDRV_GetNum                            [internal]
  77  */
  78 UINT    MMDRV_GetNum(UINT type)
  79 {
  80     TRACE("(%04x)\n", type);
  81     assert(type < MMDRV_MAX);
  82     MMDRV_InitSingleType(type);
  83     return llTypes[type].wMaxId;
  84 }
  85
  86 /**************************************************************************
  87  *                              MMDRV_Message                   [internal]
  88  */
  89 DWORD  MMDRV_Message(LPWINE_MLD mld, UINT wMsg, DWORD_PTR dwParam1,
  90                      DWORD_PTR dwParam2)
  91 {
  92     LPWINE_MM_DRIVER            lpDrv;
  93     DWORD                       ret;
  94     WINE_MM_DRIVER_PART*        part;
  95     WINE_LLTYPE*                llType = &llTypes[mld->type];
  96
  97     TRACE("(%s %d %u 0x%08lx 0x%08lx 0x%08lx)\n",
  98           llTypes[mld->type].typestr, mld->uDeviceID, wMsg,
  99           mld->dwDriverInstance, dwParam1, dwParam2);
 100
 101     if ((UINT16)mld->uDeviceID == (UINT16)-1) {
 102         if (llType->nMapper == -1) {
 103             WARN("uDev=-1 requested on non-mapped ll type %s\n",
 104                  llTypes[mld->type].typestr);
 105             return MMSYSERR_BADDEVICEID;
 106         }
 107     } else {
 108         if (mld->uDeviceID >= llType->wMaxId) {
 109             WARN("uDev(%u) requested >= max (%d)\n", mld->uDeviceID, llType->wMaxId);
 110             return MMSYSERR_BADDEVICEID;
 111         }
 112     }
 113
 114     lpDrv = &MMDrvs[mld->mmdIndex];
 115     part = &lpDrv->parts[mld->type];
 116
 117     assert(part->fnMessage32);
 118
 119     TRACE("Calling message(dev=%d msg=%u usr=0x%08lx p1=0x%08lx p2=0x%08lx)\n",
 120           mld->uDeviceID, wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
 121     ret = part->fnMessage32(mld->uDeviceID, wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
 122     TRACE("=> %s\n", WINMM_ErrorToString(ret));
 123
 124     return ret;
 125 }
 126
 127 /**************************************************************************
 128  *                              MMDRV_Alloc                     [internal]
 129  */
 130 LPWINE_MLD      MMDRV_Alloc(UINT size, UINT type, LPHANDLE hndl, DWORD* dwFlags,
 131                             DWORD_PTR* dwCallback, DWORD_PTR* dwInstance)
 132 {
 133     LPWINE_MLD  mld;
 134     UINT_PTR i;
 135     TRACE("(%d, %04x, %p, %p, %p, %p)\n",
 136           size, type, hndl, dwFlags, dwCallback, dwInstance);
 137
 138     mld = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, size);
 139     if (!mld)   return NULL;
 140
 141     /* find an empty slot in MM_MLDrvs table */
 142     for (i = 0; i < MAX_MM_MLDRVS; i++) if (!MM_MLDrvs[i]) break;
 143
 144     if (i == MAX_MM_MLDRVS) {
 145         /* the MM_MLDrvs table could be made growable in the future if needed */
 146         ERR("Too many open drivers\n");
 147         HeapFree(GetProcessHeap(), 0, mld);
 148         return NULL;
 149     }
 150     MM_MLDrvs[i] = mld;
 151     *hndl = (HANDLE)(i | 0x8000);
 152
 153     mld->type = type;
 154     if ((UINT_PTR)*hndl < MMDRV_GetNum(type) || ((UINT_PTR)*hndl >> 16)) {
 155         /* FIXME: those conditions must be fulfilled so that:
 156          * - we can distinguish between device IDs and handles
 157          * - we can use handles as 16 or 32 bit entities
 158          */
 159         ERR("Shouldn't happen. Bad allocation scheme\n");
 160     }
 161
 162     mld->dwFlags = HIWORD(*dwFlags);
 163     mld->dwCallback = *dwCallback;
 164     mld->dwClientInstance = *dwInstance;
 165
 166     return mld;
 167 }
 168
 169 /**************************************************************************
 170  *                              MMDRV_Free                      [internal]
 171  */
 172 void    MMDRV_Free(HANDLE hndl, LPWINE_MLD mld)
 173 {
 174     TRACE("(%p, %p)\n", hndl, mld);
 175
 176     if ((UINT_PTR)hndl & 0x8000) {
 177         UINT_PTR idx = (UINT_PTR)hndl & ~0x8000;
 178         if (idx < sizeof(MM_MLDrvs) / sizeof(MM_MLDrvs[0])) {
 179             MM_MLDrvs[idx] = NULL;
 180             HeapFree(GetProcessHeap(), 0, mld);
 181             return;
 182         }
 183     }
 184     ERR("Bad Handle %p at %p (not freed)\n", hndl, mld);
 185 }
 186
 187 /**************************************************************************
 188  *                              MMDRV_Open                      [internal]
 189  */
 190 DWORD MMDRV_Open(LPWINE_MLD mld, UINT wMsg, DWORD_PTR dwParam1, DWORD dwFlags)
 191 {
 192     DWORD               dwRet = MMSYSERR_BADDEVICEID;
 193     DWORD_PTR           dwInstance;
 194     WINE_LLTYPE*        llType = &llTypes[mld->type];
 195     TRACE("(%p, %04x, 0x%08lx, 0x%08x)\n", mld, wMsg, dwParam1, dwFlags);
 196
 197     mld->dwDriverInstance = (DWORD_PTR)&dwInstance;
 198
 199     if (mld->uDeviceID == (UINT)-1 || mld->uDeviceID == (UINT16)-1) {
 200         TRACE("MAPPER mode requested !\n");
 201         if (llType->nMapper == -1) {
 202             WARN("Mapper not supported for type %s\n", llTypes[mld->type].typestr);
 203             return MMSYSERR_BADDEVICEID;
 204         }
 205         mld->mmdIndex = llType->lpMlds[-1].mmdIndex;
 206         TRACE("Setting mmdIndex to %u\n", mld->mmdIndex);
 207         dwRet = MMDRV_Message(mld, wMsg, dwParam1, dwFlags);
 208     } else {
 209         if (mld->uDeviceID < llType->wMaxId) {
 210             mld->mmdIndex = llType->lpMlds[mld->uDeviceID].mmdIndex;
 211             TRACE("Setting mmdIndex to %u\n", mld->mmdIndex);
 212             dwRet = MMDRV_Message(mld, wMsg, dwParam1, dwFlags);
 213         }
 214     }
 215     if (dwRet == MMSYSERR_NOERROR)
 216         mld->dwDriverInstance = dwInstance;
 217     return dwRet;
 218 }
 219
 220 /**************************************************************************
 221  *                              MMDRV_Close                     [internal]
 222  */
 223 DWORD   MMDRV_Close(LPWINE_MLD mld, UINT wMsg)
 224 {
 225     TRACE("(%p, %04x)\n", mld, wMsg);
 226     return MMDRV_Message(mld, wMsg, 0L, 0L);
 227 }
 228
 229 /**************************************************************************
 230  *                              MMDRV_GetByID                   [internal]
 231  */
 232 static LPWINE_MLD MMDRV_GetByID(UINT uDevID, UINT type)
 233 {
 234     TRACE("(%04x, %04x)\n", uDevID, type);
 235     if (uDevID < llTypes[type].wMaxId)
 236         return &llTypes[type].lpMlds[uDevID];
 237     if ((uDevID == (UINT16)-1 || uDevID == (UINT)-1) && llTypes[type].nMapper != -1)
 238         return &llTypes[type].lpMlds[-1];
 239     return NULL;
 240 }
 241
 242 /**************************************************************************
 243  *                              MMDRV_Get                       [internal]
 244  */
 245 LPWINE_MLD      MMDRV_Get(HANDLE _hndl, UINT type, BOOL bCanBeID)
 246 {
 247     LPWINE_MLD  mld = NULL;
 248     UINT_PTR    hndl = (UINT_PTR)_hndl;
 249     TRACE("(%p, %04x, %c)\n", _hndl, type, bCanBeID ? 'Y' : 'N');
 250
 251     assert(type < MMDRV_MAX);
 252     MMDRV_InitSingleType(type);
 253
 254     if (hndl >= llTypes[type].wMaxId &&
 255         hndl != (UINT16)-1 && hndl != (UINT)-1) {
 256         if (hndl & 0x8000) {
 257             UINT idx = hndl & ~0x8000;
 258             if (idx < sizeof(MM_MLDrvs) / sizeof(MM_MLDrvs[0])) {
 259                 __TRY
 260                 {
 261                     mld = MM_MLDrvs[idx];
 262                     if (mld && mld->type != type) mld = NULL;
 263                 }
 264                 __EXCEPT_PAGE_FAULT
 265                 {
 266                     mld = NULL;
 267                 }
 268                 __ENDTRY;
 269             }
 270         }
 271     }
 272     if (mld == NULL && bCanBeID) {
 273         mld = MMDRV_GetByID(hndl, type);
 274     }
 275     return mld;
 276 }
 277
 278 /**************************************************************************
 279  *                              MMDRV_GetRelated                [internal]
 280  */
 281 LPWINE_MLD      MMDRV_GetRelated(HANDLE hndl, UINT srcType,
 282                                  BOOL bSrcCanBeID, UINT dstType)
 283 {
 284     LPWINE_MLD          mld;
 285     TRACE("(%p, %04x, %c, %04x)\n",
 286           hndl, srcType, bSrcCanBeID ? 'Y' : 'N', dstType);
 287
 288     if ((mld = MMDRV_Get(hndl, srcType, bSrcCanBeID)) != NULL) {
 289         WINE_MM_DRIVER_PART*    part = &MMDrvs[mld->mmdIndex].parts[dstType];
 290         if (part->nIDMin < part->nIDMax)
 291             return MMDRV_GetByID(part->nIDMin, dstType);
 292     }
 293     return NULL;
 294 }
 295
 296 /**************************************************************************
 297  *                              MMDRV_PhysicalFeatures          [internal]
 298  */
 299 UINT    MMDRV_PhysicalFeatures(LPWINE_MLD mld, UINT uMsg,
 300                                DWORD_PTR dwParam1, DWORD_PTR dwParam2)
 301 {
 302     WINE_MM_DRIVER*     lpDrv = &MMDrvs[mld->mmdIndex];
 303
 304     TRACE("(%p, %04x, %08lx, %08lx)\n", mld, uMsg, dwParam1, dwParam2);
 305
 306     /* all those function calls are undocumented */
 307     switch (uMsg) {
 308     case DRV_QUERYDRVENTRY:
 309         lstrcpynA((LPSTR)dwParam1, lpDrv->drvname, LOWORD(dwParam2));
 310         break;
 311     case DRV_QUERYDEVNODE:
 312         *(LPDWORD)dwParam1 = 0L; /* should be DevNode */
 313         break;
 314     case DRV_QUERYNAME:
 315         WARN("NIY QueryName\n");
 316         break;
 317     case DRV_QUERYDRIVERIDS:
 318         WARN("NIY call VxD\n");
 319         /* should call VxD MMDEVLDR with (DevNode, dwParam1 and dwParam2) as pmts
 320          * dwParam1 is buffer and dwParam2 is sizeof(buffer)
 321          * I don't know where the result is stored though
 322          */
 323         break;
 324     case DRV_QUERYMAPPABLE:
 325         return (lpDrv->bIsMapper) ? 2 : 0;
 326
 327     case DRVM_MAPPER_PREFERRED_GET:
 328         /* FIXME: get from registry someday */
 329         *((LPDWORD)dwParam1) = -1;      /* No preferred device */
 330         *((LPDWORD)dwParam2) = 0;
 331         break;
 332
 333     case DRV_QUERYDEVICEINTERFACE:
 334     case DRV_QUERYDEVICEINTERFACESIZE:
 335         return MMDRV_Message(mld, uMsg, dwParam1, dwParam2);
 336
 337     case DRV_QUERYDSOUNDIFACE: /* Wine-specific: Retrieve DirectSound interface */
 338     case DRV_QUERYDSOUNDDESC: /* Wine-specific: Retrieve DirectSound driver description*/
 339         return MMDRV_Message(mld, uMsg, dwParam1, dwParam2);
 340
 341     default:
 342         WARN("Unknown call %04x\n", uMsg);
 343         return MMSYSERR_INVALPARAM;
 344     }
 345     return 0L;
 346 }
 347
 348 /**************************************************************************
 349  *                              MMDRV_InitPerType               [internal]
 350  */
 351 static  BOOL    MMDRV_InitPerType(LPWINE_MM_DRIVER lpDrv, UINT type, UINT wMsg)
 352 {
 353     WINE_MM_DRIVER_PART*        part = &lpDrv->parts[type];
 354     DWORD                       ret;
 355     UINT                        count = 0;
 356     int                         i, k;
 357     TRACE("(%p, %04x, %04x)\n", lpDrv, type, wMsg);
 358
 359     part->nIDMin = part->nIDMax = 0;
 360
 361     /* for DRVM_INIT and DRVM_ENABLE, dwParam2 should be PnP node */
 362     /* the DRVM_ENABLE is only required when the PnP node is non zero */
 363     if (part->fnMessage32) {
 364         ret = part->fnMessage32(0, DRVM_INIT, 0L, 0L, 0L);
 365         TRACE("DRVM_INIT => %s\n", WINMM_ErrorToString(ret));
 366 #if 0
 367         ret = part->fnMessage32(0, DRVM_ENABLE, 0L, 0L, 0L);
 368         TRACE("DRVM_ENABLE => %08lx\n", ret);
 369 #endif
 370         count = part->fnMessage32(0, wMsg, 0L, 0L, 0L);
 371     }
 372     else return FALSE;
 373
 374     TRACE("Got %u dev for (%s:%s)\n", count, lpDrv->drvname, llTypes[type].typestr);
 375
 376     if (HIWORD(count))
 377         return FALSE;
 378
 379     /* got some drivers */
 380     if (lpDrv->bIsMapper) {
 381         llTypes[type].nMapper = MMDrvsHi;
 382     } else {
 383         if (count == 0)
 384             return FALSE;
 385         part->nIDMin = llTypes[type].wMaxId;
 386         llTypes[type].wMaxId += count;
 387         part->nIDMax = llTypes[type].wMaxId;
 388     }
 389     TRACE("Setting min=%d max=%d (ttop=%d) for (%s:%s)\n",
 390           part->nIDMin, part->nIDMax, llTypes[type].wMaxId,
 391           lpDrv->drvname, llTypes[type].typestr);
 392     /* realloc translation table */
 393     if (llTypes[type].lpMlds)
 394         llTypes[type].lpMlds = (LPWINE_MLD)
 395         HeapReAlloc(GetProcessHeap(), 0, llTypes[type].lpMlds - 1,
 396                     sizeof(WINE_MLD) * (llTypes[type].wMaxId + 1)) + 1;
 397     else
 398         llTypes[type].lpMlds = (LPWINE_MLD)
 399         HeapAlloc(GetProcessHeap(), 0,
 400                     sizeof(WINE_MLD) * (llTypes[type].wMaxId + 1)) + 1;
 401
 402     /* re-build the translation table */
 403     if (lpDrv->bIsMapper) {
 404         TRACE("%s:Trans[%d] -> %s\n", llTypes[type].typestr, -1, MMDrvs[llTypes[type].nMapper].drvname);
 405         llTypes[type].lpMlds[-1].uDeviceID = (UINT)-1;
 406         llTypes[type].lpMlds[-1].type = type;
 407         llTypes[type].lpMlds[-1].mmdIndex = llTypes[type].nMapper;
 408         llTypes[type].lpMlds[-1].dwDriverInstance = 0;
 409     }
 410     for (i = k = 0; i <= MMDrvsHi; i++) {
 411         while (MMDrvs[i].parts[type].nIDMin <= k && k < MMDrvs[i].parts[type].nIDMax) {
 412             TRACE("%s:Trans[%d] -> %s\n", llTypes[type].typestr, k, MMDrvs[i].drvname);
 413             llTypes[type].lpMlds[k].uDeviceID = k;
 414             llTypes[type].lpMlds[k].type = type;
 415             llTypes[type].lpMlds[k].mmdIndex = i;
 416             llTypes[type].lpMlds[k].dwDriverInstance = 0;
 417             k++;
 418         }
 419     }
 420     return TRUE;
 421 }
 422
 423 /**************************************************************************
 424  *                              MMDRV_Install                   [internal]
 425  */
 426 static  BOOL    MMDRV_Install(LPCSTR drvRegName, LPCSTR drvFileName, BOOL bIsMapper)
 427 {
 428     int                 i, count = 0;
 429     LPWINE_MM_DRIVER    lpDrv = &MMDrvs[MMDrvsHi];
 430     LPWINE_DRIVER       d;
 431     WINEMM_msgFunc32    func;
 432
 433     TRACE("('%s', '%s', mapper=%c);\n", drvRegName, drvFileName, bIsMapper ? 'Y' : 'N');
 434
 435     for (i = 0; i < MMDrvsHi; i++) {
 436         if (!strcmp(drvRegName, MMDrvs[i].drvname)) return FALSE;
 437     }
 438
 439     /* Be sure that size of MMDrvs matches the max number of loadable
 440      * drivers !!
 441      * If not just increase size of MMDrvs
 442      */
 443     assert(MMDrvsHi <= sizeof(MMDrvs)/sizeof(MMDrvs[0]));
 444
 445     memset(lpDrv, 0, sizeof(*lpDrv));
 446
 447     if (!(lpDrv->hDriver = OpenDriverA(drvFileName, 0, 0))) {
 448         WARN("Couldn't open driver '%s'\n", drvFileName);
 449         return FALSE;
 450     }
 451
 452     d = DRIVER_FindFromHDrvr(lpDrv->hDriver);
 453
 454     /* Then look for xxxMessage functions */
 455 #define AA(_h,_w,_x,_y,_z)                                      \
 456     func = (WINEMM_msgFunc##_y) _z ((_h), #_x);                 \
 457     if (func != NULL)                                           \
 458         { lpDrv->parts[_w].fnMessage##_y = func; count++;       \
 459           TRACE("Got %d bit func '%s'\n", _y, #_x);         }
 460
 461     if (d->hModule) {
 462 #define A(_x,_y)        AA(d->hModule,_x,_y,32,GetProcAddress)
 463             A(MMDRV_AUX,        auxMessage);
 464             A(MMDRV_MIXER,      mxdMessage);
 465             A(MMDRV_MIDIIN,     midMessage);
 466             A(MMDRV_MIDIOUT,    modMessage);
 467             A(MMDRV_WAVEIN,     widMessage);
 468             A(MMDRV_WAVEOUT,    wodMessage);
 469 #undef A
 470     }
 471 #undef AA
 472
 473     if (!count) {
 474         CloseDriver(lpDrv->hDriver, 0, 0);
 475         WARN("No message functions found\n");
 476         return FALSE;
 477     }
 478
 479     /* FIXME: being a mapper or not should be known by another way */
 480     /* it's known for NE drvs (the description is of the form '*mapper: *'
 481      * I don't have any clue for PE drvs
 482      */
 483     lpDrv->bIsMapper = bIsMapper;
 484     lpDrv->drvname = strcpy(HeapAlloc(GetProcessHeap(), 0, strlen(drvRegName) + 1), drvRegName);
 485
 486     /* Finish init and get the count of the devices */
 487     i = 0;
 488     if (MMDRV_InitPerType(lpDrv, MMDRV_AUX,     AUXDM_GETNUMDEVS))      i = 1;
 489     if (MMDRV_InitPerType(lpDrv, MMDRV_MIXER,   MXDM_GETNUMDEVS))       i = 1;
 490     if (MMDRV_InitPerType(lpDrv, MMDRV_MIDIIN,  MIDM_GETNUMDEVS))       i = 1;
 491     if (MMDRV_InitPerType(lpDrv, MMDRV_MIDIOUT, MODM_GETNUMDEVS))       i = 1;
 492     if (MMDRV_InitPerType(lpDrv, MMDRV_WAVEIN,  WIDM_GETNUMDEVS))       i = 1;
 493     if (MMDRV_InitPerType(lpDrv, MMDRV_WAVEOUT, WODM_GETNUMDEVS))       i = 1;
 494     /* if all those func calls return FALSE, then the driver must be unloaded */
 495     if (!i) {
 496         CloseDriver(lpDrv->hDriver, 0, 0);
 497         HeapFree(GetProcessHeap(), 0, lpDrv->drvname);
 498         WARN("Driver initialization failed\n");
 499         return FALSE;
 500     }
 501
 502     MMDrvsHi++;
 503
 504     return TRUE;
 505 }
 506
 507 /**************************************************************************
 508  *                              MMDRV_Init
 509  */
 510 static void MMDRV_Init(void)
 511 {
 512     HKEY        hKey;
 513     char        driver_buffer[256];
 514     char *p, *next;
 515     TRACE("()\n");
 516
 517     strcpy(driver_buffer, WINE_DEFAULT_WINMM_DRIVER);
 518
 519     /* @@ Wine registry key: HKCU\Software\Wine\Drivers */
 520     if (!RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Drivers", &hKey))
 521     {
 522         DWORD size = sizeof(driver_buffer);
 523         if (RegQueryValueExA(hKey, "Audio", 0, NULL, (BYTE*)driver_buffer, &size))
 524             strcpy(driver_buffer, WINE_DEFAULT_WINMM_DRIVER);
 525     }
 526
 527     for (p = driver_buffer; p; p = next)
 528     {
 529         char filename[sizeof(driver_buffer)+10];
 530         next = strchr(p, ',');
 531         if (next) *next++ = 0;
 532         sprintf( filename, "wine%s.drv", p );
 533         if (MMDRV_Install(filename, filename, FALSE))
 534             break;
 535         p = next;
 536     }
 537
 538     MMDRV_Install("wavemapper", "msacm32.drv", TRUE);
 539     MMDRV_Install("midimapper", "midimap.dll", TRUE);
 540 }
 541
 542 /******************************************************************
 543  *              ExitPerType
 544  *
 545  *
 546  */
 547 static  BOOL    MMDRV_ExitPerType(LPWINE_MM_DRIVER lpDrv, UINT type)
 548 {
 549     WINE_MM_DRIVER_PART*        part = &lpDrv->parts[type];
 550     DWORD                       ret;
 551     TRACE("(%p, %04x)\n", lpDrv, type);
 552
 553     if (part->fnMessage32) {
 554 #if 0
 555         ret = part->fnMessage32(0, DRVM_DISABLE, 0L, 0L, 0L);
 556         TRACE("DRVM_DISABLE => %08lx\n", ret);
 557 #endif
 558         ret = part->fnMessage32(0, DRVM_EXIT, 0L, 0L, 0L);
 559         TRACE("DRVM_EXIT => %s\n", WINMM_ErrorToString(ret));
 560     }
 561
 562     return TRUE;
 563 }
 564
 565 /******************************************************************
 566  *              Exit
 567  *
 568  *
 569  */
 570 void MMDRV_Exit(void)
 571 {
 572     unsigned int i;
 573     TRACE("()\n");
 574
 575     for (i = 0; i < sizeof(MM_MLDrvs) / sizeof(MM_MLDrvs[0]); i++)
 576     {
 577         if (MM_MLDrvs[i] != NULL)
 578         {
 579             FIXME("Closing while ll-driver open\n");
 580 #if 0
 581             /* FIXME: should generate a message depending on type */
 582             MMDRV_Free((HANDLE)(i | 0x8000), MM_MLDrvs[i]);
 583 #endif
 584         }
 585     }
 586
 587     /* unload driver, in reverse order of loading */
 588     i = sizeof(MMDrvs) / sizeof(MMDrvs[0]);
 589     while (i-- > 0)
 590     {
 591         MMDRV_ExitPerType(&MMDrvs[i], MMDRV_AUX);
 592         MMDRV_ExitPerType(&MMDrvs[i], MMDRV_MIXER);
 593         MMDRV_ExitPerType(&MMDrvs[i], MMDRV_MIDIIN);
 594         MMDRV_ExitPerType(&MMDrvs[i], MMDRV_MIDIOUT);
 595         MMDRV_ExitPerType(&MMDrvs[i], MMDRV_WAVEIN);
 596         MMDRV_ExitPerType(&MMDrvs[i], MMDRV_WAVEOUT);
 597         CloseDriver(MMDrvs[i].hDriver, 0, 0);
 598     }
 599     if (llTypes[MMDRV_AUX].lpMlds)
 600         HeapFree(GetProcessHeap(), 0, llTypes[MMDRV_AUX].lpMlds - 1);
 601     if (llTypes[MMDRV_MIXER].lpMlds)
 602         HeapFree(GetProcessHeap(), 0, llTypes[MMDRV_MIXER].lpMlds - 1);
 603     if (llTypes[MMDRV_MIDIIN].lpMlds)
 604         HeapFree(GetProcessHeap(), 0, llTypes[MMDRV_MIDIIN].lpMlds - 1);
 605     if (llTypes[MMDRV_MIDIOUT].lpMlds)
 606         HeapFree(GetProcessHeap(), 0, llTypes[MMDRV_MIDIOUT].lpMlds - 1);
 607     if (llTypes[MMDRV_WAVEIN].lpMlds)
 608         HeapFree(GetProcessHeap(), 0, llTypes[MMDRV_WAVEIN].lpMlds - 1);
 609     if (llTypes[MMDRV_WAVEOUT].lpMlds)
 610         HeapFree(GetProcessHeap(), 0, llTypes[MMDRV_WAVEOUT].lpMlds - 1);
 611 }