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

   1 /* -*- tab-width: 8; c-basic-offset: 4 -*- */
   2
   3 /*
   4  * MMSYTEM low level drivers handling functions
   5  *
   6  * Copyright 1999 Eric Pouech
   7  */
   8
   9 #include <string.h>
  10 #include <assert.h>
  11 #include "wine/winbase16.h"
  12 #include "heap.h"
  13 #include "winver.h"
  14 #include "winemm.h"
  15 #include "debugtools.h"
  16
  17 DEFAULT_DEBUG_CHANNEL(mmsys);
  18
  19 typedef DWORD   CALLBACK (*WINEMM_msgFunc16)(UINT16, WORD, DWORD, DWORD, DWORD);
  20 typedef DWORD   CALLBACK (*WINEMM_msgFunc32)(UINT  , UINT, DWORD, DWORD, DWORD);
  21
  22 /* for each loaded driver and each known type of driver, this structure contains
  23  * the information needed to access it
  24  */
  25 typedef struct tagWINE_MM_DRIVER_PART {
  26     int                         nIDMin;         /* lower bound of global indexes for this type */
  27     int                         nIDMax;         /* hhigher bound of global indexes for this type */
  28     union {
  29         WINEMM_msgFunc32        fnMessage32;    /* pointer to fonction */
  30         WINEMM_msgFunc16        fnMessage16;
  31     } u;
  32 } WINE_MM_DRIVER_PART;
  33
  34 /* each low-level .drv will be associated with an instance of this structure */
  35 typedef struct tagWINE_MM_DRIVER {
  36     HDRVR                       hDriver;
  37     LPSTR                       name;           /* name of the driver */
  38     BOOL                        bIs32 : 1,      /* TRUE if 32 bit driver, FALSE for 16 */
  39                                 bIsMapper : 1;  /* TRUE if mapper */
  40     WINE_MM_DRIVER_PART         parts[MMDRV_MAX];/* Information for all known types */
  41 } WINE_MM_DRIVER, *LPWINE_MM_DRIVER;
  42
  43 typedef enum {
  44     MMDRV_MAP_NOMEM,    /* ko, memory problem */
  45     MMDRV_MAP_MSGERROR, /* ko, unknown message */
  46     MMDRV_MAP_OK,       /* ok, no memory allocated. to be sent to the proc. */
  47     MMDRV_MAP_OKMEM,    /* ok, some memory allocated, need to call UnMapMsg. to be sent to the proc. */
  48     MMDRV_MAP_PASS      /* not handled (no memory allocated) to be sent to the driver */
  49 } MMDRV_MapType;
  50
  51 typedef MMDRV_MapType   (*MMDRV_MAPFUNC)(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2);
  52
  53 /* each known type of driver has an instance of this structure */
  54 typedef struct tagWINE_LLTYPE {
  55     /* those attributes depend on the specification of the type */
  56     LPSTR               name;           /* name (for debugging) */
  57     BOOL                bSupportMapper; /* if type is allowed to support mapper */
  58     MMDRV_MAPFUNC       Map16To32A;     /* those are function pointers to handle */
  59     MMDRV_MAPFUNC       UnMap16To32A;   /*   the parameter conversion (16 vs 32 bit) */
  60     MMDRV_MAPFUNC       Map32ATo16;     /*   when hi-func (in mmsystem or winmm) and */
  61     MMDRV_MAPFUNC       UnMap32ATo16;   /*   low-func (in .drv) do not match */
  62     LPDRVCALLBACK       Callback;       /* handles callback for a specified type */
  63     /* those attributes reflect the loaded/current situation for the type */
  64     UINT                wMaxId;         /* number of loaded devices (sum across all loaded drivers */
  65     LPWINE_MLD          lpMlds;         /* "static" mlds to access the part though device IDs */
  66     int                 nMapper;        /* index to mapper */
  67 } WINE_LLTYPE;
  68
  69 static WINE_MM_DRIVER   MMDrvs[3];
  70 static LPWINE_MLD       MM_MLDrvs[40];
  71 #define MAX_MM_MLDRVS   (sizeof(MM_MLDrvs) / sizeof(MM_MLDrvs[0]))
  72
  73 /* ### start build ### */
  74 extern WORD CALLBACK MMDRV_CallTo16_word_wwlll(FARPROC16,WORD,WORD,LONG,LONG,LONG);
  75 /* ### stop build ### */
  76
  77 /**************************************************************************
  78  *                              MMDRV_GetDescription16          [internal]
  79  */
  80 static  BOOL    MMDRV_GetDescription16(const char* fname, char* buf, int buflen)
  81 {
  82     OFSTRUCT    ofs;
  83     HFILE       hFile;
  84     WORD        w;
  85     DWORD       dw;
  86     BOOL        ret = FALSE;
  87
  88     if ((hFile = OpenFile(fname, &ofs, OF_READ | OF_SHARE_DENY_WRITE)) == HFILE_ERROR) {
  89         ERR("Can't open file %s (builtin driver ?)\n", fname);
  90         return FALSE;
  91     }
  92
  93 #define E(_x)   do {TRACE _x;goto theEnd;} while(0)
  94
  95     if (_lread(hFile, &w, 2) != 2)                      E(("Can't read sig\n"));
  96     if (w != ('Z' * 256 + 'M'))                         E(("Bad sig %04x\n", w));
  97     if (_llseek(hFile, 0x3C, SEEK_SET) < 0)             E(("Can't seek to ext header offset\n"));
  98     if (_lread(hFile, &dw, 4) != 4)                     E(("Can't read ext header offset\n"));
  99     if (_llseek(hFile, dw + 0x2C, SEEK_SET) < 0)        E(("Can't seek to ext header.nr table %lu\n", dw+0x2C));
 100     if (_lread(hFile, &dw, 4) != 4)                     E(("Can't read nr table offset\n"));
 101     if (_llseek(hFile, dw, SEEK_SET) < 0)               E(("Can't seek to nr table %lu\n", dw));
 102     if (_lread(hFile, buf, 1) != 1)                     E(("Can't read descr length\n"));
 103     buflen = min((BYTE)buf[0], buflen - 1);
 104     if (_lread(hFile, buf, buflen) != buflen)           E(("Can't read descr (%d)\n", buflen));
 105     buf[buflen] = '\0';
 106     ret = TRUE;
 107     TRACE("Got '%s' [%d]\n", buf, buflen);
 108 theEnd:
 109     CloseHandle(hFile);
 110     return ret;
 111 }
 112
 113 /**************************************************************************
 114  *                              MMDRV_GetDescription32          [internal]
 115  */
 116 static  BOOL    MMDRV_GetDescription32(const char* fname, char* buf, int buflen)
 117 {
 118     OFSTRUCT    ofs;
 119     DWORD       h;
 120     LPVOID      ptr = 0;
 121     LPVOID      val;
 122     DWORD       dw;
 123     BOOL        ret = FALSE;
 124     UINT        u;
 125     FARPROC pGetFileVersionInfoSizeA;
 126     FARPROC pGetFileVersionInfoA;
 127     FARPROC pVerQueryValueA;
 128     HMODULE hmodule = 0;
 129
 130 #define E(_x)   do {TRACE _x;goto theEnd;} while(0)
 131
 132     if (OpenFile(fname, &ofs, OF_EXIST)==HFILE_ERROR)           E(("Can't find file %s\n", fname));
 133
 134     if (!(hmodule = LoadLibraryA( "version.dll" ))) goto theEnd;
 135     if (!(pGetFileVersionInfoSizeA = GetProcAddress( hmodule, "GetFileVersionInfoSizeA" )))
 136         goto theEnd;
 137     if (!(pGetFileVersionInfoA = GetProcAddress( hmodule, "GetFileVersionInfoA" )))
 138         goto theEnd;
 139     if (!(pVerQueryValueA = GetProcAddress( hmodule, "pVerQueryValueA" )))
 140         goto theEnd;
 141
 142     if (!(dw = pGetFileVersionInfoSizeA(ofs.szPathName, &h)))   E(("Can't get FVIS\n"));
 143     if (!(ptr = HeapAlloc(GetProcessHeap(), 0, dw)))            E(("OOM\n"));
 144     if (!pGetFileVersionInfoA(ofs.szPathName, h, dw, ptr))      E(("Can't get FVI\n"));
 145
 146 #define A(_x) if (pVerQueryValueA(ptr, "\\StringFileInfo\\040904B0\\" #_x, &val, &u)) \
 147                   TRACE(#_x " => %s\n", (LPSTR)val); else TRACE(#_x " @\n")
 148
 149     A(CompanyName);
 150     A(FileDescription);
 151     A(FileVersion);
 152     A(InternalName);
 153     A(LegalCopyright);
 154     A(OriginalFilename);
 155     A(ProductName);
 156     A(ProductVersion);
 157     A(Comments);
 158     A(LegalTrademarks);
 159     A(PrivateBuild);
 160     A(SpecialBuild);
 161 #undef A
 162
 163     if (!pVerQueryValueA(ptr, "\\StringFileInfo\\040904B0\\ProductName", &val, &u)) E(("Can't get product name\n"));
 164     lstrcpynA(buf, val, buflen);
 165
 166 #undef E
 167     ret = TRUE;
 168 theEnd:
 169     HeapFree(GetProcessHeap(), 0, ptr);
 170     if (hmodule) FreeLibrary( hmodule );
 171     return ret;
 172 }
 173
 174 /**************************************************************************
 175  *                              MMDRV_Callback                  [internal]
 176  */
 177 static void     MMDRV_Callback(LPWINE_MLD mld, HDRVR hDev, UINT uMsg, DWORD dwParam1, DWORD dwParam2)
 178 {
 179     TRACE("CB (*%08lx)(%08x %08x %08lx %08lx %08lx\n",
 180           mld->dwCallback, hDev, uMsg, mld->dwClientInstance, dwParam1, dwParam2);
 181
 182     if (!mld->bFrom32 && (mld->dwFlags & DCB_TYPEMASK) == DCB_FUNCTION) {
 183         /* 16 bit func, call it */
 184         TRACE("Function (16 bit) !\n");
 185         MMDRV_CallTo16_word_wwlll((FARPROC16)mld->dwCallback, hDev, uMsg,
 186                                   mld->dwClientInstance, dwParam1, dwParam2);
 187     } else {
 188         DriverCallback(mld->dwCallback, mld->dwFlags, hDev, uMsg,
 189                        mld->dwClientInstance, dwParam1, dwParam2);
 190     }
 191 }
 192
 193 /* =================================
 194  *       A U X    M A P P E R S
 195  * ================================= */
 196
 197 /**************************************************************************
 198  *                              MMDRV_Aux_Map16To32A            [internal]
 199  */
 200 static  MMDRV_MapType   MMDRV_Aux_Map16To32A  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 201 {
 202     return MMDRV_MAP_MSGERROR;
 203 }
 204
 205 /**************************************************************************
 206  *                              MMDRV_Aux_UnMap16To32A          [internal]
 207  */
 208 static  MMDRV_MapType   MMDRV_Aux_UnMap16To32A(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 209 {
 210     return MMDRV_MAP_MSGERROR;
 211 }
 212
 213 /**************************************************************************
 214  *                              MMDRV_Aux_Map32ATo16            [internal]
 215  */
 216 static  MMDRV_MapType   MMDRV_Aux_Map32ATo16  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 217 {
 218     return MMDRV_MAP_MSGERROR;
 219 }
 220
 221 /**************************************************************************
 222  *                              MMDRV_Aux_UnMap32ATo16          [internal]
 223  */
 224 static  MMDRV_MapType   MMDRV_Aux_UnMap32ATo16(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 225 {
 226 #if 0
 227  case AUXDM_GETDEVCAPS:
 228     lpCaps->wMid = ac16.wMid;
 229     lpCaps->wPid = ac16.wPid;
 230     lpCaps->vDriverVersion = ac16.vDriverVersion;
 231     strcpy(lpCaps->szPname, ac16.szPname);
 232     lpCaps->wTechnology = ac16.wTechnology;
 233     lpCaps->dwSupport = ac16.dwSupport;
 234 #endif
 235     return MMDRV_MAP_MSGERROR;
 236 }
 237
 238 /**************************************************************************
 239  *                              MMDRV_Aux_Callback              [internal]
 240  */
 241 static void     CALLBACK MMDRV_Aux_Callback(HDRVR hDev, UINT uMsg, DWORD dwInstance, DWORD dwParam1, DWORD dwParam2)
 242 {
 243     LPWINE_MLD  mld = (LPWINE_MLD)dwInstance;
 244
 245     FIXME("NIY\n");
 246     MMDRV_Callback(mld, hDev, uMsg, dwParam1, dwParam2);
 247 }
 248
 249 /* =================================
 250  *     M I X E R  M A P P E R S
 251  * ================================= */
 252
 253 /**************************************************************************
 254  *                              xMMDRV_Mixer_Map16To32A         [internal]
 255  */
 256 static  MMDRV_MapType   MMDRV_Mixer_Map16To32A  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 257 {
 258     return MMDRV_MAP_MSGERROR;
 259 }
 260
 261 /**************************************************************************
 262  *                              MMDRV_Mixer_UnMap16To32A        [internal]
 263  */
 264 static  MMDRV_MapType   MMDRV_Mixer_UnMap16To32A(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 265 {
 266 #if 0
 267     MIXERCAPSA  micA;
 268     UINT        ret = mixerGetDevCapsA(devid, &micA, sizeof(micA));
 269
 270     if (ret == MMSYSERR_NOERROR) {
 271         mixcaps->wMid           = micA.wMid;
 272         mixcaps->wPid           = micA.wPid;
 273         mixcaps->vDriverVersion = micA.vDriverVersion;
 274         strcpy(mixcaps->szPname, micA.szPname);
 275         mixcaps->fdwSupport     = micA.fdwSupport;
 276         mixcaps->cDestinations  = micA.cDestinations;
 277     }
 278     return ret;
 279 #endif
 280     return MMDRV_MAP_MSGERROR;
 281 }
 282
 283 /**************************************************************************
 284  *                              MMDRV_Mixer_Map32ATo16          [internal]
 285  */
 286 static  MMDRV_MapType   MMDRV_Mixer_Map32ATo16  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 287 {
 288     return MMDRV_MAP_MSGERROR;
 289 }
 290
 291 /**************************************************************************
 292  *                              MMDRV_Mixer_UnMap32ATo16        [internal]
 293  */
 294 static  MMDRV_MapType   MMDRV_Mixer_UnMap32ATo16(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 295 {
 296     return MMDRV_MAP_MSGERROR;
 297 }
 298
 299 /**************************************************************************
 300  *                              MMDRV_Mixer_Callback            [internal]
 301  */
 302 static void     CALLBACK MMDRV_Mixer_Callback(HDRVR hDev, UINT uMsg, DWORD dwInstance, DWORD dwParam1, DWORD dwParam2)
 303 {
 304     LPWINE_MLD  mld = (LPWINE_MLD)dwInstance;
 305
 306     FIXME("NIY\n");
 307     MMDRV_Callback(mld, hDev, uMsg, dwParam1, dwParam2);
 308 }
 309
 310 /* =================================
 311  *   M I D I  I N    M A P P E R S
 312  * ================================= */
 313
 314 /**************************************************************************
 315  *                              MMDRV_MidiIn_Map16To32A         [internal]
 316  */
 317 static  MMDRV_MapType   MMDRV_MidiIn_Map16To32A  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 318 {
 319     return MMDRV_MAP_MSGERROR;
 320 }
 321
 322 /**************************************************************************
 323  *                              MMDRV_MidiIn_UnMap16To32A       [internal]
 324  */
 325 static  MMDRV_MapType   MMDRV_MidiIn_UnMap16To32A(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 326 {
 327     return MMDRV_MAP_MSGERROR;
 328 }
 329
 330 /**************************************************************************
 331  *                              MMDRV_MidiIn_Map32ATo16         [internal]
 332  */
 333 static  MMDRV_MapType   MMDRV_MidiIn_Map32ATo16  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 334 {
 335     return MMDRV_MAP_MSGERROR;
 336 }
 337
 338 /**************************************************************************
 339  *                              MMDRV_MidiIn_UnMap32ATo16       [internal]
 340  */
 341 static  MMDRV_MapType   MMDRV_MidiIn_UnMap32ATo16(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 342 {
 343     return MMDRV_MAP_MSGERROR;
 344 }
 345
 346 /**************************************************************************
 347  *                              MMDRV_MidiIn_Callback           [internal]
 348  */
 349 static void     CALLBACK MMDRV_MidiIn_Callback(HDRVR hDev, UINT uMsg, DWORD dwInstance, DWORD dwParam1, DWORD dwParam2)
 350 {
 351     LPWINE_MLD  mld = (LPWINE_MLD)dwInstance;
 352
 353     switch (uMsg) {
 354     case MIM_OPEN:
 355     case MIM_CLOSE:
 356         /* dwParam1 & dwParam2 are supposed to be 0, nothing to do */
 357
 358     case MIM_DATA:
 359     case MIM_MOREDATA:
 360     case MIM_ERROR:
 361         /* dwParam1 & dwParam2 are are data, nothing to do */
 362         break;
 363     case MIM_LONGDATA:
 364     case MIM_LONGERROR:
 365         /* dwParam1 points to a MidiHdr, work to be done !!! */
 366         if (mld->bFrom32 && !MMDrvs[mld->mmdIndex].bIs32) {
 367             /* initial map is: 32 => 16 */
 368             LPMIDIHDR           mh16 = MapSL(dwParam1);
 369             LPMIDIHDR           mh32 = *(LPMIDIHDR*)((LPSTR)mh16 - sizeof(LPMIDIHDR));
 370
 371             dwParam1 = (DWORD)mh32;
 372             mh32->dwFlags = mh16->dwFlags;
 373             mh32->dwBytesRecorded = mh16->dwBytesRecorded;
 374             if (mh32->reserved >= sizeof(MIDIHDR))
 375                 mh32->dwOffset = mh16->dwOffset;
 376         } else if (!mld->bFrom32 && MMDrvs[mld->mmdIndex].bIs32) {
 377             /* initial map is: 16 => 32 */
 378             LPMIDIHDR           mh32 = (LPMIDIHDR)(dwParam1);
 379             SEGPTR              segmh16 = *(SEGPTR*)((LPSTR)mh32 - sizeof(LPMIDIHDR));
 380             LPMIDIHDR           mh16 = MapSL(segmh16);
 381
 382             dwParam1 = (DWORD)segmh16;
 383             mh16->dwFlags = mh32->dwFlags;
 384             mh16->dwBytesRecorded = mh32->dwBytesRecorded;
 385             if (mh16->reserved >= sizeof(MIDIHDR))
 386                 mh16->dwOffset = mh32->dwOffset;
 387         }
 388         /* else { 16 => 16 or 32 => 32, nothing to do, same struct is kept }*/
 389         break;
 390     /* case MOM_POSITIONCB: */
 391     default:
 392         ERR("Unknown msg %u\n", uMsg);
 393     }
 394
 395     MMDRV_Callback(mld, hDev, uMsg, dwParam1, dwParam2);
 396 }
 397
 398 /* =================================
 399  *   M I D I  O U T  M A P P E R S
 400  * ================================= */
 401
 402 /**************************************************************************
 403  *                              MMDRV_MidiOut_Map16To32A        [internal]
 404  */
 405 static  MMDRV_MapType   MMDRV_MidiOut_Map16To32A  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 406 {
 407     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
 408
 409     switch (wMsg) {
 410     case MODM_GETNUMDEVS:
 411     case MODM_DATA:
 412     case MODM_RESET:
 413     case MODM_SETVOLUME:
 414         ret = MMDRV_MAP_OK;
 415         break;
 416
 417     case MODM_OPEN:
 418     case MODM_CLOSE:
 419     case MODM_GETVOLUME:
 420         FIXME("Shouldn't be used: the corresponding 16 bit functions use the 32 bit interface\n");
 421         break;
 422
 423     case MODM_GETDEVCAPS:
 424         {
 425             LPMIDIOUTCAPSA      moc32 = HeapAlloc(GetProcessHeap(), 0, sizeof(LPMIDIOUTCAPS16) + sizeof(MIDIOUTCAPSA));
 426             LPMIDIOUTCAPS16     moc16 = MapSL(*lpParam1);
 427
 428             if (moc32) {
 429                 *(LPMIDIOUTCAPS16*)moc32 = moc16;
 430                 moc32 = (LPMIDIOUTCAPSA)((LPSTR)moc32 + sizeof(LPMIDIOUTCAPS16));
 431                 *lpParam1 = (DWORD)moc32;
 432                 *lpParam2 = sizeof(MIDIOUTCAPSA);
 433
 434                 ret = MMDRV_MAP_OKMEM;
 435             } else {
 436                 ret = MMDRV_MAP_NOMEM;
 437             }
 438         }
 439         break;
 440     case MODM_PREPARE:
 441         {
 442             LPMIDIHDR           mh32 = HeapAlloc(GetProcessHeap(), 0, sizeof(LPMIDIHDR) + sizeof(MIDIHDR));
 443             LPMIDIHDR           mh16 = MapSL(*lpParam1);
 444
 445             if (mh32) {
 446                 *(LPMIDIHDR*)mh32 = (LPMIDIHDR)*lpParam1;
 447                 mh32 = (LPMIDIHDR)((LPSTR)mh32 + sizeof(LPMIDIHDR));
 448                 mh32->lpData = MapSL((SEGPTR)mh16->lpData);
 449                 mh32->dwBufferLength = mh16->dwBufferLength;
 450                 mh32->dwBytesRecorded = mh16->dwBytesRecorded;
 451                 mh32->dwUser = mh16->dwUser;
 452                 mh32->dwFlags = mh16->dwFlags;
 453                 /* FIXME: nothing on mh32->lpNext */
 454                 /* could link the mh32->lpNext at this level for memory house keeping */
 455                 mh32->dwOffset = (*lpParam2 >= sizeof(MIDIHDR)) ? ((LPMIDIHDR)mh16)->dwOffset : 0;
 456                 mh16->lpNext = mh32; /* for reuse in unprepare and write */
 457                 /* store size of passed MIDIHDR?? structure to know if dwOffset is available or not */
 458                 mh16->reserved = *lpParam2;
 459                 *lpParam1 = (DWORD)mh32;
 460                 *lpParam2 = sizeof(MIDIHDR);
 461
 462                 ret = MMDRV_MAP_OKMEM;
 463             } else {
 464                 ret = MMDRV_MAP_NOMEM;
 465             }
 466         }
 467         break;
 468     case MODM_UNPREPARE:
 469     case MODM_LONGDATA:
 470         {
 471             LPMIDIHDR           mh16 = MapSL(*lpParam1);
 472             LPMIDIHDR           mh32 = (LPMIDIHDR)mh16->lpNext;
 473
 474             *lpParam1 = (DWORD)mh32;
 475             *lpParam2 = sizeof(MIDIHDR);
 476             /* dwBufferLength can be reduced between prepare & write */
 477             if (mh32->dwBufferLength < mh16->dwBufferLength) {
 478                 ERR("Size of buffer has been increased (%ld, %ld)\n",
 479                     mh32->dwBufferLength, mh16->dwBufferLength);
 480                 return MMDRV_MAP_MSGERROR;
 481             }
 482             mh32->dwBufferLength = mh16->dwBufferLength;
 483             ret = MMDRV_MAP_OKMEM;
 484         }
 485         break;
 486
 487     case MODM_CACHEPATCHES:
 488     case MODM_CACHEDRUMPATCHES:
 489     default:
 490         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
 491         break;
 492     }
 493     return ret;
 494 }
 495
 496 /**************************************************************************
 497  *                              MMDRV_MidiOut_UnMap16To32A      [internal]
 498  */
 499 static  MMDRV_MapType   MMDRV_MidiOut_UnMap16To32A(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 500 {
 501     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
 502
 503     switch (wMsg) {
 504     case MODM_GETNUMDEVS:
 505     case MODM_DATA:
 506     case MODM_RESET:
 507     case MODM_SETVOLUME:
 508         ret = MMDRV_MAP_OK;
 509         break;
 510
 511     case MODM_OPEN:
 512     case MODM_CLOSE:
 513     case MODM_GETVOLUME:
 514         FIXME("Shouldn't be used: the corresponding 16 bit functions use the 32 bit interface\n");
 515         break;
 516
 517     case MODM_GETDEVCAPS:
 518         {
 519             LPMIDIOUTCAPSA              moc32 = (LPMIDIOUTCAPSA)(*lpParam1);
 520             LPMIDIOUTCAPS16             moc16 = *(LPMIDIOUTCAPS16*)((LPSTR)moc32 - sizeof(LPMIDIOUTCAPS16));
 521
 522             moc16->wMid                 = moc32->wMid;
 523             moc16->wPid                 = moc32->wPid;
 524             moc16->vDriverVersion       = moc32->vDriverVersion;
 525             strcpy(moc16->szPname, moc32->szPname);
 526             moc16->wTechnology          = moc32->wTechnology;
 527             moc16->wVoices              = moc32->wVoices;
 528             moc16->wNotes               = moc32->wNotes;
 529             moc16->wChannelMask         = moc32->wChannelMask;
 530             moc16->dwSupport            = moc32->dwSupport;
 531             HeapFree(GetProcessHeap(), 0, (LPSTR)moc32 - sizeof(LPMIDIOUTCAPS16));
 532             ret = MMDRV_MAP_OK;
 533         }
 534         break;
 535     case MODM_PREPARE:
 536     case MODM_UNPREPARE:
 537     case MODM_LONGDATA:
 538         {
 539             LPMIDIHDR           mh32 = (LPMIDIHDR)(*lpParam1);
 540             LPMIDIHDR           mh16 = MapSL(*(SEGPTR*)((LPSTR)mh32 - sizeof(LPMIDIHDR)));
 541
 542             assert(mh16->lpNext == mh32);
 543             mh16->dwBufferLength = mh32->dwBufferLength;
 544             mh16->dwBytesRecorded = mh32->dwBytesRecorded;
 545             mh16->dwUser = mh32->dwUser;
 546             mh16->dwFlags = mh32->dwFlags;
 547             if (mh16->reserved >= sizeof(MIDIHDR))
 548                 mh16->dwOffset = mh32->dwOffset;
 549
 550             if (wMsg == MODM_UNPREPARE) {
 551                 HeapFree(GetProcessHeap(), 0, (LPSTR)mh32 - sizeof(LPMIDIHDR));
 552                 mh16->lpNext = 0;
 553             }
 554             ret = MMDRV_MAP_OK;
 555         }
 556         break;
 557
 558     case MODM_CACHEPATCHES:
 559     case MODM_CACHEDRUMPATCHES:
 560     default:
 561         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
 562         break;
 563     }
 564     return ret;
 565 }
 566
 567 /**************************************************************************
 568  *                              MMDRV_MidiOut_Map32ATo16        [internal]
 569  */
 570 static  MMDRV_MapType   MMDRV_MidiOut_Map32ATo16  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 571 {
 572     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
 573
 574     switch (wMsg) {
 575     case MODM_CLOSE:
 576     case MODM_GETNUMDEVS:
 577     case MODM_DATA:
 578     case MODM_RESET:
 579     case MODM_SETVOLUME:
 580         ret = MMDRV_MAP_OK;
 581         break;
 582     case MODM_GETDEVCAPS:
 583         {
 584             LPMIDIOUTCAPSA              moc32 = (LPMIDIOUTCAPSA)*lpParam1;
 585             LPSTR                       ptr = SEGPTR_ALLOC(sizeof(LPMIDIOUTCAPSA) + sizeof(MIDIOUTCAPS16));
 586
 587             if (ptr) {
 588                 *(LPMIDIOUTCAPSA*)ptr = moc32;
 589                 ret = MMDRV_MAP_OKMEM;
 590             } else {
 591                 ret = MMDRV_MAP_NOMEM;
 592             }
 593             *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPMIDIOUTCAPSA);
 594             *lpParam2 = sizeof(MIDIOUTCAPS16);
 595         }
 596         break;
 597     case MODM_PREPARE:
 598         {
 599             LPMIDIHDR           mh32 = (LPMIDIHDR)*lpParam1;
 600             LPMIDIHDR           mh16;
 601             LPVOID              ptr = SEGPTR_ALLOC(sizeof(LPMIDIHDR) + sizeof(MIDIHDR) + mh32->dwBufferLength);
 602
 603             if (ptr) {
 604                 *(LPMIDIHDR*)ptr = mh32;
 605                 mh16 = (LPMIDIHDR)((LPSTR)ptr + sizeof(LPMIDIHDR));
 606                 mh16->lpData = (LPSTR)SEGPTR_GET(ptr) + sizeof(LPMIDIHDR) + sizeof(MIDIHDR);
 607                 /* data will be copied on WODM_WRITE */
 608                 mh16->dwBufferLength = mh32->dwBufferLength;
 609                 mh16->dwBytesRecorded = mh32->dwBytesRecorded;
 610                 mh16->dwUser = mh32->dwUser;
 611                 mh16->dwFlags = mh32->dwFlags;
 612                 /* FIXME: nothing on mh32->lpNext */
 613                 /* could link the mh32->lpNext at this level for memory house keeping */
 614                 mh16->dwOffset = (*lpParam2 >= sizeof(MIDIHDR)) ? mh32->dwOffset : 0;
 615
 616                 mh32->lpNext = (LPMIDIHDR)mh16; /* for reuse in unprepare and write */
 617                 mh32->reserved = *lpParam2;
 618
 619                 TRACE("mh16=%08lx mh16->lpData=%08lx mh32->buflen=%lu mh32->lpData=%08lx\n",
 620                       (DWORD)SEGPTR_GET(ptr) + sizeof(LPMIDIHDR), (DWORD)mh16->lpData,
 621                       mh32->dwBufferLength, (DWORD)mh32->lpData);
 622                 *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPMIDIHDR);
 623                 *lpParam2 = sizeof(MIDIHDR);
 624
 625                 ret = MMDRV_MAP_OKMEM;
 626             } else {
 627                 ret = MMDRV_MAP_NOMEM;
 628             }
 629         }
 630         break;
 631     case MODM_UNPREPARE:
 632     case MODM_LONGDATA:
 633         {
 634             LPMIDIHDR           mh32 = (LPMIDIHDR)(*lpParam1);
 635             LPMIDIHDR           mh16 = (LPMIDIHDR)mh32->lpNext;
 636             LPSTR               ptr = (LPSTR)mh16 - sizeof(LPMIDIHDR);
 637
 638             assert(*(LPMIDIHDR*)ptr == mh32);
 639
 640             TRACE("mh16=%08lx mh16->lpData=%08lx mh32->buflen=%lu mh32->lpData=%08lx\n",
 641                   (DWORD)SEGPTR_GET(ptr) + sizeof(LPMIDIHDR), (DWORD)mh16->lpData,
 642                   mh32->dwBufferLength, (DWORD)mh32->lpData);
 643
 644             if (wMsg == MODM_LONGDATA)
 645                 memcpy((LPSTR)mh16 + sizeof(MIDIHDR), mh32->lpData, mh32->dwBufferLength);
 646
 647             *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPMIDIHDR);
 648             *lpParam2 = sizeof(MIDIHDR);
 649             /* dwBufferLength can be reduced between prepare & write */
 650             if (mh16->dwBufferLength < mh32->dwBufferLength) {
 651                 ERR("Size of buffer has been increased (%ld, %ld)\n",
 652                     mh16->dwBufferLength, mh32->dwBufferLength);
 653                 return MMDRV_MAP_MSGERROR;
 654             }
 655             mh16->dwBufferLength = mh32->dwBufferLength;
 656             ret = MMDRV_MAP_OKMEM;
 657         }
 658         break;
 659     case MODM_OPEN:
 660         {
 661             LPMIDIOPENDESC              mod32 = (LPMIDIOPENDESC)*lpParam1;
 662             LPVOID                      ptr;
 663             LPMIDIOPENDESC16            mod16;
 664
 665             /* allocated data are mapped as follows:
 666                LPMIDIOPENDESC   ptr to orig lParam1
 667                DWORD            orig dwUser, which is a pointer to DWORD:driver dwInstance
 668                DWORD            dwUser passed to driver
 669                MIDIOPENDESC16   mod16: openDesc passed to driver
 670                MIDIOPENSTRMID   cIds
 671             */
 672             ptr = SEGPTR_ALLOC(sizeof(LPMIDIOPENDESC) + 2*sizeof(DWORD) + sizeof(MIDIOPENDESC16) +
 673                                mod32->cIds ? (mod32->cIds - 1) * sizeof(MIDIOPENSTRMID) : 0);
 674
 675             if (ptr) {
 676                 *(LPMIDIOPENDESC*)ptr = mod32;
 677                 *(LPDWORD)(ptr + sizeof(LPMIDIOPENDESC)) = *lpdwUser;
 678                 mod16 = (LPMIDIOPENDESC16)((LPSTR)ptr + sizeof(LPMIDIOPENDESC) + 2*sizeof(DWORD));
 679
 680                 mod16->hMidi = mod32->hMidi;
 681                 mod16->dwCallback = mod32->dwCallback;
 682                 mod16->dwInstance = mod32->dwInstance;
 683                 mod16->dnDevNode = mod32->dnDevNode;
 684                 mod16->cIds = mod32->cIds;
 685                 memcpy(&mod16->rgIds, &mod32->rgIds, mod32->cIds * sizeof(MIDIOPENSTRMID));
 686
 687                 *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPMIDIOPENDESC) + 2*sizeof(DWORD);
 688                 *lpdwUser = (DWORD)SEGPTR_GET(ptr) + sizeof(LPMIDIOPENDESC) + sizeof(DWORD);
 689
 690                 ret = MMDRV_MAP_OKMEM;
 691             } else {
 692                 ret = MMDRV_MAP_NOMEM;
 693             }
 694         }
 695         break;
 696     case MODM_GETVOLUME:
 697     case MODM_CACHEPATCHES:
 698     case MODM_CACHEDRUMPATCHES:
 699     default:
 700         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
 701         break;
 702     }
 703     return ret;
 704 }
 705
 706 /**************************************************************************
 707  *                              MMDRV_MidiOut_UnMap32ATo16      [internal]
 708  */
 709 static  MMDRV_MapType   MMDRV_MidiOut_UnMap32ATo16(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 710 {
 711     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
 712
 713     switch (wMsg) {
 714     case MODM_CLOSE:
 715     case MODM_GETNUMDEVS:
 716     case MODM_DATA:
 717     case MODM_RESET:
 718     case MODM_SETVOLUME:
 719         ret = MMDRV_MAP_OK;
 720         break;
 721     case MODM_GETDEVCAPS:
 722         {
 723             LPMIDIOUTCAPS16             moc16 = MapSL(*lpParam1);
 724             LPSTR                       ptr   = (LPSTR)moc16 - sizeof(LPMIDIOUTCAPSA);
 725             LPMIDIOUTCAPSA              moc32 = *(LPMIDIOUTCAPSA*)ptr;
 726
 727             moc32->wMid                 = moc16->wMid;
 728             moc32->wPid                 = moc16->wPid;
 729             moc32->vDriverVersion       = moc16->vDriverVersion;
 730             strcpy(moc32->szPname, moc16->szPname);
 731             moc32->wTechnology          = moc16->wTechnology;
 732             moc32->wVoices              = moc16->wVoices;
 733             moc32->wNotes               = moc16->wNotes;
 734             moc32->wChannelMask         = moc16->wChannelMask;
 735             moc32->dwSupport            = moc16->dwSupport;
 736
 737             if (!SEGPTR_FREE(ptr))
 738                 FIXME("bad free line=%d\n", __LINE__);
 739             ret = MMDRV_MAP_OK;
 740         }
 741         break;
 742     case MODM_PREPARE:
 743     case MODM_UNPREPARE:
 744     case MODM_LONGDATA:
 745         {
 746             LPMIDIHDR           mh16 = MapSL(*lpParam1);
 747             LPSTR               ptr = (LPSTR)mh16 - sizeof(LPMIDIHDR);
 748             LPMIDIHDR           mh32 = *(LPMIDIHDR*)ptr;
 749
 750             assert(mh32->lpNext == (LPMIDIHDR)mh16);
 751             mh32->dwBytesRecorded = mh16->dwBytesRecorded;
 752             mh32->dwUser = mh16->dwUser;
 753             mh32->dwFlags = mh16->dwFlags;
 754
 755             if (wMsg == MODM_UNPREPARE) {
 756                 if (!SEGPTR_FREE(ptr))
 757                     FIXME("bad free line=%d\n", __LINE__);
 758                 mh32->lpNext = 0;
 759             }
 760             ret = MMDRV_MAP_OK;
 761         }
 762         break;
 763     case MODM_OPEN:
 764         {
 765             LPMIDIOPENDESC16            mod16 = MapSL(*lpParam1);
 766             LPSTR                       ptr   = (LPSTR)mod16 - sizeof(LPMIDIOPENDESC) - 2*sizeof(DWORD);
 767
 768             **(DWORD**)(ptr + sizeof(LPMIDIOPENDESC)) = *(LPDWORD)(ptr + sizeof(LPMIDIOPENDESC) + sizeof(DWORD));
 769
 770             if (!SEGPTR_FREE(ptr))
 771                 FIXME("bad free line=%d\n", __LINE__);
 772
 773             ret = MMDRV_MAP_OK;
 774         }
 775         break;
 776     case MODM_GETVOLUME:
 777     case MODM_CACHEPATCHES:
 778     case MODM_CACHEDRUMPATCHES:
 779     default:
 780         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
 781         break;
 782     }
 783     return ret;
 784 }
 785
 786 /**************************************************************************
 787  *                              MMDRV_MidiOut_Callback          [internal]
 788  */
 789 static void     CALLBACK MMDRV_MidiOut_Callback(HDRVR hDev, UINT uMsg, DWORD dwInstance, DWORD dwParam1, DWORD dwParam2)
 790 {
 791     LPWINE_MLD  mld = (LPWINE_MLD)dwInstance;
 792
 793     switch (uMsg) {
 794     case MOM_OPEN:
 795     case MOM_CLOSE:
 796         /* dwParam1 & dwParam2 are supposed to be 0, nothing to do */
 797         break;
 798     case MOM_DONE:
 799         if (mld->bFrom32 && !MMDrvs[mld->mmdIndex].bIs32) {
 800             /* initial map is: 32 => 16 */
 801             LPMIDIHDR           mh16 = MapSL(dwParam1);
 802             LPMIDIHDR           mh32 = *(LPMIDIHDR*)((LPSTR)mh16 - sizeof(LPMIDIHDR));
 803
 804             dwParam1 = (DWORD)mh32;
 805             mh32->dwFlags = mh16->dwFlags;
 806             mh32->dwOffset = mh16->dwOffset;
 807             if (mh32->reserved >= sizeof(MIDIHDR))
 808                 mh32->dwOffset = mh16->dwOffset;
 809         } else if (!mld->bFrom32 && MMDrvs[mld->mmdIndex].bIs32) {
 810             /* initial map is: 16 => 32 */
 811             LPMIDIHDR           mh32 = (LPMIDIHDR)(dwParam1);
 812             SEGPTR              segmh16 = *(SEGPTR*)((LPSTR)mh32 - sizeof(LPMIDIHDR));
 813             LPMIDIHDR           mh16 = MapSL(segmh16);
 814
 815             dwParam1 = (DWORD)segmh16;
 816             mh16->dwFlags = mh32->dwFlags;
 817             if (mh16->reserved >= sizeof(MIDIHDR))
 818                 mh16->dwOffset = mh32->dwOffset;
 819         }
 820         /* else { 16 => 16 or 32 => 32, nothing to do, same struct is kept }*/
 821         break;
 822     /* case MOM_POSITIONCB: */
 823     default:
 824         ERR("Unknown msg %u\n", uMsg);
 825     }
 826
 827     MMDRV_Callback(mld, hDev, uMsg, dwParam1, dwParam2);
 828 }
 829
 830 /* =================================
 831  *   W A V E  I N    M A P P E R S
 832  * ================================= */
 833
 834 /**************************************************************************
 835  *                              MMDRV_WaveIn_Map16To32A         [internal]
 836  */
 837 static  MMDRV_MapType   MMDRV_WaveIn_Map16To32A  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 838 {
 839     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
 840
 841     switch (wMsg) {
 842     case WIDM_GETNUMDEVS:
 843     case WIDM_RESET:
 844     case WIDM_START:
 845     case WIDM_STOP:
 846         ret = MMDRV_MAP_OK;
 847         break;
 848     case WIDM_OPEN:
 849     case WIDM_CLOSE:
 850         FIXME("Shouldn't be used: the corresponding 16 bit functions use the 32 bit interface\n");
 851         break;
 852     case WIDM_GETDEVCAPS:
 853         {
 854             LPWAVEINCAPSA       wic32 = HeapAlloc(GetProcessHeap(), 0, sizeof(LPWAVEINCAPS16) + sizeof(WAVEINCAPSA));
 855             LPWAVEINCAPS16      wic16 = MapSL(*lpParam1);
 856
 857             if (wic32) {
 858                 *(LPWAVEINCAPS16*)wic32 = wic16;
 859                 wic32 = (LPWAVEINCAPSA)((LPSTR)wic32 + sizeof(LPWAVEINCAPS16));
 860                 *lpParam1 = (DWORD)wic32;
 861                 *lpParam2 = sizeof(WAVEINCAPSA);
 862
 863                 ret = MMDRV_MAP_OKMEM;
 864             } else {
 865                 ret = MMDRV_MAP_NOMEM;
 866             }
 867         }
 868         break;
 869     case WIDM_GETPOS:
 870         {
 871             LPMMTIME            mmt32 = HeapAlloc(GetProcessHeap(), 0, sizeof(LPMMTIME16) + sizeof(MMTIME));
 872             LPMMTIME16          mmt16 = MapSL(*lpParam1);
 873
 874             if (mmt32) {
 875                 *(LPMMTIME16*)mmt32 = mmt16;
 876                 mmt32 = (LPMMTIME)((LPSTR)mmt32 + sizeof(LPMMTIME16));
 877
 878                 mmt32->wType = mmt16->wType;
 879                 *lpParam1 = (DWORD)mmt32;
 880                 *lpParam2 = sizeof(MMTIME);
 881
 882                 ret = MMDRV_MAP_OKMEM;
 883             } else {
 884                 ret = MMDRV_MAP_NOMEM;
 885             }
 886         }
 887         break;
 888     case WIDM_PREPARE:
 889         {
 890             LPWAVEHDR           wh32 = HeapAlloc(GetProcessHeap(), 0, sizeof(LPWAVEHDR) + sizeof(WAVEHDR));
 891             LPWAVEHDR           wh16 = MapSL(*lpParam1);
 892
 893             if (wh32) {
 894                 *(LPWAVEHDR*)wh32 = (LPWAVEHDR)*lpParam1;
 895                 wh32 = (LPWAVEHDR)((LPSTR)wh32 + sizeof(LPWAVEHDR));
 896                 wh32->lpData = MapSL((SEGPTR)wh16->lpData);
 897                 wh32->dwBufferLength = wh16->dwBufferLength;
 898                 wh32->dwBytesRecorded = wh16->dwBytesRecorded;
 899                 wh32->dwUser = wh16->dwUser;
 900                 wh32->dwFlags = wh16->dwFlags;
 901                 wh32->dwLoops = wh16->dwLoops;
 902                 /* FIXME: nothing on wh32->lpNext */
 903                 /* could link the wh32->lpNext at this level for memory house keeping */
 904                 wh16->lpNext = wh32; /* for reuse in unprepare and write */
 905                 *lpParam1 = (DWORD)wh32;
 906                 *lpParam2 = sizeof(WAVEHDR);
 907
 908                 ret = MMDRV_MAP_OKMEM;
 909             } else {
 910                 ret = MMDRV_MAP_NOMEM;
 911             }
 912         }
 913         break;
 914     case WIDM_ADDBUFFER:
 915     case WIDM_UNPREPARE:
 916         {
 917             LPWAVEHDR           wh16 = MapSL(*lpParam1);
 918             LPWAVEHDR           wh32 = (LPWAVEHDR)wh16->lpNext;
 919
 920             *lpParam1 = (DWORD)wh32;
 921             *lpParam2 = sizeof(WAVEHDR);
 922             /* dwBufferLength can be reduced between prepare & write */
 923             if (wh32->dwBufferLength < wh16->dwBufferLength) {
 924                 ERR("Size of buffer has been increased (%ld, %ld)\n",
 925                     wh32->dwBufferLength, wh16->dwBufferLength);
 926                 return MMDRV_MAP_MSGERROR;
 927             }
 928             wh32->dwBufferLength = wh16->dwBufferLength;
 929             ret = MMDRV_MAP_OKMEM;
 930         }
 931         break;
 932     default:
 933         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
 934         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
 935         break;
 936     }
 937     return ret;
 938 }
 939
 940 /**************************************************************************
 941  *                              MMDRV_WaveIn_UnMap16To32A       [internal]
 942  */
 943 static  MMDRV_MapType   MMDRV_WaveIn_UnMap16To32A(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
 944 {
 945     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
 946
 947     switch (wMsg) {
 948     case WIDM_GETNUMDEVS:
 949     case WIDM_RESET:
 950     case WIDM_START:
 951     case WIDM_STOP:
 952         ret = MMDRV_MAP_OK;
 953         break;
 954     case WIDM_OPEN:
 955     case WIDM_CLOSE:
 956         FIXME("Shouldn't be used: the corresponding 16 bit functions use the 32 bit interface\n");
 957         break;
 958     case WIDM_GETDEVCAPS:
 959         {
 960             LPWAVEINCAPSA               wic32 = (LPWAVEINCAPSA)(*lpParam1);
 961             LPWAVEINCAPS16              wic16 = *(LPWAVEINCAPS16*)((LPSTR)wic32 - sizeof(LPWAVEINCAPS16));
 962
 963             wic16->wMid = wic32->wMid;
 964             wic16->wPid = wic32->wPid;
 965             wic16->vDriverVersion = wic32->vDriverVersion;
 966             strcpy(wic16->szPname, wic32->szPname);
 967             wic16->dwFormats = wic32->dwFormats;
 968             wic16->wChannels = wic32->wChannels;
 969             HeapFree(GetProcessHeap(), 0, (LPSTR)wic32 - sizeof(LPWAVEINCAPS16));
 970             ret = MMDRV_MAP_OK;
 971         }
 972         break;
 973     case WIDM_GETPOS:
 974         {
 975             LPMMTIME            mmt32 = (LPMMTIME)(*lpParam1);
 976             LPMMTIME16          mmt16 = *(LPMMTIME16*)((LPSTR)mmt32 - sizeof(LPMMTIME16));
 977
 978             MMSYSTEM_MMTIME32to16(mmt16, mmt32);
 979             HeapFree(GetProcessHeap(), 0, (LPSTR)mmt32 - sizeof(LPMMTIME16));
 980             ret = MMDRV_MAP_OK;
 981         }
 982         break;
 983     case WIDM_ADDBUFFER:
 984     case WIDM_PREPARE:
 985     case WIDM_UNPREPARE:
 986         {
 987             LPWAVEHDR           wh32 = (LPWAVEHDR)(*lpParam1);
 988             LPWAVEHDR           wh16 = MapSL(*(SEGPTR*)((LPSTR)wh32 - sizeof(LPWAVEHDR)));
 989
 990             assert(wh16->lpNext == wh32);
 991             wh16->dwBufferLength = wh32->dwBufferLength;
 992             wh16->dwBytesRecorded = wh32->dwBytesRecorded;
 993             wh16->dwUser = wh32->dwUser;
 994             wh16->dwFlags = wh32->dwFlags;
 995             wh16->dwLoops = wh32->dwLoops;
 996
 997             if (wMsg == WIDM_UNPREPARE) {
 998                 HeapFree(GetProcessHeap(), 0, (LPSTR)wh32 - sizeof(LPWAVEHDR));
 999                 wh16->lpNext = 0;
1000             }
1001             ret = MMDRV_MAP_OK;
1002         }
1003         break;
1004     default:
1005         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
1006         break;
1007     }
1008     return ret;
1009 }
1010
1011 /**************************************************************************
1012  *                              MMDRV_WaveIn_Map32ATo16         [internal]
1013  */
1014 static  MMDRV_MapType   MMDRV_WaveIn_Map32ATo16  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
1015 {
1016     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
1017
1018     switch (wMsg) {
1019     case WIDM_CLOSE:
1020     case WIDM_GETNUMDEVS:
1021     case WIDM_RESET:
1022     case WIDM_START:
1023     case WIDM_STOP:
1024         ret = MMDRV_MAP_OK;
1025         break;
1026
1027     case WIDM_OPEN:
1028         {
1029             LPWAVEOPENDESC              wod32 = (LPWAVEOPENDESC)*lpParam1;
1030             int                         sz = sizeof(WAVEFORMATEX);
1031             LPVOID                      ptr;
1032             LPWAVEOPENDESC16            wod16;
1033
1034             /* allocated data are mapped as follows:
1035                LPWAVEOPENDESC   ptr to orig lParam1
1036                DWORD            orig dwUser, which is a pointer to DWORD:driver dwInstance
1037                DWORD            dwUser passed to driver
1038                WAVEOPENDESC16   wod16: openDesc passed to driver
1039                WAVEFORMATEX     openDesc->lpFormat passed to driver
1040                xxx              extra bytes to WAVEFORMATEX
1041             */
1042             if (wod32->lpFormat->wFormatTag != WAVE_FORMAT_PCM) {
1043                 TRACE("Allocating %u extra bytes (%d)\n", ((LPWAVEFORMATEX)wod32->lpFormat)->cbSize, wod32->lpFormat->wFormatTag);
1044                 sz += ((LPWAVEFORMATEX)wod32->lpFormat)->cbSize;
1045             }
1046
1047             ptr = SEGPTR_ALLOC(sizeof(LPWAVEOPENDESC) + 2*sizeof(DWORD) + sizeof(WAVEOPENDESC16) + sz);
1048
1049             if (ptr) {
1050                 *(LPWAVEOPENDESC*)ptr = wod32;
1051                 *(LPDWORD)(ptr + sizeof(LPWAVEOPENDESC)) = *lpdwUser;
1052                 wod16 = (LPWAVEOPENDESC16)((LPSTR)ptr + sizeof(LPWAVEOPENDESC) + 2*sizeof(DWORD));
1053
1054                 wod16->hWave = wod32->hWave;
1055                 wod16->lpFormat = (LPWAVEFORMATEX)((DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEOPENDESC) + 2*sizeof(DWORD) + sizeof(WAVEOPENDESC16));
1056                 memcpy(wod16 + 1, wod32->lpFormat, sz);
1057
1058                 wod16->dwCallback = wod32->dwCallback;
1059                 wod16->dwInstance = wod32->dwInstance;
1060                 wod16->uMappedDeviceID = wod32->uMappedDeviceID;
1061                 wod16->dnDevNode = wod32->dnDevNode;
1062
1063                 *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEOPENDESC) + 2*sizeof(DWORD);
1064                 *lpdwUser = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEOPENDESC) + sizeof(DWORD);
1065
1066                 ret = MMDRV_MAP_OKMEM;
1067             } else {
1068                 ret = MMDRV_MAP_NOMEM;
1069             }
1070         }
1071         break;
1072     case WIDM_PREPARE:
1073         {
1074             LPWAVEHDR           wh32 = (LPWAVEHDR)*lpParam1;
1075             LPWAVEHDR           wh16;
1076             LPVOID              ptr = SEGPTR_ALLOC(sizeof(LPWAVEHDR) + sizeof(WAVEHDR) + wh32->dwBufferLength);
1077
1078             if (ptr) {
1079                 *(LPWAVEHDR*)ptr = wh32;
1080                 wh16 = (LPWAVEHDR)((LPSTR)ptr + sizeof(LPWAVEHDR));
1081                 wh16->lpData = (LPSTR)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR) + sizeof(WAVEHDR);
1082                 /* data will be copied on WODM_WRITE */
1083                 wh16->dwBufferLength = wh32->dwBufferLength;
1084                 wh16->dwBytesRecorded = wh32->dwBytesRecorded;
1085                 wh16->dwUser = wh32->dwUser;
1086                 wh16->dwFlags = wh32->dwFlags;
1087                 wh16->dwLoops = wh32->dwLoops;
1088                 /* FIXME: nothing on wh32->lpNext */
1089                 /* could link the wh32->lpNext at this level for memory house keeping */
1090                 wh32->lpNext = wh16; /* for reuse in unprepare and write */
1091                 TRACE("wh16=%08lx wh16->lpData=%08lx wh32->buflen=%lu wh32->lpData=%08lx\n",
1092                       (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR), (DWORD)wh16->lpData,
1093                       wh32->dwBufferLength, (DWORD)wh32->lpData);
1094                 *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR);
1095                 *lpParam2 = sizeof(WAVEHDR);
1096
1097                 ret = MMDRV_MAP_OKMEM;
1098             } else {
1099                 ret = MMDRV_MAP_NOMEM;
1100             }
1101         }
1102         break;
1103     case WIDM_ADDBUFFER:
1104     case WIDM_UNPREPARE:
1105         {
1106             LPWAVEHDR           wh32 = (LPWAVEHDR)(*lpParam1);
1107             LPWAVEHDR           wh16 = wh32->lpNext;
1108             LPSTR               ptr = (LPSTR)wh16 - sizeof(LPWAVEHDR);
1109
1110             assert(*(LPWAVEHDR*)ptr == wh32);
1111
1112             TRACE("wh16=%08lx wh16->lpData=%08lx wh32->buflen=%lu wh32->lpData=%08lx\n",
1113                   (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR), (DWORD)wh16->lpData,
1114                   wh32->dwBufferLength, (DWORD)wh32->lpData);
1115
1116             if (wMsg == WIDM_ADDBUFFER)
1117                 memcpy((LPSTR)wh16 + sizeof(WAVEHDR), wh32->lpData, wh32->dwBufferLength);
1118
1119             *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR);
1120             *lpParam2 = sizeof(WAVEHDR);
1121             /* dwBufferLength can be reduced between prepare & write */
1122             if (wh32->dwBufferLength < wh16->dwBufferLength) {
1123                 ERR("Size of buffer has been increased (%ld, %ld)\n",
1124                     wh32->dwBufferLength, wh16->dwBufferLength);
1125                 return MMDRV_MAP_MSGERROR;
1126             }
1127             wh32->dwBufferLength = wh16->dwBufferLength;
1128             ret = MMDRV_MAP_OKMEM;
1129         }
1130         break;
1131    case WIDM_GETDEVCAPS:
1132         {
1133             LPWAVEINCAPSA               wic32 = (LPWAVEINCAPSA)*lpParam1;
1134             LPSTR                       ptr = SEGPTR_ALLOC(sizeof(LPWAVEINCAPSA) + sizeof(WAVEINCAPS16));
1135
1136             if (ptr) {
1137                 *(LPWAVEINCAPSA*)ptr = wic32;
1138                 ret = MMDRV_MAP_OKMEM;
1139             } else {
1140                 ret = MMDRV_MAP_NOMEM;
1141             }
1142             *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEINCAPSA);
1143             *lpParam2 = sizeof(WAVEINCAPS16);
1144         }
1145         break;
1146     case WIDM_GETPOS:
1147         {
1148             LPMMTIME            mmt32 = (LPMMTIME)*lpParam1;
1149             LPSTR               ptr = SEGPTR_ALLOC(sizeof(LPMMTIME) + sizeof(MMTIME16));
1150             LPMMTIME16          mmt16 = (LPMMTIME16)(ptr + sizeof(LPMMTIME));
1151
1152             if (ptr) {
1153                 *(LPMMTIME*)ptr = mmt32;
1154                 mmt16->wType = mmt32->wType;
1155                 ret = MMDRV_MAP_OKMEM;
1156             } else {
1157                 ret = MMDRV_MAP_NOMEM;
1158             }
1159             *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPMMTIME);
1160             *lpParam2 = sizeof(MMTIME16);
1161         }
1162         break;
1163     default:
1164         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
1165         break;
1166     }
1167     return ret;
1168 }
1169
1170 /**************************************************************************
1171  *                              MMDRV_WaveIn_UnMap32ATo16       [internal]
1172  */
1173 static  MMDRV_MapType   MMDRV_WaveIn_UnMap32ATo16(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
1174 {
1175     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
1176
1177     switch (wMsg) {
1178     case WIDM_CLOSE:
1179     case WIDM_GETNUMDEVS:
1180     case WIDM_RESET:
1181     case WIDM_START:
1182     case WIDM_STOP:
1183         ret = MMDRV_MAP_OK;
1184         break;
1185
1186     case WIDM_OPEN:
1187         {
1188             LPWAVEOPENDESC16            wod16 = MapSL(*lpParam1);
1189             LPSTR                       ptr   = (LPSTR)wod16 - sizeof(LPWAVEOPENDESC) - 2*sizeof(DWORD);
1190             LPWAVEOPENDESC              wod32 = *(LPWAVEOPENDESC*)ptr;
1191
1192             wod32->uMappedDeviceID = wod16->uMappedDeviceID;
1193             **(DWORD**)(ptr + sizeof(LPWAVEOPENDESC)) = *(LPDWORD)(ptr + sizeof(LPWAVEOPENDESC) + sizeof(DWORD));
1194
1195             if (!SEGPTR_FREE(ptr))
1196                 FIXME("bad free line=%d\n", __LINE__);
1197
1198             ret = MMDRV_MAP_OK;
1199         }
1200         break;
1201
1202     case WIDM_ADDBUFFER:
1203     case WIDM_PREPARE:
1204     case WIDM_UNPREPARE:
1205         {
1206             LPWAVEHDR           wh16 = MapSL(*lpParam1);
1207             LPSTR               ptr = (LPSTR)wh16 - sizeof(LPWAVEHDR);
1208             LPWAVEHDR           wh32 = *(LPWAVEHDR*)ptr;
1209
1210             assert(wh32->lpNext == wh16);
1211             wh32->dwBytesRecorded = wh16->dwBytesRecorded;
1212             wh32->dwUser = wh16->dwUser;
1213             wh32->dwFlags = wh16->dwFlags;
1214             wh32->dwLoops = wh16->dwLoops;
1215
1216             if (wMsg == WIDM_UNPREPARE) {
1217                 if (!SEGPTR_FREE(ptr))
1218                     FIXME("bad free line=%d\n", __LINE__);
1219                 wh32->lpNext = 0;
1220             }
1221             ret = MMDRV_MAP_OK;
1222         }
1223         break;
1224      case WIDM_GETDEVCAPS:
1225         {
1226             LPWAVEINCAPS16              wic16 = MapSL(*lpParam1);
1227             LPSTR                       ptr   = (LPSTR)wic16 - sizeof(LPWAVEINCAPSA);
1228             LPWAVEINCAPSA               wic32 = *(LPWAVEINCAPSA*)ptr;
1229
1230             wic32->wMid = wic16->wMid;
1231             wic32->wPid = wic16->wPid;
1232             wic32->vDriverVersion = wic16->vDriverVersion;
1233             strcpy(wic32->szPname, wic16->szPname);
1234             wic32->dwFormats = wic16->dwFormats;
1235             wic32->wChannels = wic16->wChannels;
1236             if (!SEGPTR_FREE(ptr))
1237                 FIXME("bad free line=%d\n", __LINE__);
1238             ret = MMDRV_MAP_OK;
1239         }
1240         break;
1241     case WIDM_GETPOS:
1242         {
1243             LPMMTIME16          mmt16 = MapSL(*lpParam1);
1244             LPSTR               ptr   = (LPSTR)mmt16 - sizeof(LPMMTIME);
1245             LPMMTIME            mmt32 = *(LPMMTIME*)ptr;
1246
1247             MMSYSTEM_MMTIME16to32(mmt32, mmt16);
1248
1249             if (!SEGPTR_FREE(ptr))
1250                 FIXME("bad free line=%d\n", __LINE__);
1251
1252             ret = MMDRV_MAP_OK;
1253         }
1254         break;
1255     default:
1256         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
1257         break;
1258     }
1259     return ret;
1260 }
1261
1262 /**************************************************************************
1263  *                              MMDRV_WaveIn_Callback           [internal]
1264  */
1265 static void     CALLBACK MMDRV_WaveIn_Callback(HDRVR hDev, UINT uMsg, DWORD dwInstance, DWORD dwParam1, DWORD dwParam2)
1266 {
1267     LPWINE_MLD  mld = (LPWINE_MLD)dwInstance;
1268
1269     switch (uMsg) {
1270     case WIM_OPEN:
1271     case WIM_CLOSE:
1272         /* dwParam1 & dwParam2 are supposed to be 0, nothing to do */
1273         break;
1274     case WIM_DATA:
1275         if (mld->bFrom32 && !MMDrvs[mld->mmdIndex].bIs32) {
1276             /* initial map is: 32 => 16 */
1277             LPWAVEHDR           wh16 = MapSL(dwParam1);
1278             LPWAVEHDR           wh32 = *(LPWAVEHDR*)((LPSTR)wh16 - sizeof(LPWAVEHDR));
1279
1280             dwParam1 = (DWORD)wh32;
1281             wh32->dwFlags = wh16->dwFlags;
1282             wh32->dwBytesRecorded = wh16->dwBytesRecorded;
1283         } else if (!mld->bFrom32 && MMDrvs[mld->mmdIndex].bIs32) {
1284             /* initial map is: 16 => 32 */
1285             LPWAVEHDR           wh32 = (LPWAVEHDR)(dwParam1);
1286             SEGPTR              segwh16 = *(SEGPTR*)((LPSTR)wh32 - sizeof(LPWAVEHDR));
1287             LPWAVEHDR           wh16 = MapSL(segwh16);
1288
1289             dwParam1 = (DWORD)segwh16;
1290             wh16->dwFlags = wh32->dwFlags;
1291             wh16->dwBytesRecorded = wh32->dwBytesRecorded;
1292         }
1293         /* else { 16 => 16 or 32 => 32, nothing to do, same struct is kept }*/
1294         break;
1295     default:
1296         ERR("Unknown msg %u\n", uMsg);
1297     }
1298
1299     MMDRV_Callback(mld, hDev, uMsg, dwParam1, dwParam2);
1300 }
1301
1302 /* =================================
1303  *   W A V E  O U T  M A P P E R S
1304  * ================================= */
1305
1306 /**************************************************************************
1307  *                              MMDRV_WaveOut_Map16To32A        [internal]
1308  */
1309 static  MMDRV_MapType   MMDRV_WaveOut_Map16To32A  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
1310 {
1311     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
1312
1313     switch (wMsg) {
1314     /* nothing to do */
1315     case WODM_BREAKLOOP:
1316     case WODM_CLOSE:
1317     case WODM_GETNUMDEVS:
1318     case WODM_PAUSE:
1319     case WODM_RESET:
1320     case WODM_RESTART:
1321     case WODM_SETPITCH:
1322     case WODM_SETPLAYBACKRATE:
1323     case WODM_SETVOLUME:
1324         ret = MMDRV_MAP_OK;
1325         break;
1326
1327     case WODM_GETPITCH:
1328     case WODM_GETPLAYBACKRATE:
1329     case WODM_GETVOLUME:
1330     case WODM_OPEN:
1331         FIXME("Shouldn't be used: the corresponding 16 bit functions use the 32 bit interface\n");
1332         break;
1333
1334     case WODM_GETDEVCAPS:
1335         {
1336             LPWAVEOUTCAPSA              woc32 = HeapAlloc(GetProcessHeap(), 0, sizeof(LPWAVEOUTCAPS16) + sizeof(WAVEOUTCAPSA));
1337             LPWAVEOUTCAPS16             woc16 = MapSL(*lpParam1);
1338
1339             if (woc32) {
1340                 *(LPWAVEOUTCAPS16*)woc32 = woc16;
1341                 woc32 = (LPWAVEOUTCAPSA)((LPSTR)woc32 + sizeof(LPWAVEOUTCAPS16));
1342                 *lpParam1 = (DWORD)woc32;
1343                 *lpParam2 = sizeof(WAVEOUTCAPSA);
1344
1345                 ret = MMDRV_MAP_OKMEM;
1346             } else {
1347                 ret = MMDRV_MAP_NOMEM;
1348             }
1349         }
1350         break;
1351     case WODM_GETPOS:
1352         {
1353             LPMMTIME            mmt32 = HeapAlloc(GetProcessHeap(), 0, sizeof(LPMMTIME16) + sizeof(MMTIME));
1354             LPMMTIME16          mmt16 = MapSL(*lpParam1);
1355
1356             if (mmt32) {
1357                 *(LPMMTIME16*)mmt32 = mmt16;
1358                 mmt32 = (LPMMTIME)((LPSTR)mmt32 + sizeof(LPMMTIME16));
1359
1360                 mmt32->wType = mmt16->wType;
1361                 *lpParam1 = (DWORD)mmt32;
1362                 *lpParam2 = sizeof(MMTIME);
1363
1364                 ret = MMDRV_MAP_OKMEM;
1365             } else {
1366                 ret = MMDRV_MAP_NOMEM;
1367             }
1368         }
1369         break;
1370     case WODM_PREPARE:
1371         {
1372             LPWAVEHDR           wh32 = HeapAlloc(GetProcessHeap(), 0, sizeof(LPWAVEHDR) + sizeof(WAVEHDR));
1373             LPWAVEHDR           wh16 = MapSL(*lpParam1);
1374
1375             if (wh32) {
1376                 *(LPWAVEHDR*)wh32 = (LPWAVEHDR)*lpParam1;
1377                 wh32 = (LPWAVEHDR)((LPSTR)wh32 + sizeof(LPWAVEHDR));
1378                 wh32->lpData = MapSL((SEGPTR)wh16->lpData);
1379                 wh32->dwBufferLength = wh16->dwBufferLength;
1380                 wh32->dwBytesRecorded = wh16->dwBytesRecorded;
1381                 wh32->dwUser = wh16->dwUser;
1382                 wh32->dwFlags = wh16->dwFlags;
1383                 wh32->dwLoops = wh16->dwLoops;
1384                 /* FIXME: nothing on wh32->lpNext */
1385                 /* could link the wh32->lpNext at this level for memory house keeping */
1386                 wh16->lpNext = wh32; /* for reuse in unprepare and write */
1387                 *lpParam1 = (DWORD)wh32;
1388                 *lpParam2 = sizeof(WAVEHDR);
1389
1390                 ret = MMDRV_MAP_OKMEM;
1391             } else {
1392                 ret = MMDRV_MAP_NOMEM;
1393             }
1394         }
1395         break;
1396     case WODM_UNPREPARE:
1397     case WODM_WRITE:
1398         {
1399             LPWAVEHDR           wh16 = MapSL(*lpParam1);
1400             LPWAVEHDR           wh32 = (LPWAVEHDR)wh16->lpNext;
1401
1402             *lpParam1 = (DWORD)wh32;
1403             *lpParam2 = sizeof(WAVEHDR);
1404             /* dwBufferLength can be reduced between prepare & write */
1405             if (wh32->dwBufferLength < wh16->dwBufferLength) {
1406                 ERR("Size of buffer has been increased (%ld, %ld)\n",
1407                     wh32->dwBufferLength, wh16->dwBufferLength);
1408                 return MMDRV_MAP_MSGERROR;
1409             }
1410             wh32->dwBufferLength = wh16->dwBufferLength;
1411             ret = MMDRV_MAP_OKMEM;
1412         }
1413         break;
1414     default:
1415         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
1416         break;
1417     }
1418     return ret;
1419 }
1420
1421 /**************************************************************************
1422  *                              MMDRV_WaveOut_UnMap16To32A      [internal]
1423  */
1424 static  MMDRV_MapType   MMDRV_WaveOut_UnMap16To32A(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
1425 {
1426     MMDRV_MapType       ret = MMDRV_MAP_MSGERROR;
1427
1428     switch (wMsg) {
1429     /* nothing to do */
1430     case WODM_BREAKLOOP:
1431     case WODM_CLOSE:
1432     case WODM_GETNUMDEVS:
1433     case WODM_PAUSE:
1434     case WODM_RESET:
1435     case WODM_RESTART:
1436     case WODM_SETPITCH:
1437     case WODM_SETPLAYBACKRATE:
1438     case WODM_SETVOLUME:
1439         ret = MMDRV_MAP_OK;
1440         break;
1441
1442     case WODM_GETPITCH:
1443     case WODM_GETPLAYBACKRATE:
1444     case WODM_GETVOLUME:
1445     case WODM_OPEN:
1446         FIXME("Shouldn't be used: those 16 bit functions use the 32 bit interface\n");
1447         break;
1448
1449     case WODM_GETDEVCAPS:
1450         {
1451             LPWAVEOUTCAPSA              woc32 = (LPWAVEOUTCAPSA)(*lpParam1);
1452             LPWAVEOUTCAPS16             woc16 = *(LPWAVEOUTCAPS16*)((LPSTR)woc32 - sizeof(LPWAVEOUTCAPS16));
1453
1454             woc16->wMid = woc32->wMid;
1455             woc16->wPid = woc32->wPid;
1456             woc16->vDriverVersion = woc32->vDriverVersion;
1457             strcpy(woc16->szPname, woc32->szPname);
1458             woc16->dwFormats = woc32->dwFormats;
1459             woc16->wChannels = woc32->wChannels;
1460             woc16->dwSupport = woc32->dwSupport;
1461             HeapFree(GetProcessHeap(), 0, (LPSTR)woc32 - sizeof(LPWAVEOUTCAPS16));
1462             ret = MMDRV_MAP_OK;
1463         }
1464         break;
1465     case WODM_GETPOS:
1466         {
1467             LPMMTIME            mmt32 = (LPMMTIME)(*lpParam1);
1468             LPMMTIME16          mmt16 = *(LPMMTIME16*)((LPSTR)mmt32 - sizeof(LPMMTIME16));
1469
1470             MMSYSTEM_MMTIME32to16(mmt16, mmt32);
1471             HeapFree(GetProcessHeap(), 0, (LPSTR)mmt32 - sizeof(LPMMTIME16));
1472             ret = MMDRV_MAP_OK;
1473         }
1474         break;
1475     case WODM_PREPARE:
1476     case WODM_UNPREPARE:
1477     case WODM_WRITE:
1478         {
1479             LPWAVEHDR           wh32 = (LPWAVEHDR)(*lpParam1);
1480             LPWAVEHDR           wh16 = MapSL(*(SEGPTR*)((LPSTR)wh32 - sizeof(LPWAVEHDR)));
1481
1482             assert(wh16->lpNext == wh32);
1483             wh16->dwBufferLength = wh32->dwBufferLength;
1484             wh16->dwBytesRecorded = wh32->dwBytesRecorded;
1485             wh16->dwUser = wh32->dwUser;
1486             wh16->dwFlags = wh32->dwFlags;
1487             wh16->dwLoops = wh32->dwLoops;
1488
1489             if (wMsg == WODM_UNPREPARE) {
1490                 HeapFree(GetProcessHeap(), 0, (LPSTR)wh32 - sizeof(LPWAVEHDR));
1491                 wh16->lpNext = 0;
1492             }
1493             ret = MMDRV_MAP_OK;
1494         }
1495         break;
1496     default:
1497         FIXME("NIY: no conversion yet for %u [%lx,%lx]\n", wMsg, *lpParam1, *lpParam2);
1498         break;
1499     }
1500     return ret;
1501 }
1502
1503 /**************************************************************************
1504  *                              MMDRV_WaveOut_Map32ATo16        [internal]
1505  */
1506 static  MMDRV_MapType   MMDRV_WaveOut_Map32ATo16  (UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
1507 {
1508     MMDRV_MapType       ret;
1509
1510     switch (wMsg) {
1511         /* nothing to do */
1512     case WODM_BREAKLOOP:
1513     case WODM_CLOSE:
1514     case WODM_GETNUMDEVS:
1515     case WODM_PAUSE:
1516     case WODM_RESET:
1517     case WODM_RESTART:
1518     case WODM_SETPITCH:
1519     case WODM_SETPLAYBACKRATE:
1520     case WODM_SETVOLUME:
1521         ret = MMDRV_MAP_OK;
1522         break;
1523
1524     case WODM_GETDEVCAPS:
1525         {
1526             LPWAVEOUTCAPSA              woc32 = (LPWAVEOUTCAPSA)*lpParam1;
1527             LPSTR                       ptr = SEGPTR_ALLOC(sizeof(LPWAVEOUTCAPSA) + sizeof(WAVEOUTCAPS16));
1528
1529             if (ptr) {
1530                 *(LPWAVEOUTCAPSA*)ptr = woc32;
1531                 ret = MMDRV_MAP_OKMEM;
1532             } else {
1533                 ret = MMDRV_MAP_NOMEM;
1534             }
1535             *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEOUTCAPSA);
1536             *lpParam2 = sizeof(WAVEOUTCAPS16);
1537         }
1538         break;
1539     case WODM_GETPITCH:
1540         FIXME("NIY: no conversion yet\n");
1541         ret = MMDRV_MAP_MSGERROR;
1542         break;
1543     case WODM_GETPLAYBACKRATE:
1544         FIXME("NIY: no conversion yet\n");
1545         ret = MMDRV_MAP_MSGERROR;
1546         break;
1547     case WODM_GETPOS:
1548         {
1549             LPMMTIME            mmt32 = (LPMMTIME)*lpParam1;
1550             LPSTR               ptr = SEGPTR_ALLOC(sizeof(LPMMTIME) + sizeof(MMTIME16));
1551             LPMMTIME16          mmt16 = (LPMMTIME16)(ptr + sizeof(LPMMTIME));
1552
1553             if (ptr) {
1554                 *(LPMMTIME*)ptr = mmt32;
1555                 mmt16->wType = mmt32->wType;
1556                 ret = MMDRV_MAP_OKMEM;
1557             } else {
1558                 ret = MMDRV_MAP_NOMEM;
1559             }
1560             *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPMMTIME);
1561             *lpParam2 = sizeof(MMTIME16);
1562         }
1563         break;
1564     case WODM_GETVOLUME:
1565         FIXME("NIY: no conversion yet\n");
1566         ret = MMDRV_MAP_MSGERROR;
1567         break;
1568     case WODM_OPEN:
1569         {
1570             LPWAVEOPENDESC              wod32 = (LPWAVEOPENDESC)*lpParam1;
1571             int                         sz = sizeof(WAVEFORMATEX);
1572             LPVOID                      ptr;
1573             LPWAVEOPENDESC16            wod16;
1574
1575             /* allocated data are mapped as follows:
1576                LPWAVEOPENDESC   ptr to orig lParam1
1577                DWORD            orig dwUser, which is a pointer to DWORD:driver dwInstance
1578                DWORD            dwUser passed to driver
1579                WAVEOPENDESC16   wod16: openDesc passed to driver
1580                WAVEFORMATEX     openDesc->lpFormat passed to driver
1581                xxx              extra bytes to WAVEFORMATEX
1582             */
1583             if (wod32->lpFormat->wFormatTag != WAVE_FORMAT_PCM) {
1584                 TRACE("Allocating %u extra bytes (%d)\n", ((LPWAVEFORMATEX)wod32->lpFormat)->cbSize, wod32->lpFormat->wFormatTag);
1585                 sz += ((LPWAVEFORMATEX)wod32->lpFormat)->cbSize;
1586             }
1587
1588             ptr = SEGPTR_ALLOC(sizeof(LPWAVEOPENDESC) + 2*sizeof(DWORD) + sizeof(WAVEOPENDESC16) + sz);
1589
1590             if (ptr) {
1591                 *(LPWAVEOPENDESC*)ptr = wod32;
1592                 *(LPDWORD)(ptr + sizeof(LPWAVEOPENDESC)) = *lpdwUser;
1593                 wod16 = (LPWAVEOPENDESC16)((LPSTR)ptr + sizeof(LPWAVEOPENDESC) + 2*sizeof(DWORD));
1594
1595                 wod16->hWave = wod32->hWave;
1596                 wod16->lpFormat = (LPWAVEFORMATEX)((DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEOPENDESC) + 2*sizeof(DWORD) + sizeof(WAVEOPENDESC16));
1597                 memcpy(wod16 + 1, wod32->lpFormat, sz);
1598
1599                 wod16->dwCallback = wod32->dwCallback;
1600                 wod16->dwInstance = wod32->dwInstance;
1601                 wod16->uMappedDeviceID = wod32->uMappedDeviceID;
1602                 wod16->dnDevNode = wod32->dnDevNode;
1603
1604                 *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEOPENDESC) + 2*sizeof(DWORD);
1605                 *lpdwUser = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEOPENDESC) + sizeof(DWORD);
1606
1607                 ret = MMDRV_MAP_OKMEM;
1608             } else {
1609                 ret = MMDRV_MAP_NOMEM;
1610             }
1611         }
1612         break;
1613     case WODM_PREPARE:
1614         {
1615             LPWAVEHDR           wh32 = (LPWAVEHDR)*lpParam1;
1616             LPWAVEHDR           wh16;
1617             LPVOID              ptr = SEGPTR_ALLOC(sizeof(LPWAVEHDR) + sizeof(WAVEHDR) + wh32->dwBufferLength);
1618
1619             if (ptr) {
1620                 *(LPWAVEHDR*)ptr = wh32;
1621                 wh16 = (LPWAVEHDR)((LPSTR)ptr + sizeof(LPWAVEHDR));
1622                 wh16->lpData = (LPSTR)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR) + sizeof(WAVEHDR);
1623                 /* data will be copied on WODM_WRITE */
1624                 wh16->dwBufferLength = wh32->dwBufferLength;
1625                 wh16->dwBytesRecorded = wh32->dwBytesRecorded;
1626                 wh16->dwUser = wh32->dwUser;
1627                 wh16->dwFlags = wh32->dwFlags;
1628                 wh16->dwLoops = wh32->dwLoops;
1629                 /* FIXME: nothing on wh32->lpNext */
1630                 /* could link the wh32->lpNext at this level for memory house keeping */
1631                 wh32->lpNext = wh16; /* for reuse in unprepare and write */
1632                 TRACE("wh16=%08lx wh16->lpData=%08lx wh32->buflen=%lu wh32->lpData=%08lx\n",
1633                       (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR), (DWORD)wh16->lpData,
1634                       wh32->dwBufferLength, (DWORD)wh32->lpData);
1635                 *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR);
1636                 *lpParam2 = sizeof(WAVEHDR);
1637
1638                 ret = MMDRV_MAP_OKMEM;
1639             } else {
1640                 ret = MMDRV_MAP_NOMEM;
1641             }
1642         }
1643         break;
1644     case WODM_UNPREPARE:
1645     case WODM_WRITE:
1646         {
1647             LPWAVEHDR           wh32 = (LPWAVEHDR)(*lpParam1);
1648             LPWAVEHDR           wh16 = wh32->lpNext;
1649             LPSTR               ptr = (LPSTR)wh16 - sizeof(LPWAVEHDR);
1650
1651             assert(*(LPWAVEHDR*)ptr == wh32);
1652
1653             TRACE("wh16=%08lx wh16->lpData=%08lx wh32->buflen=%lu wh32->lpData=%08lx\n",
1654                   (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR), (DWORD)wh16->lpData,
1655                   wh32->dwBufferLength, (DWORD)wh32->lpData);
1656
1657             if (wMsg == WODM_WRITE)
1658                 memcpy((LPSTR)wh16 + sizeof(WAVEHDR), wh32->lpData, wh32->dwBufferLength);
1659
1660             *lpParam1 = (DWORD)SEGPTR_GET(ptr) + sizeof(LPWAVEHDR);
1661             *lpParam2 = sizeof(WAVEHDR);
1662             /* dwBufferLength can be reduced between prepare & write */
1663             if (wh16->dwBufferLength < wh32->dwBufferLength) {
1664                 ERR("Size of buffer has been increased (%ld, %ld)\n",
1665                     wh16->dwBufferLength, wh32->dwBufferLength);
1666                 return MMDRV_MAP_MSGERROR;
1667             }
1668             wh16->dwBufferLength = wh32->dwBufferLength;
1669             ret = MMDRV_MAP_OKMEM;
1670         }
1671         break;
1672     default:
1673         FIXME("NIY: no conversion yet\n");
1674         ret = MMDRV_MAP_MSGERROR;
1675         break;
1676     }
1677     return ret;
1678 }
1679
1680 /**************************************************************************
1681  *                              MMDRV_WaveOut_UnMap32ATo16      [internal]
1682  */
1683 static  MMDRV_MapType   MMDRV_WaveOut_UnMap32ATo16(UINT wMsg, LPDWORD lpdwUser, LPDWORD lpParam1, LPDWORD lpParam2)
1684 {
1685     MMDRV_MapType       ret;
1686
1687     switch (wMsg) {
1688         /* nothing to do */
1689     case WODM_BREAKLOOP:
1690     case WODM_CLOSE:
1691     case WODM_GETNUMDEVS:
1692     case WODM_PAUSE:
1693     case WODM_RESET:
1694     case WODM_RESTART:
1695     case WODM_SETPITCH:
1696     case WODM_SETPLAYBACKRATE:
1697     case WODM_SETVOLUME:
1698         ret = MMDRV_MAP_OK;
1699         break;
1700
1701     case WODM_GETDEVCAPS:
1702         {
1703             LPWAVEOUTCAPS16             woc16 = MapSL(*lpParam1);
1704             LPSTR                       ptr   = (LPSTR)woc16 - sizeof(LPWAVEOUTCAPSA);
1705             LPWAVEOUTCAPSA              woc32 = *(LPWAVEOUTCAPSA*)ptr;
1706
1707             woc32->wMid = woc16->wMid;
1708             woc32->wPid = woc16->wPid;
1709             woc32->vDriverVersion = woc16->vDriverVersion;
1710             strcpy(woc32->szPname, woc16->szPname);
1711             woc32->dwFormats = woc16->dwFormats;
1712             woc32->wChannels = woc16->wChannels;
1713             woc32->dwSupport = woc16->dwSupport;
1714             if (!SEGPTR_FREE(ptr))
1715                 FIXME("bad free line=%d\n", __LINE__);
1716             ret = MMDRV_MAP_OK;
1717         }
1718         break;
1719     case WODM_GETPITCH:
1720         FIXME("NIY: no conversion yet\n");
1721         ret = MMDRV_MAP_MSGERROR;
1722         break;
1723     case WODM_GETPLAYBACKRATE:
1724         FIXME("NIY: no conversion yet\n");
1725         ret = MMDRV_MAP_MSGERROR;
1726         break;
1727     case WODM_GETPOS:
1728         {
1729             LPMMTIME16          mmt16 = MapSL(*lpParam1);
1730             LPSTR               ptr   = (LPSTR)mmt16 - sizeof(LPMMTIME);
1731             LPMMTIME            mmt32 = *(LPMMTIME*)ptr;
1732
1733             MMSYSTEM_MMTIME16to32(mmt32, mmt16);
1734
1735             if (!SEGPTR_FREE(ptr))
1736                 FIXME("bad free line=%d\n", __LINE__);
1737
1738             ret = MMDRV_MAP_OK;
1739         }
1740         break;
1741     case WODM_OPEN:
1742         {
1743             LPWAVEOPENDESC16            wod16 = MapSL(*lpParam1);
1744             LPSTR                       ptr   = (LPSTR)wod16 - sizeof(LPWAVEOPENDESC) - 2*sizeof(DWORD);
1745             LPWAVEOPENDESC              wod32 = *(LPWAVEOPENDESC*)ptr;
1746
1747             wod32->uMappedDeviceID = wod16->uMappedDeviceID;
1748             **(DWORD**)(ptr + sizeof(LPWAVEOPENDESC)) = *(LPDWORD)(ptr + sizeof(LPWAVEOPENDESC) + sizeof(DWORD));
1749
1750             if (!SEGPTR_FREE(ptr))
1751                 FIXME("bad free line=%d\n", __LINE__);
1752
1753             ret = MMDRV_MAP_OK;
1754         }
1755         break;
1756     case WODM_PREPARE:
1757     case WODM_UNPREPARE:
1758     case WODM_WRITE:
1759         {
1760             LPWAVEHDR           wh16 = MapSL(*lpParam1);
1761             LPSTR               ptr = (LPSTR)wh16 - sizeof(LPWAVEHDR);
1762             LPWAVEHDR           wh32 = *(LPWAVEHDR*)ptr;
1763
1764             assert(wh32->lpNext == wh16);
1765             wh32->dwBytesRecorded = wh16->dwBytesRecorded;
1766             wh32->dwUser = wh16->dwUser;
1767             wh32->dwFlags = wh16->dwFlags;
1768             wh32->dwLoops = wh16->dwLoops;
1769
1770             if (wMsg == WODM_UNPREPARE) {
1771                 if (!SEGPTR_FREE(ptr))
1772                     FIXME("bad free line=%d\n", __LINE__);
1773                 wh32->lpNext = 0;
1774             }
1775             ret = MMDRV_MAP_OK;
1776         }
1777         break;
1778     case WODM_GETVOLUME:
1779         FIXME("NIY: no conversion yet\n");
1780         ret = MMDRV_MAP_MSGERROR;
1781         break;
1782     default:
1783         FIXME("NIY: no conversion yet\n");
1784         ret = MMDRV_MAP_MSGERROR;
1785         break;
1786     }
1787     return ret;
1788 }
1789
1790 /**************************************************************************
1791  *                              MMDRV_WaveOut_Callback          [internal]
1792  */
1793 static void     CALLBACK MMDRV_WaveOut_Callback(HDRVR hDev, UINT uMsg, DWORD dwInstance, DWORD dwParam1, DWORD dwParam2)
1794 {
1795     LPWINE_MLD  mld = (LPWINE_MLD)dwInstance;
1796
1797     switch (uMsg) {
1798     case WOM_OPEN:
1799     case WOM_CLOSE:
1800         /* dwParam1 & dwParam2 are supposed to be 0, nothing to do */
1801         break;
1802     case WOM_DONE:
1803         if (mld->bFrom32 && !MMDrvs[mld->mmdIndex].bIs32) {
1804             /* initial map is: 32 => 16 */
1805             LPWAVEHDR           wh16 = MapSL(dwParam1);
1806             LPWAVEHDR           wh32 = *(LPWAVEHDR*)((LPSTR)wh16 - sizeof(LPWAVEHDR));
1807
1808             dwParam1 = (DWORD)wh32;
1809             wh32->dwFlags = wh16->dwFlags;
1810         } else if (!mld->bFrom32 && MMDrvs[mld->mmdIndex].bIs32) {
1811             /* initial map is: 16 => 32 */
1812             LPWAVEHDR           wh32 = (LPWAVEHDR)(dwParam1);
1813             SEGPTR              segwh16 = *(SEGPTR*)((LPSTR)wh32 - sizeof(LPWAVEHDR));
1814             LPWAVEHDR           wh16 = MapSL(segwh16);
1815
1816             dwParam1 = (DWORD)segwh16;
1817             wh16->dwFlags = wh32->dwFlags;
1818         }
1819         /* else { 16 => 16 or 32 => 32, nothing to do, same struct is kept }*/
1820         break;
1821     default:
1822         ERR("Unknown msg %u\n", uMsg);
1823     }
1824
1825     MMDRV_Callback(mld, hDev, uMsg, dwParam1, dwParam2);
1826 }
1827
1828 #define A(_x,_y) {#_y, _x, \
1829 MMDRV_##_y##_Map16To32A, MMDRV_##_y##_UnMap16To32A, \
1830 MMDRV_##_y##_Map32ATo16, MMDRV_##_y##_UnMap32ATo16, \
1831 MMDRV_##_y##_Callback, 0, NULL, -1}
1832
1833 /* Note: the indices of this array must match the definitions
1834  *       of the MMDRV_???? manifest constants
1835  */
1836 static WINE_LLTYPE      llTypes[MMDRV_MAX] = {
1837     A(TRUE,  Aux),
1838     A(FALSE, Mixer),
1839     A(TRUE,  MidiIn),
1840     A(TRUE,  MidiOut),
1841     A(TRUE,  WaveIn),
1842     A(TRUE,  WaveOut),
1843 };
1844 #undef A
1845
1846 /**************************************************************************
1847  *                      MMDRV_GetNum                            [internal]
1848  */
1849 UINT    MMDRV_GetNum(UINT type)
1850 {
1851     assert(type < MMDRV_MAX);
1852     return llTypes[type].wMaxId;
1853 }
1854
1855 /**************************************************************************
1856  *                              WINE_Message                    [internal]
1857  */
1858 DWORD   MMDRV_Message(LPWINE_MLD mld, WORD wMsg, DWORD dwParam1,
1859                       DWORD dwParam2, BOOL bFrom32)
1860 {
1861     LPWINE_MM_DRIVER            lpDrv;
1862     DWORD                       ret;
1863     WINE_MM_DRIVER_PART*        part;
1864     WINE_LLTYPE*                llType = &llTypes[mld->type];
1865     MMDRV_MapType               map;
1866     int                         devID;
1867
1868     TRACE("(%s %u %u 0x%08lx 0x%08lx 0x%08lx %c)!\n",
1869           llTypes[mld->type].name, mld->uDeviceID, wMsg,
1870           mld->dwDriverInstance, dwParam1, dwParam2, bFrom32?'Y':'N');
1871
1872     if (mld->uDeviceID == (UINT16)-1) {
1873         if (!llType->bSupportMapper) {
1874             WARN("uDev=-1 requested on non-mappable ll type %s\n",
1875                  llTypes[mld->type].name);
1876             return MMSYSERR_BADDEVICEID;
1877         }
1878         devID = -1;
1879     } else {
1880         if (mld->uDeviceID >= llType->wMaxId) {
1881             WARN("uDev(%u) requested >= max (%d)\n", mld->uDeviceID, llType->wMaxId);
1882             return MMSYSERR_BADDEVICEID;
1883         }
1884         devID = mld->uDeviceID;
1885     }
1886
1887     lpDrv = &MMDrvs[mld->mmdIndex];
1888     part = &lpDrv->parts[mld->type];
1889
1890 #if 0
1891     /* some sanity checks */
1892     if (!(part->nIDMin <= devID))
1893         ERR("!(part->nIDMin(%d) <= devID(%d))\n", part->nIDMin, devID);
1894     if (!(devID < part->nIDMax))
1895         ERR("!(devID(%d) < part->nIDMax(%d))\n", devID, part->nIDMax);
1896 #endif
1897
1898     if (lpDrv->bIs32) {
1899         assert(part->u.fnMessage32);
1900
1901         if (bFrom32) {
1902             TRACE("Calling message(dev=%u msg=%u usr=0x%08lx p1=0x%08lx p2=0x%08lx\n",
1903                   mld->uDeviceID, wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
1904             ret = part->u.fnMessage32(mld->uDeviceID, wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
1905             TRACE("=> %lu\n", ret);
1906         } else {
1907             map = llType->Map16To32A(wMsg, &mld->dwDriverInstance, &dwParam1, &dwParam2);
1908             switch (map) {
1909             case MMDRV_MAP_NOMEM:
1910                 ret = MMSYSERR_NOMEM;
1911                 break;
1912             case MMDRV_MAP_MSGERROR:
1913                 FIXME("NIY: no conversion yet 16->32 (%u)\n", wMsg);
1914                 ret = MMSYSERR_ERROR;
1915                 break;
1916             case MMDRV_MAP_OK:
1917             case MMDRV_MAP_OKMEM:
1918                 TRACE("Calling message(dev=%u msg=%u usr=0x%08lx p1=0x%08lx p2=0x%08lx\n",
1919                       mld->uDeviceID, wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
1920                 ret = part->u.fnMessage32(mld->uDeviceID, wMsg, mld->dwDriverInstance,
1921                                           dwParam1, dwParam2);
1922                 TRACE("=> %lu\n", ret);
1923                 if (map == MMDRV_MAP_OKMEM)
1924                     llType->UnMap16To32A(wMsg, &mld->dwDriverInstance, &dwParam1, &dwParam2);
1925                 break;
1926             default:
1927             case MMDRV_MAP_PASS:
1928                 FIXME("NIY: pass used ?\n");
1929                 ret = MMSYSERR_NOTSUPPORTED;
1930                 break;
1931             }
1932         }
1933     } else {
1934         assert(part->u.fnMessage16);
1935
1936         if (bFrom32) {
1937             map = llType->Map32ATo16(wMsg, &mld->dwDriverInstance, &dwParam1, &dwParam2);
1938             switch (map) {
1939             case MMDRV_MAP_NOMEM:
1940                 ret = MMSYSERR_NOMEM;
1941                 break;
1942             case MMDRV_MAP_MSGERROR:
1943                 FIXME("NIY: no conversion yet 32->16 (%u)\n", wMsg);
1944                 ret = MMSYSERR_ERROR;
1945                 break;
1946             case MMDRV_MAP_OK:
1947             case MMDRV_MAP_OKMEM:
1948                 TRACE("Calling message(dev=%u msg=%u usr=0x%08lx p1=0x%08lx p2=0x%08lx\n",
1949                       mld->uDeviceID, wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
1950                 ret = MMDRV_CallTo16_word_wwlll((FARPROC16)part->u.fnMessage16, mld->uDeviceID,
1951                                                 wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
1952                 TRACE("=> %lu\n", ret);
1953                 if (map == MMDRV_MAP_OKMEM)
1954                     llType->UnMap32ATo16(wMsg, &mld->dwDriverInstance, &dwParam1, &dwParam2);
1955                 break;
1956             default:
1957             case MMDRV_MAP_PASS:
1958                 FIXME("NIY: pass used ?\n");
1959                 ret = MMSYSERR_NOTSUPPORTED;
1960                 break;
1961             }
1962         } else {
1963             TRACE("Calling message(dev=%u msg=%u usr=0x%08lx p1=0x%08lx p2=0x%08lx\n",
1964                   mld->uDeviceID, wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
1965             ret = MMDRV_CallTo16_word_wwlll((FARPROC16)part->u.fnMessage16, mld->uDeviceID,
1966                                             wMsg, mld->dwDriverInstance, dwParam1, dwParam2);
1967             TRACE("=> %lu\n", ret);
1968         }
1969     }
1970     return ret;
1971 }
1972
1973 /**************************************************************************
1974  *                              MMDRV_Alloc                     [internal]
1975  */
1976 LPWINE_MLD      MMDRV_Alloc(UINT size, UINT type, LPHANDLE hndl, DWORD* dwFlags,
1977                             DWORD* dwCallback, DWORD* dwInstance, BOOL bFrom32)
1978 {
1979     LPWINE_MLD  mld;
1980
1981     mld = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, size);
1982     if (!mld)   return NULL;
1983
1984     /* find an empty slot in MM_MLDrvs table */
1985     for (*hndl = 0; *hndl < MAX_MM_MLDRVS; (*hndl)++) {
1986         if (!MM_MLDrvs[*hndl]) break;
1987     }
1988     if (*hndl == MAX_MM_MLDRVS) {
1989         /* the MM_MLDrvs table could be made growable in the future if needed */
1990         ERR("Too many open drivers\n");
1991         return NULL;
1992     }
1993     MM_MLDrvs[*hndl] = mld;
1994     *hndl |= 0x8000;
1995
1996     mld->type = type;
1997     if ((UINT)*hndl < MMDRV_GetNum(type) || HIWORD(*hndl) != 0) {
1998         /* FIXME: those conditions must be fulfilled so that:
1999          * - we can distinguish between device IDs and handles
2000          * - we can use handles as 16 or 32 bit entities
2001          */
2002         ERR("Shouldn't happen. Bad allocation scheme\n");
2003     }
2004
2005     mld->bFrom32 = bFrom32;
2006     mld->dwFlags = HIWORD(*dwFlags);
2007     mld->dwCallback = *dwCallback;
2008     mld->dwClientInstance = *dwInstance;
2009
2010     *dwFlags = LOWORD(*dwFlags) | CALLBACK_FUNCTION;
2011     *dwCallback = (DWORD)llTypes[type].Callback;
2012     *dwInstance = (DWORD)mld; /* FIXME: wouldn't some 16 bit drivers only use the loword ? */
2013
2014     return mld;
2015 }
2016
2017 /**************************************************************************
2018  *                              MMDRV_Free                      [internal]
2019  */
2020 void    MMDRV_Free(HANDLE hndl, LPWINE_MLD mld)
2021 {
2022     if (hndl & 0x8000) {
2023         unsigned idx = hndl & ~0x8000;
2024         if (idx < sizeof(MM_MLDrvs) / sizeof(MM_MLDrvs[0])) {
2025             MM_MLDrvs[idx] = NULL;
2026             HeapFree(GetProcessHeap(), 0, mld);
2027             return;
2028         }
2029     }
2030     ERR("Bad Handle %08x at %p (not freed)\n", hndl, mld);
2031 }
2032
2033 /**************************************************************************
2034  *                              MMDRV_Open                      [internal]
2035  */
2036 DWORD   MMDRV_Open(LPWINE_MLD mld, UINT wMsg, DWORD dwParam1, DWORD dwFlags)
2037 {
2038     DWORD               dwRet = MMSYSERR_BADDEVICEID;
2039     DWORD               dwInstance;
2040     WINE_LLTYPE*        llType = &llTypes[mld->type];
2041
2042     mld->dwDriverInstance = (DWORD)&dwInstance;
2043
2044     if (mld->uDeviceID == (UINT)-1 || mld->uDeviceID == (UINT16)-1) {
2045         TRACE("MAPPER mode requested !\n");
2046         /* check if mapper is supported by type */
2047         if (llType->bSupportMapper) {
2048             if (llType->nMapper == -1) {
2049                 /* no driver for mapper has been loaded, try a dumb implementation */
2050                 TRACE("No mapper loaded, doing it by hand\n");
2051                 for (mld->uDeviceID = 0; mld->uDeviceID < llType->wMaxId; mld->uDeviceID++) {
2052                     if ((dwRet = MMDRV_Open(mld, wMsg, dwParam1, dwFlags)) == MMSYSERR_NOERROR) {
2053                         /* to share this function epilog */
2054                         dwInstance = mld->dwDriverInstance;
2055                         break;
2056                     }
2057                 }
2058             } else {
2059                 mld->uDeviceID = (UINT16)-1;
2060                 mld->mmdIndex = llType->lpMlds[-1].mmdIndex;
2061                 TRACE("Setting mmdIndex to %u\n", mld->mmdIndex);
2062                 dwRet = MMDRV_Message(mld, wMsg, dwParam1, dwFlags, TRUE);
2063             }
2064         }
2065     } else {
2066         if (mld->uDeviceID < llType->wMaxId) {
2067             mld->mmdIndex = llType->lpMlds[mld->uDeviceID].mmdIndex;
2068             TRACE("Setting mmdIndex to %u\n", mld->mmdIndex);
2069             dwRet = MMDRV_Message(mld, wMsg, dwParam1, dwFlags, TRUE);
2070         }
2071     }
2072     if (dwRet == MMSYSERR_NOERROR)
2073         mld->dwDriverInstance = dwInstance;
2074     return dwRet;
2075 }
2076
2077 /**************************************************************************
2078  *                              MMDRV_Close                     [internal]
2079  */
2080 DWORD   MMDRV_Close(LPWINE_MLD mld, UINT wMsg)
2081 {
2082     return MMDRV_Message(mld, wMsg, 0L, 0L, TRUE);
2083 }
2084
2085 /**************************************************************************
2086  *                              MMDRV_GetByID                   [internal]
2087  */
2088 LPWINE_MLD      MMDRV_GetByID(UINT uDevID, UINT type)
2089 {
2090     if (uDevID < llTypes[type].wMaxId)
2091         return &llTypes[type].lpMlds[uDevID];
2092     if ((uDevID == (UINT16)-1 || uDevID == (UINT)-1) && llTypes[type].nMapper != -1)
2093         return &llTypes[type].lpMlds[-1];
2094     return NULL;
2095 }
2096
2097 /**************************************************************************
2098  *                              MMDRV_Get                       [internal]
2099  */
2100 LPWINE_MLD      MMDRV_Get(HANDLE hndl, UINT type, BOOL bCanBeID)
2101 {
2102     LPWINE_MLD  mld = NULL;
2103
2104     assert(type < MMDRV_MAX);
2105
2106     if ((UINT)hndl >= llTypes[type].wMaxId) {
2107         if (hndl & 0x8000) {
2108             hndl &= ~0x8000;
2109             if (hndl < sizeof(MM_MLDrvs) / sizeof(MM_MLDrvs[0])) {
2110                 mld = MM_MLDrvs[hndl];
2111                 if (!mld || !HeapValidate(GetProcessHeap(), 0, mld) || mld->type != type)
2112                     mld = NULL;
2113             }
2114         }
2115     }
2116     if (mld == NULL && bCanBeID) {
2117         mld = MMDRV_GetByID((UINT)hndl, type);
2118     }
2119     return mld;
2120 }
2121
2122 /**************************************************************************
2123  *                              MMDRV_GetRelated                [internal]
2124  */
2125 LPWINE_MLD      MMDRV_GetRelated(HANDLE hndl, UINT srcType,
2126                                  BOOL bSrcCanBeID, UINT dstType)
2127 {
2128     LPWINE_MLD          mld;
2129
2130     if ((mld = MMDRV_Get(hndl, srcType, bSrcCanBeID)) != NULL) {
2131         WINE_MM_DRIVER_PART*    part = &MMDrvs[mld->mmdIndex].parts[dstType];
2132         if (part->nIDMin < part->nIDMax)
2133             return MMDRV_GetByID(part->nIDMin, dstType);
2134     }
2135     return NULL;
2136 }
2137
2138 /**************************************************************************
2139  *                              MMDRV_PhysicalFeatures          [internal]
2140  */
2141 UINT    MMDRV_PhysicalFeatures(LPWINE_MLD mld, UINT uMsg, DWORD dwParam1,
2142                                DWORD dwParam2)
2143 {
2144     WINE_MM_DRIVER*     lpDrv = &MMDrvs[mld->mmdIndex];
2145
2146     TRACE("(%p, %04x, %08lx, %08lx)\n", mld, uMsg, dwParam1, dwParam2);
2147
2148     /* all those function calls are undocumented */
2149     switch (uMsg) {
2150     case 0x801: /* DRV_QUERYDRVENTRY */
2151         lstrcpynA((LPSTR)dwParam1, lpDrv->name, LOWORD(dwParam2));
2152         break;
2153     case 0x802: /* DRV_QUERYDEVNODE */
2154         *(LPDWORD)dwParam1 = 0L; /* should be DevNode */
2155         break;
2156     case 0x803: /* DRV_QUERYNAME */
2157         WARN("NIY 0x803\n");
2158         break;
2159     case 0x804: /* DRV_QUERYDRIVERIDS */
2160         WARN("NIY call VxD\n");
2161         /* should call VxD MMDEVLDR with (DevNode, dwParam1 and dwParam2) as pmts
2162          * dwParam1 is buffer and dwParam2 is sizeof buffer
2163          * I don't know where the result is stored though
2164          */
2165         break;
2166     case 0x805: /* DRV_QUERYMAPPABLE */
2167         return (lpDrv->bIsMapper) ? 2 : 0;
2168
2169     case 0x810: /* Wine-specific: Retrieve DirectSound interface */
2170         return MMDRV_Message(mld, uMsg, dwParam1, dwParam2, TRUE);
2171
2172     default:
2173         WARN("Unknown call %04x\n", uMsg);
2174         return MMSYSERR_INVALPARAM;
2175     }
2176     return 0L;
2177 }
2178
2179 /**************************************************************************
2180  *                              MMDRV_InitPerType               [internal]
2181  */
2182 static  BOOL    MMDRV_InitPerType(LPWINE_MM_DRIVER lpDrv, UINT num,
2183                                   UINT type, UINT wMsg)
2184 {
2185     WINE_MM_DRIVER_PART*        part = &lpDrv->parts[type];
2186     DWORD                       ret;
2187     UINT                        count = 0;
2188     int                         i, k;
2189
2190     part->nIDMin = part->nIDMax = 0;
2191
2192     /* for DRVM_INIT and DRVM_ENABLE, dwParam2 should be PnP node */
2193     /* the DRVM_ENABLE is only required when the PnP node is non zero */
2194
2195     if (lpDrv->bIs32 && part->u.fnMessage32) {
2196         ret = part->u.fnMessage32(0, DRVM_INIT, 0L, 0L, 0L);
2197         TRACE("DRVM_INIT => %08lx\n", ret);
2198 #if 0
2199         ret = part->u.fnMessage32(0, DRVM_ENABLE, 0L, 0L, 0L);
2200         TRACE("DRVM_ENABLE => %08lx\n", ret);
2201 #endif
2202         count = part->u.fnMessage32(0, wMsg, 0L, 0L, 0L);
2203     }
2204
2205     if (!lpDrv->bIs32 && part->u.fnMessage16) {
2206         ret = MMDRV_CallTo16_word_wwlll((FARPROC16)part->u.fnMessage16,
2207                                         0, DRVM_INIT, 0L, 0L, 0L);
2208         TRACE("DRVM_INIT => %08lx\n", ret);
2209 #if 0
2210         ret = MMDRV_CallTo16_word_wwlll((FARPROC16)part->u.fnMessage16,
2211                                         0, DRVM_ENABLE, 0L, 0L, 0L);
2212         TRACE("DRVM_ENABLE => %08lx\n", ret);
2213 #endif
2214         count = MMDRV_CallTo16_word_wwlll((FARPROC16)part->u.fnMessage16,
2215                                           0, wMsg, 0L, 0L, 0L);
2216     }
2217
2218     TRACE("Got %u dev for (%s:%s)\n", count, lpDrv->name, llTypes[type].name);
2219     if (count == 0)
2220         return FALSE;
2221
2222     /* got some drivers */
2223     if (lpDrv->bIsMapper) {
2224         if (llTypes[type].nMapper != -1)
2225             ERR("Two mappers for type %s (%d, %s)\n",
2226                 llTypes[type].name, llTypes[type].nMapper, lpDrv->name);
2227         if (count > 1)
2228             ERR("Strange: mapper with %d > 1 devices\n", count);
2229         llTypes[type].nMapper = num;
2230     } else {
2231         part->nIDMin = llTypes[type].wMaxId;
2232         llTypes[type].wMaxId += count;
2233         part->nIDMax = llTypes[type].wMaxId;
2234     }
2235     TRACE("Setting min=%d max=%d (ttop=%d) for (%s:%s)\n",
2236           part->nIDMin, part->nIDMax, llTypes[type].wMaxId,
2237           lpDrv->name, llTypes[type].name);
2238     /* realloc translation table */
2239     llTypes[type].lpMlds = (LPWINE_MLD)
2240         HeapReAlloc(GetProcessHeap(), 0, (llTypes[type].lpMlds) ? llTypes[type].lpMlds - 1 : NULL,
2241                     sizeof(WINE_MLD) * (llTypes[type].wMaxId + 1)) + 1;
2242     /* re-build the translation table */
2243     if (llTypes[type].nMapper != -1) {
2244         TRACE("%s:Trans[%d] -> %s\n", llTypes[type].name, -1, MMDrvs[llTypes[type].nMapper].name);
2245         llTypes[type].lpMlds[-1].uDeviceID = (UINT16)-1;
2246         llTypes[type].lpMlds[-1].type = type;
2247         llTypes[type].lpMlds[-1].mmdIndex = llTypes[type].nMapper;
2248         llTypes[type].lpMlds[-1].dwDriverInstance = 0;
2249     }
2250     for (i = k = 0; i <= num; i++) {
2251         while (MMDrvs[i].parts[type].nIDMin <= k && k < MMDrvs[i].parts[type].nIDMax) {
2252             TRACE("%s:Trans[%d] -> %s\n", llTypes[type].name, k, MMDrvs[i].name);
2253             llTypes[type].lpMlds[k].uDeviceID = k;
2254             llTypes[type].lpMlds[k].type = type;
2255             llTypes[type].lpMlds[k].mmdIndex = i;
2256             llTypes[type].lpMlds[k].dwDriverInstance = 0;
2257             k++;
2258         }
2259     }
2260     return TRUE;
2261 }
2262
2263 /**************************************************************************
2264  *                              MMDRV_Install                   [internal]
2265  */
2266 static  BOOL    MMDRV_Install(LPCSTR name, int num, BOOL bIsMapper)
2267 {
2268     int                 count = 0;
2269     char                buffer[128];
2270     LPWINE_MM_DRIVER    lpDrv = &MMDrvs[num];
2271     LPWINE_DRIVER       d;
2272
2273     TRACE("('%s');\n", name);
2274
2275     memset(lpDrv, 0, sizeof(*lpDrv));
2276
2277     if (!(lpDrv->hDriver = OpenDriverA(name, 0, 0))) {
2278         WARN("Couldn't open driver '%s'\n", name);
2279         return FALSE;
2280     }
2281
2282     d = DRIVER_FindFromHDrvr(lpDrv->hDriver);
2283     lpDrv->bIs32 = (d->dwFlags & WINE_GDF_16BIT) ? FALSE : TRUE;
2284
2285     /* Then look for xxxMessage functions */
2286 #define AA(_h,_w,_x,_y,_z)                                      \
2287     func = (WINEMM_msgFunc##_y) _z ((_h), #_x);                 \
2288     if (func != NULL)                                           \
2289         { lpDrv->parts[_w].u.fnMessage##_y = func; count++;     \
2290           TRACE("Got %d bit func '%s'\n", _y, #_x);         }
2291
2292     if (lpDrv->bIs32) {
2293         WINEMM_msgFunc32        func;
2294
2295         if (d->d.d32.hModule) {
2296 #define A(_x,_y)        AA(d->d.d32.hModule,_x,_y,32,GetProcAddress)
2297             A(MMDRV_AUX,        auxMessage);
2298             A(MMDRV_MIXER,      mixMessage);
2299             A(MMDRV_MIDIIN,     midMessage);
2300             A(MMDRV_MIDIOUT,    modMessage);
2301             A(MMDRV_WAVEIN,     widMessage);
2302             A(MMDRV_WAVEOUT,    wodMessage);
2303 #undef A
2304         }
2305     } else {
2306         WINEMM_msgFunc16        func;
2307
2308         /*
2309          * DESCRIPTION 'wave,aux,mixer:Creative Labs Sound Blaster 16 Driver'
2310          * The beginning of the module description indicates the driver supports
2311          * waveform, auxiliary, and mixer devices. Use one of the following
2312          * device-type names, followed by a colon (:) to indicate the type of
2313          * device your driver supports. If the driver supports more than one
2314          * type of device, separate each device-type name with a comma (,).
2315          *
2316          * wave for waveform audio devices
2317          * wavemapper for wave mappers
2318          * midi for MIDI audio devices
2319          * midimapper for midi mappers
2320          * aux for auxiliary audio devices
2321          * mixer for mixer devices
2322          */
2323
2324         if (d->d.d16.hDriver16) {
2325 #define A(_x,_y)        AA(d->d.d16.hDriver16,_x,_y,16,GetProcAddress16)
2326             A(MMDRV_AUX,        auxMessage);
2327             A(MMDRV_MIXER,      mixMessage);
2328             A(MMDRV_MIDIIN,     midMessage);
2329             A(MMDRV_MIDIOUT,    modMessage);
2330             A(MMDRV_WAVEIN,     widMessage);
2331             A(MMDRV_WAVEOUT,    wodMessage);
2332 #undef A
2333         }
2334     }
2335 #undef AA
2336
2337     if (TRACE_ON(mmsys)) {
2338         if ((lpDrv->bIs32) ? MMDRV_GetDescription32(name, buffer, sizeof(buffer)) :
2339                              MMDRV_GetDescription16(name, buffer, sizeof(buffer)))
2340             TRACE("%s => %s\n", name, buffer);
2341         else
2342             TRACE("%s => No description\n", name);
2343     }
2344
2345     if (!count) {
2346         CloseDriver(lpDrv->hDriver, 0, 0);
2347         WARN("No message functions found\n");
2348         return FALSE;
2349     }
2350
2351     /* FIXME: being a mapper or not should be known by another way */
2352     /* it's known for NE drvs (the description is of the form '*mapper: *'
2353      * I don't have any clue for PE drvs
2354      * on Win 9x, the value is gotten from the key mappable under
2355      * HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\MediaResources\
2356      */
2357     lpDrv->bIsMapper = bIsMapper;
2358     lpDrv->name = HEAP_strdupA(GetProcessHeap(), 0, name);
2359
2360     /* Finish init and get the count of the devices */
2361     MMDRV_InitPerType(lpDrv, num, MMDRV_AUX,            AUXDM_GETNUMDEVS);
2362     MMDRV_InitPerType(lpDrv, num, MMDRV_MIXER,          MXDM_GETNUMDEVS);
2363     MMDRV_InitPerType(lpDrv, num, MMDRV_MIDIIN,         MIDM_GETNUMDEVS);
2364     MMDRV_InitPerType(lpDrv, num, MMDRV_MIDIOUT,        MODM_GETNUMDEVS);
2365     MMDRV_InitPerType(lpDrv, num, MMDRV_WAVEIN,         WIDM_GETNUMDEVS);
2366     MMDRV_InitPerType(lpDrv, num, MMDRV_WAVEOUT,        WODM_GETNUMDEVS);
2367     /* FIXME: if all those func calls return FALSE, then the driver must be unloaded */
2368     return TRUE;
2369 }
2370
2371 /**************************************************************************
2372  *                              MMDRV_Init                      [internal]
2373  */
2374 BOOL    MMDRV_Init(void)
2375 {
2376     int                         num = 0;
2377
2378     /* FIXME: this should be moved to init files;
2379      *          - either .winerc/wine.conf
2380      *          - or made of registry keys
2381      * this is a temporary hack, shall be removed anytime now
2382      */
2383     /* first load hardware drivers */
2384     if (MMDRV_Install("wineoss.drv",       num, FALSE)) num++;
2385
2386     /* finish with mappers */
2387     if (MMDRV_Install("msacm.drv",         num, TRUE )) num++;
2388     if (MMDRV_Install("midimap.drv",       num, TRUE )) num++;
2389
2390     /* be sure that size of MMDrvs matches the max number of loadable drivers !!
2391      * if not just increase size of MMDrvs */
2392     assert(num <= sizeof(MMDrvs)/sizeof(MMDrvs[0]));
2393
2394     return TRUE;
2395 }