projects / reactos.git / blob
? search:


d20c89bfaffab8de877aad2af728e31b12e62777
[reactos.git] / dll / win32 / msg711.acm / msg711.c
1 /*
2 * G711 handling (includes A-Law & MU-Law)
3 *
4 * Copyright (C) 2002 Eric Pouech
5 *
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 */
21
22 #include <assert.h>
23 #include <stdarg.h>
24 #include <string.h>
25 #include "windef.h"
26 #include "winbase.h"
27 #include "wingdi.h"
28 #include "winuser.h"
29 #include "winnls.h"
30 #include "mmsystem.h"
31 #include "mmreg.h"
32 #include "msacm.h"
33 #include "msacmdrv.h"
34 #include "wine/debug.h"
35
36 WINE_DEFAULT_DEBUG_CHANNEL(g711);
37
38 /***********************************************************************
39 * G711_drvOpen
40 */
41 static LRESULT G711_drvOpen(LPCSTR str)
42 {
43 return 1;
44 }
45
46 /***********************************************************************
47 * G711_drvClose
48 */
49 static LRESULT G711_drvClose(DWORD_PTR dwDevID)
50 {
51 return 1;
52 }
53
54 typedef struct tagAcmG711Data
55 {
56 void (*convert)(PACMDRVSTREAMINSTANCE adsi,
57 const unsigned char*, LPDWORD, unsigned char*, LPDWORD);
58 } AcmG711Data;
59
60 /* table to list all supported formats... those are the basic ones. this
61 * also helps given a unique index to each of the supported formats
62 */
63 typedef struct
64 {
65 int nChannels;
66 int nBits;
67 int rate;
68 } Format;
69
70 static const Format PCM_Formats[] =
71 {
72 /*{1, 8, 8000}, {2, 8, 8000}, */{1, 16, 8000}, {2, 16, 8000},
73 /*{1, 8, 11025}, {2, 8, 11025}, */{1, 16, 11025}, {2, 16, 11025},
74 /*{1, 8, 22050}, {2, 8, 22050}, */{1, 16, 22050}, {2, 16, 22050},
75 /*{1, 8, 44100}, {2, 8, 44100}, */{1, 16, 44100}, {2, 16, 44100},
76 };
77
78 static const Format ALaw_Formats[] =
79 {
80 {1, 8, 8000}, {2, 8, 8000}, {1, 8, 11025}, {2, 8, 11025},
81 {1, 8, 22050}, {2, 8, 22050}, {1, 8, 44100}, {2, 8, 44100},
82 };
83
84 static const Format ULaw_Formats[] =
85 {
86 {1, 8, 8000}, {2, 8, 8000}, {1, 8, 11025}, {2, 8, 11025},
87 {1, 8, 22050}, {2, 8, 22050}, {1, 8, 44100}, {2, 8, 44100},
88 };
89
90 /***********************************************************************
91 * G711_GetFormatIndex
92 */
93 static DWORD G711_GetFormatIndex(const WAVEFORMATEX *wfx)
94 {
95 int i, hi;
96 const Format* fmts;
97
98 switch (wfx->wFormatTag)
99 {
100 case WAVE_FORMAT_PCM:
101 hi = ARRAY_SIZE(PCM_Formats);
102 fmts = PCM_Formats;
103 break;
104 case WAVE_FORMAT_ALAW:
105 hi = ARRAY_SIZE(ALaw_Formats);
106 fmts = ALaw_Formats;
107 break;
108 case WAVE_FORMAT_MULAW:
109 hi = ARRAY_SIZE(ULaw_Formats);
110 fmts = ULaw_Formats;
111 break;
112 default:
113 return 0xFFFFFFFF;
114 }
115
116 for (i = 0; i < hi; i++)
117 {
118 if (wfx->nChannels == fmts[i].nChannels &&
119 wfx->nSamplesPerSec == fmts[i].rate &&
120 wfx->wBitsPerSample == fmts[i].nBits)
121 return i;
122 }
123
124 return 0xFFFFFFFF;
125 }
126
127 /***********************************************************************
128 * R16
129 *
130 * Read a 16 bit sample (correctly handles endianness)
131 */
132 static inline short R16(const unsigned char* src)
133 {
134 return (short)((unsigned short)src[0] | ((unsigned short)src[1] << 8));
135 }
136
137 /***********************************************************************
138 * W16
139 *
140 * Write a 16 bit sample (correctly handles endianness)
141 */
142 static inline void W16(unsigned char* dst, short s)
143 {
144 dst[0] = LOBYTE(s);
145 dst[1] = HIBYTE(s);
146 }
147
148 /* You can uncomment this if you don't want the statically generated conversion
149 * table, but rather recompute the Xlaw => PCM conversion for each sample
150 #define NO_FASTDECODE
151 * Since the conversion tables are rather small (2k), I don't think it's really
152 * interesting not to use them, but keeping the actual conversion code around
153 * is helpful to regenerate the tables when needed.
154 */
155
156 /* -------------------------------------------------------------------------------*/
157
158 /*
159 * This source code is a product of Sun Microsystems, Inc. and is provided
160 * for unrestricted use. Users may copy or modify this source code without
161 * charge.
162 *
163 * SUN SOURCE CODE IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING
164 * THE WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
165 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
166 *
167 * Sun source code is provided with no support and without any obligation on
168 * the part of Sun Microsystems, Inc. to assist in its use, correction,
169 * modification or enhancement.
170 *
171 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
172 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY THIS SOFTWARE
173 * OR ANY PART THEREOF.
174 *
175 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
176 * or profits or other special, indirect and consequential damages, even if
177 * Sun has been advised of the possibility of such damages.
178 *
179 * Sun Microsystems, Inc.
180 * 2550 Garcia Avenue
181 * Mountain View, California 94043
182 */
183
184 /*
185 * g711.c
186 *
187 * u-law, A-law and linear PCM conversions.
188 */
189
190 /*
191 * December 30, 1994:
192 * Functions linear2alaw, linear2ulaw have been updated to correctly
193 * convert unquantized 16 bit values.
194 * Tables for direct u- to A-law and A- to u-law conversions have been
195 * corrected.
196 * Borge Lindberg, Center for PersonKommunikation, Aalborg University.
197 * bli@cpk.auc.dk
198 *
199 */
200
201 #define SIGN_BIT (0x80) /* Sign bit for an A-law byte. */
202 #define QUANT_MASK (0xf) /* Quantization field mask. */
203 #define NSEGS (8) /* Number of A-law segments. */
204 #define SEG_SHIFT (4) /* Left shift for segment number. */
205 #define SEG_MASK (0x70) /* Segment field mask. */
206
207 static const short seg_aend[8] = {0x1F, 0x3F, 0x7F, 0x0FF, 0x1FF, 0x3FF, 0x7FF, 0x0FFF};
208 static const short seg_uend[8] = {0x3F, 0x7F, 0xFF, 0x1FF, 0x3FF, 0x7FF, 0xFFF, 0x1FFF};
209
210 /* copy from CCITT G.711 specifications */
211 static const unsigned char _u2a[128] = { /* u- to A-law conversions */
212 1, 1, 2, 2, 3, 3, 4, 4,
213 5, 5, 6, 6, 7, 7, 8, 8,
214 9, 10, 11, 12, 13, 14, 15, 16,
215 17, 18, 19, 20, 21, 22, 23, 24,
216 25, 27, 29, 31, 33, 34, 35, 36,
217 37, 38, 39, 40, 41, 42, 43, 44,
218 46, 48, 49, 50, 51, 52, 53, 54,
219 55, 56, 57, 58, 59, 60, 61, 62,
220 64, 65, 66, 67, 68, 69, 70, 71,
221 72, 73, 74, 75, 76, 77, 78, 79,
222 /* corrected:
223 81, 82, 83, 84, 85, 86, 87, 88,
224 should be: */
225 80, 82, 83, 84, 85, 86, 87, 88,
226 89, 90, 91, 92, 93, 94, 95, 96,
227 97, 98, 99, 100, 101, 102, 103, 104,
228 105, 106, 107, 108, 109, 110, 111, 112,
229 113, 114, 115, 116, 117, 118, 119, 120,
230 121, 122, 123, 124, 125, 126, 127, 128};
231
232 static const unsigned char _a2u[128] = { /* A- to u-law conversions */
233 1, 3, 5, 7, 9, 11, 13, 15,
234 16, 17, 18, 19, 20, 21, 22, 23,
235 24, 25, 26, 27, 28, 29, 30, 31,
236 32, 32, 33, 33, 34, 34, 35, 35,
237 36, 37, 38, 39, 40, 41, 42, 43,
238 44, 45, 46, 47, 48, 48, 49, 49,
239 50, 51, 52, 53, 54, 55, 56, 57,
240 58, 59, 60, 61, 62, 63, 64, 64,
241 65, 66, 67, 68, 69, 70, 71, 72,
242 /* corrected:
243 73, 74, 75, 76, 77, 78, 79, 79,
244 should be: */
245 73, 74, 75, 76, 77, 78, 79, 80,
246
247 80, 81, 82, 83, 84, 85, 86, 87,
248 88, 89, 90, 91, 92, 93, 94, 95,
249 96, 97, 98, 99, 100, 101, 102, 103,
250 104, 105, 106, 107, 108, 109, 110, 111,
251 112, 113, 114, 115, 116, 117, 118, 119,
252 120, 121, 122, 123, 124, 125, 126, 127};
253
254 static short
255 search(
256 int val, /* changed from "short" *drago* */
257 const short *table,
258 int size) /* changed from "short" *drago* */
259 {
260 int i; /* changed from "short" *drago* */
261
262 for (i = 0; i < size; i++) {
263 if (val <= *table++)
264 return (i);
265 }
266 return (size);
267 }
268
269 /*
270 * linear2alaw() - Convert a 16-bit linear PCM value to 8-bit A-law
271 *
272 * linear2alaw() accepts an 16-bit integer and encodes it as A-law data.
273 *
274 * Linear Input Code Compressed Code
275 * ------------------------ ---------------
276 * 0000000wxyza 000wxyz
277 * 0000001wxyza 001wxyz
278 * 000001wxyzab 010wxyz
279 * 00001wxyzabc 011wxyz
280 * 0001wxyzabcd 100wxyz
281 * 001wxyzabcde 101wxyz
282 * 01wxyzabcdef 110wxyz
283 * 1wxyzabcdefg 111wxyz
284 *
285 * For further information see John C. Bellamy's Digital Telephony, 1982,
286 * John Wiley & Sons, pps 98-111 and 472-476.
287 */
288 static inline unsigned char
289 linear2alaw(int pcm_val) /* 2's complement (16-bit range) */
290 /* changed from "short" *drago* */
291 {
292 int mask; /* changed from "short" *drago* */
293 int seg; /* changed from "short" *drago* */
294 unsigned char aval;
295
296 pcm_val = pcm_val >> 3;
297
298 if (pcm_val >= 0) {
299 mask = 0xD5; /* sign (7th) bit = 1 */
300 } else {
301 mask = 0x55; /* sign bit = 0 */
302 pcm_val = -pcm_val - 1;
303 }
304
305 /* Convert the scaled magnitude to segment number. */
306 seg = search(pcm_val, seg_aend, 8);
307
308 /* Combine the sign, segment, and quantization bits. */
309
310 if (seg >= 8) /* out of range, return maximum value. */
311 return (unsigned char) (0x7F ^ mask);
312 else {
313 aval = (unsigned char) seg << SEG_SHIFT;
314 if (seg < 2)
315 aval |= (pcm_val >> 1) & QUANT_MASK;
316 else
317 aval |= (pcm_val >> seg) & QUANT_MASK;
318 return (aval ^ mask);
319 }
320 }
321
322 #ifdef NO_FASTDECODE
323 /*
324 * alaw2linear() - Convert an A-law value to 16-bit linear PCM
325 *
326 */
327 static inline int
328 alaw2linear(unsigned char a_val)
329 {
330 int t; /* changed from "short" *drago* */
331 int seg; /* changed from "short" *drago* */
332
333 a_val ^= 0x55;
334
335 t = (a_val & QUANT_MASK) << 4;
336 seg = ((unsigned)a_val & SEG_MASK) >> SEG_SHIFT;
337 switch (seg) {
338 case 0:
339 t += 8;
340 break;
341 case 1:
342 t += 0x108;
343 break;
344 default:
345 t += 0x108;
346 t <<= seg - 1;
347 }
348 return ((a_val & SIGN_BIT) ? t : -t);
349 }
350 #else
351 /* EPP (for Wine):
352 * this array has been statically generated from the above routine
353 */
354 static const unsigned short _a2l[] = {
355 0xEA80, 0xEB80, 0xE880, 0xE980, 0xEE80, 0xEF80, 0xEC80, 0xED80,
356 0xE280, 0xE380, 0xE080, 0xE180, 0xE680, 0xE780, 0xE480, 0xE580,
357 0xF540, 0xF5C0, 0xF440, 0xF4C0, 0xF740, 0xF7C0, 0xF640, 0xF6C0,
358 0xF140, 0xF1C0, 0xF040, 0xF0C0, 0xF340, 0xF3C0, 0xF240, 0xF2C0,
359 0xAA00, 0xAE00, 0xA200, 0xA600, 0xBA00, 0xBE00, 0xB200, 0xB600,
360 0x8A00, 0x8E00, 0x8200, 0x8600, 0x9A00, 0x9E00, 0x9200, 0x9600,
361 0xD500, 0xD700, 0xD100, 0xD300, 0xDD00, 0xDF00, 0xD900, 0xDB00,
362 0xC500, 0xC700, 0xC100, 0xC300, 0xCD00, 0xCF00, 0xC900, 0xCB00,
363 0xFEA8, 0xFEB8, 0xFE88, 0xFE98, 0xFEE8, 0xFEF8, 0xFEC8, 0xFED8,
364 0xFE28, 0xFE38, 0xFE08, 0xFE18, 0xFE68, 0xFE78, 0xFE48, 0xFE58,
365 0xFFA8, 0xFFB8, 0xFF88, 0xFF98, 0xFFE8, 0xFFF8, 0xFFC8, 0xFFD8,
366 0xFF28, 0xFF38, 0xFF08, 0xFF18, 0xFF68, 0xFF78, 0xFF48, 0xFF58,
367 0xFAA0, 0xFAE0, 0xFA20, 0xFA60, 0xFBA0, 0xFBE0, 0xFB20, 0xFB60,
368 0xF8A0, 0xF8E0, 0xF820, 0xF860, 0xF9A0, 0xF9E0, 0xF920, 0xF960,
369 0xFD50, 0xFD70, 0xFD10, 0xFD30, 0xFDD0, 0xFDF0, 0xFD90, 0xFDB0,
370 0xFC50, 0xFC70, 0xFC10, 0xFC30, 0xFCD0, 0xFCF0, 0xFC90, 0xFCB0,
371 0x1580, 0x1480, 0x1780, 0x1680, 0x1180, 0x1080, 0x1380, 0x1280,
372 0x1D80, 0x1C80, 0x1F80, 0x1E80, 0x1980, 0x1880, 0x1B80, 0x1A80,
373 0x0AC0, 0x0A40, 0x0BC0, 0x0B40, 0x08C0, 0x0840, 0x09C0, 0x0940,
374 0x0EC0, 0x0E40, 0x0FC0, 0x0F40, 0x0CC0, 0x0C40, 0x0DC0, 0x0D40,
375 0x5600, 0x5200, 0x5E00, 0x5A00, 0x4600, 0x4200, 0x4E00, 0x4A00,
376 0x7600, 0x7200, 0x7E00, 0x7A00, 0x6600, 0x6200, 0x6E00, 0x6A00,
377 0x2B00, 0x2900, 0x2F00, 0x2D00, 0x2300, 0x2100, 0x2700, 0x2500,
378 0x3B00, 0x3900, 0x3F00, 0x3D00, 0x3300, 0x3100, 0x3700, 0x3500,
379 0x0158, 0x0148, 0x0178, 0x0168, 0x0118, 0x0108, 0x0138, 0x0128,
380 0x01D8, 0x01C8, 0x01F8, 0x01E8, 0x0198, 0x0188, 0x01B8, 0x01A8,
381 0x0058, 0x0048, 0x0078, 0x0068, 0x0018, 0x0008, 0x0038, 0x0028,
382 0x00D8, 0x00C8, 0x00F8, 0x00E8, 0x0098, 0x0088, 0x00B8, 0x00A8,
383 0x0560, 0x0520, 0x05E0, 0x05A0, 0x0460, 0x0420, 0x04E0, 0x04A0,
384 0x0760, 0x0720, 0x07E0, 0x07A0, 0x0660, 0x0620, 0x06E0, 0x06A0,
385 0x02B0, 0x0290, 0x02F0, 0x02D0, 0x0230, 0x0210, 0x0270, 0x0250,
386 0x03B0, 0x0390, 0x03F0, 0x03D0, 0x0330, 0x0310, 0x0370, 0x0350,
387 };
388 static inline int
389 alaw2linear(unsigned char a_val)
390 {
391 return (short)_a2l[a_val];
392 }
393 #endif
394
395 #define BIAS (0x84) /* Bias for linear code. */
396 #define CLIP 8159
397
398 /*
399 * linear2ulaw() - Convert a linear PCM value to u-law
400 *
401 * In order to simplify the encoding process, the original linear magnitude
402 * is biased by adding 33 which shifts the encoding range from (0 - 8158) to
403 * (33 - 8191). The result can be seen in the following encoding table:
404 *
405 * Biased Linear Input Code Compressed Code
406 * ------------------------ ---------------
407 * 00000001wxyza 000wxyz
408 * 0000001wxyzab 001wxyz
409 * 000001wxyzabc 010wxyz
410 * 00001wxyzabcd 011wxyz
411 * 0001wxyzabcde 100wxyz
412 * 001wxyzabcdef 101wxyz
413 * 01wxyzabcdefg 110wxyz
414 * 1wxyzabcdefgh 111wxyz
415 *
416 * Each biased linear code has a leading 1 which identifies the segment
417 * number. The value of the segment number is equal to 7 minus the number
418 * of leading 0's. The quantization interval is directly available as the
419 * four bits wxyz. * The trailing bits (a - h) are ignored.
420 *
421 * Ordinarily the complement of the resulting code word is used for
422 * transmission, and so the code word is complemented before it is returned.
423 *
424 * For further information see John C. Bellamy's Digital Telephony, 1982,
425 * John Wiley & Sons, pps 98-111 and 472-476.
426 */
427 static inline unsigned char
428 linear2ulaw(short pcm_val) /* 2's complement (16-bit range) */
429 {
430 short mask;
431 short seg;
432 unsigned char uval;
433
434 /* Get the sign and the magnitude of the value. */
435 pcm_val = pcm_val >> 2;
436 if (pcm_val < 0) {
437 pcm_val = -pcm_val;
438 mask = 0x7F;
439 } else {
440 mask = 0xFF;
441 }
442 if ( pcm_val > CLIP ) pcm_val = CLIP; /* clip the magnitude */
443 pcm_val += (BIAS >> 2);
444
445 /* Convert the scaled magnitude to segment number. */
446 seg = search(pcm_val, seg_uend, 8);
447
448 /*
449 * Combine the sign, segment, quantization bits;
450 * and complement the code word.
451 */
452 if (seg >= 8) /* out of range, return maximum value. */
453 return (unsigned char) (0x7F ^ mask);
454 else {
455 uval = (unsigned char) (seg << 4) | ((pcm_val >> (seg + 1)) & 0xF);
456 return (uval ^ mask);
457 }
458 }
459
460 #ifdef NO_FASTDECODE
461 /*
462 * ulaw2linear() - Convert a u-law value to 16-bit linear PCM
463 *
464 * First, a biased linear code is derived from the code word. An unbiased
465 * output can then be obtained by subtracting 33 from the biased code.
466 *
467 * Note that this function expects to be passed the complement of the
468 * original code word. This is in keeping with ISDN conventions.
469 */
470 static inline short
471 ulaw2linear(unsigned char u_val)
472 {
473 short t;
474
475 /* Complement to obtain normal u-law value. */
476 u_val = ~u_val;
477
478 /*
479 * Extract and bias the quantization bits. Then
480 * shift up by the segment number and subtract out the bias.
481 */
482 t = ((u_val & QUANT_MASK) << 3) + BIAS;
483 t <<= ((unsigned)u_val & SEG_MASK) >> SEG_SHIFT;
484
485 return ((u_val & SIGN_BIT) ? (BIAS - t) : (t - BIAS));
486 }
487 #else
488 /* EPP (for Wine):
489 * this array has been statically generated from the above routine
490 */
491 static const unsigned short _u2l[] = {
492 0x8284, 0x8684, 0x8A84, 0x8E84, 0x9284, 0x9684, 0x9A84, 0x9E84,
493 0xA284, 0xA684, 0xAA84, 0xAE84, 0xB284, 0xB684, 0xBA84, 0xBE84,
494 0xC184, 0xC384, 0xC584, 0xC784, 0xC984, 0xCB84, 0xCD84, 0xCF84,
495 0xD184, 0xD384, 0xD584, 0xD784, 0xD984, 0xDB84, 0xDD84, 0xDF84,
496 0xE104, 0xE204, 0xE304, 0xE404, 0xE504, 0xE604, 0xE704, 0xE804,
497 0xE904, 0xEA04, 0xEB04, 0xEC04, 0xED04, 0xEE04, 0xEF04, 0xF004,
498 0xF0C4, 0xF144, 0xF1C4, 0xF244, 0xF2C4, 0xF344, 0xF3C4, 0xF444,
499 0xF4C4, 0xF544, 0xF5C4, 0xF644, 0xF6C4, 0xF744, 0xF7C4, 0xF844,
500 0xF8A4, 0xF8E4, 0xF924, 0xF964, 0xF9A4, 0xF9E4, 0xFA24, 0xFA64,
501 0xFAA4, 0xFAE4, 0xFB24, 0xFB64, 0xFBA4, 0xFBE4, 0xFC24, 0xFC64,
502 0xFC94, 0xFCB4, 0xFCD4, 0xFCF4, 0xFD14, 0xFD34, 0xFD54, 0xFD74,
503 0xFD94, 0xFDB4, 0xFDD4, 0xFDF4, 0xFE14, 0xFE34, 0xFE54, 0xFE74,
504 0xFE8C, 0xFE9C, 0xFEAC, 0xFEBC, 0xFECC, 0xFEDC, 0xFEEC, 0xFEFC,
505 0xFF0C, 0xFF1C, 0xFF2C, 0xFF3C, 0xFF4C, 0xFF5C, 0xFF6C, 0xFF7C,
506 0xFF88, 0xFF90, 0xFF98, 0xFFA0, 0xFFA8, 0xFFB0, 0xFFB8, 0xFFC0,
507 0xFFC8, 0xFFD0, 0xFFD8, 0xFFE0, 0xFFE8, 0xFFF0, 0xFFF8, 0x0000,
508 0x7D7C, 0x797C, 0x757C, 0x717C, 0x6D7C, 0x697C, 0x657C, 0x617C,
509 0x5D7C, 0x597C, 0x557C, 0x517C, 0x4D7C, 0x497C, 0x457C, 0x417C,
510 0x3E7C, 0x3C7C, 0x3A7C, 0x387C, 0x367C, 0x347C, 0x327C, 0x307C,
511 0x2E7C, 0x2C7C, 0x2A7C, 0x287C, 0x267C, 0x247C, 0x227C, 0x207C,
512 0x1EFC, 0x1DFC, 0x1CFC, 0x1BFC, 0x1AFC, 0x19FC, 0x18FC, 0x17FC,
513 0x16FC, 0x15FC, 0x14FC, 0x13FC, 0x12FC, 0x11FC, 0x10FC, 0x0FFC,
514 0x0F3C, 0x0EBC, 0x0E3C, 0x0DBC, 0x0D3C, 0x0CBC, 0x0C3C, 0x0BBC,
515 0x0B3C, 0x0ABC, 0x0A3C, 0x09BC, 0x093C, 0x08BC, 0x083C, 0x07BC,
516 0x075C, 0x071C, 0x06DC, 0x069C, 0x065C, 0x061C, 0x05DC, 0x059C,
517 0x055C, 0x051C, 0x04DC, 0x049C, 0x045C, 0x041C, 0x03DC, 0x039C,
518 0x036C, 0x034C, 0x032C, 0x030C, 0x02EC, 0x02CC, 0x02AC, 0x028C,
519 0x026C, 0x024C, 0x022C, 0x020C, 0x01EC, 0x01CC, 0x01AC, 0x018C,
520 0x0174, 0x0164, 0x0154, 0x0144, 0x0134, 0x0124, 0x0114, 0x0104,
521 0x00F4, 0x00E4, 0x00D4, 0x00C4, 0x00B4, 0x00A4, 0x0094, 0x0084,
522 0x0078, 0x0070, 0x0068, 0x0060, 0x0058, 0x0050, 0x0048, 0x0040,
523 0x0038, 0x0030, 0x0028, 0x0020, 0x0018, 0x0010, 0x0008, 0x0000,
524 };
525 static inline short ulaw2linear(unsigned char u_val)
526 {
527 return (short)_u2l[u_val];
528 }
529 #endif
530
531 /* A-law to u-law conversion */
532 static inline unsigned char
533 alaw2ulaw(unsigned char aval)
534 {
535 aval &= 0xff;
536 return (unsigned char) ((aval & 0x80) ? (0xFF ^ _a2u[aval ^ 0xD5]) :
537 (0x7F ^ _a2u[aval ^ 0x55]));
538 }
539
540 /* u-law to A-law conversion */
541 static inline unsigned char
542 ulaw2alaw(unsigned char uval)
543 {
544 uval &= 0xff;
545 return (unsigned char) ((uval & 0x80) ? (0xD5 ^ (_u2a[0xFF ^ uval] - 1)) :
546 (unsigned char) (0x55 ^ (_u2a[0x7F ^ uval] - 1)));
547 }
548
549 /* -------------------------------------------------------------------------------*/
550
551 static void cvtXXalaw16K(PACMDRVSTREAMINSTANCE adsi,
552 const unsigned char* src, LPDWORD srcsize,
553 unsigned char* dst, LPDWORD dstsize)
554 {
555 DWORD len = min(*srcsize, *dstsize / 2);
556 DWORD i;
557 short w;
558
559 *srcsize = len;
560 *dstsize = len * 2;
561 for (i = 0; i < len; i++)
562 {
563 w = alaw2linear(*src++);
564 W16(dst, w); dst += 2;
565 }
566 }
567
568 static void cvtXX16alawK(PACMDRVSTREAMINSTANCE adsi,
569 const unsigned char* src, LPDWORD srcsize,
570 unsigned char* dst, LPDWORD dstsize)
571 {
572 DWORD len = min(*srcsize / 2, *dstsize);
573 DWORD i;
574
575 *srcsize = len * 2;
576 *dstsize = len;
577 for (i = 0; i < len; i++)
578 {
579 *dst++ = linear2alaw(R16(src)); src += 2;
580 }
581 }
582
583 static void cvtXXulaw16K(PACMDRVSTREAMINSTANCE adsi,
584 const unsigned char* src, LPDWORD srcsize,
585 unsigned char* dst, LPDWORD dstsize)
586 {
587 DWORD len = min(*srcsize, *dstsize / 2);
588 DWORD i;
589 short w;
590
591 *srcsize = len;
592 *dstsize = len * 2;
593 for (i = 0; i < len; i++)
594 {
595 w = ulaw2linear(*src++);
596 W16(dst, w); dst += 2;
597 }
598 }
599
600 static void cvtXX16ulawK(PACMDRVSTREAMINSTANCE adsi,
601 const unsigned char* src, LPDWORD srcsize,
602 unsigned char* dst, LPDWORD dstsize)
603 {
604 DWORD len = min(*srcsize / 2, *dstsize);
605 DWORD i;
606
607 *srcsize = len * 2;
608 *dstsize = len;
609 for (i = 0; i < len; i++)
610 {
611 *dst++ = linear2ulaw(R16(src)); src += 2;
612 }
613 }
614
615 static void cvtXXalawulawK(PACMDRVSTREAMINSTANCE adsi,
616 const unsigned char* src, LPDWORD srcsize,
617 unsigned char* dst, LPDWORD dstsize)
618 {
619 DWORD len = min(*srcsize, *dstsize);
620 DWORD i;
621
622 *srcsize = len;
623 *dstsize = len;
624
625 for (i = 0; i < len; i++)
626 *dst++ = alaw2ulaw(*src++);
627 }
628
629
630 static void cvtXXulawalawK(PACMDRVSTREAMINSTANCE adsi,
631 const unsigned char* src, LPDWORD srcsize,
632 unsigned char* dst, LPDWORD dstsize)
633 {
634 DWORD len = min(*srcsize, *dstsize);
635 DWORD i;
636
637 *srcsize = len;
638 *dstsize = len;
639
640 for (i = 0; i < len; i++)
641 *dst++ = ulaw2alaw(*src++);
642 }
643
644 /***********************************************************************
645 * G711_DriverDetails
646 *
647 */
648 static LRESULT G711_DriverDetails(PACMDRIVERDETAILSW add)
649 {
650 add->fccType = ACMDRIVERDETAILS_FCCTYPE_AUDIOCODEC;
651 add->fccComp = ACMDRIVERDETAILS_FCCCOMP_UNDEFINED;
652 add->wMid = MM_MICROSOFT;
653 add->wPid = MM_MSFT_ACM_G711;
654 add->vdwACM = 0x01000000;
655 add->vdwDriver = 0x01000000;
656 add->fdwSupport = ACMDRIVERDETAILS_SUPPORTF_CODEC;
657 add->cFormatTags = 3; /* PCM, G711 A-LAW & MU-LAW */
658 add->cFilterTags = 0;
659 add->hicon = NULL;
660 MultiByteToWideChar( CP_ACP, 0, "Microsoft CCITT G.711", -1,
661 add->szShortName, ARRAY_SIZE( add->szShortName ));
662 MultiByteToWideChar( CP_ACP, 0, "Wine G711 converter", -1,
663 add->szLongName, ARRAY_SIZE( add->szLongName ));
664 MultiByteToWideChar( CP_ACP, 0, "Brought to you by the Wine team...", -1,
665 add->szCopyright, ARRAY_SIZE( add->szCopyright ));
666 MultiByteToWideChar( CP_ACP, 0, "Refer to LICENSE file", -1,
667 add->szLicensing, ARRAY_SIZE( add->szLicensing ));
668 add->szFeatures[0] = 0;
669
670 return MMSYSERR_NOERROR;
671 }
672
673 /***********************************************************************
674 * G711_FormatTagDetails
675 *
676 */
677 static LRESULT G711_FormatTagDetails(PACMFORMATTAGDETAILSW aftd, DWORD dwQuery)
678 {
679 static const WCHAR szPcm[]={'P','C','M',0};
680 static const WCHAR szALaw[]={'A','-','L','a','w',0};
681 static const WCHAR szULaw[]={'U','-','L','a','w',0};
682
683 switch (dwQuery)
684 {
685 case ACM_FORMATTAGDETAILSF_INDEX:
686 if (aftd->dwFormatTagIndex >= 3) return ACMERR_NOTPOSSIBLE;
687 break;
688 case ACM_FORMATTAGDETAILSF_LARGESTSIZE:
689 if (aftd->dwFormatTag == WAVE_FORMAT_UNKNOWN)
690 {
691 aftd->dwFormatTagIndex = 1;
692 break;
693 }
694 /* fall through */
695 case ACM_FORMATTAGDETAILSF_FORMATTAG:
696 switch (aftd->dwFormatTag)
697 {
698 case WAVE_FORMAT_PCM: aftd->dwFormatTagIndex = 0; break;
699 case WAVE_FORMAT_ALAW: aftd->dwFormatTagIndex = 1; break;
700 case WAVE_FORMAT_MULAW: aftd->dwFormatTagIndex = 2; break;
701 default: return ACMERR_NOTPOSSIBLE;
702 }
703 break;
704 default:
705 WARN("Unsupported query %08x\n", dwQuery);
706 return MMSYSERR_NOTSUPPORTED;
707 }
708
709 aftd->fdwSupport = ACMDRIVERDETAILS_SUPPORTF_CODEC;
710 switch (aftd->dwFormatTagIndex)
711 {
712 case 0:
713 aftd->dwFormatTag = WAVE_FORMAT_PCM;
714 aftd->cbFormatSize = sizeof(PCMWAVEFORMAT);
715 aftd->cStandardFormats = ARRAY_SIZE(PCM_Formats);
716 lstrcpyW(aftd->szFormatTag, szPcm);
717 break;
718 case 1:
719 aftd->dwFormatTag = WAVE_FORMAT_ALAW;
720 aftd->cbFormatSize = sizeof(WAVEFORMATEX);
721 aftd->cStandardFormats = ARRAY_SIZE(ALaw_Formats);
722 lstrcpyW(aftd->szFormatTag, szALaw);
723 break;
724 case 2:
725 aftd->dwFormatTag = WAVE_FORMAT_MULAW;
726 aftd->cbFormatSize = sizeof(WAVEFORMATEX);
727 aftd->cStandardFormats = ARRAY_SIZE(ULaw_Formats);
728 lstrcpyW(aftd->szFormatTag, szULaw);
729 break;
730 }
731 return MMSYSERR_NOERROR;
732 }
733
734 /***********************************************************************
735 * G711_FormatDetails
736 *
737 */
738 static LRESULT G711_FormatDetails(PACMFORMATDETAILSW afd, DWORD dwQuery)
739 {
740 switch (dwQuery)
741 {
742 case ACM_FORMATDETAILSF_FORMAT:
743 if (G711_GetFormatIndex(afd->pwfx) == 0xFFFFFFFF) return ACMERR_NOTPOSSIBLE;
744 break;
745 case ACM_FORMATDETAILSF_INDEX:
746 afd->pwfx->wFormatTag = afd->dwFormatTag;
747 switch (afd->dwFormatTag)
748 {
749 case WAVE_FORMAT_PCM:
750 if (afd->dwFormatIndex >= ARRAY_SIZE(PCM_Formats)) return ACMERR_NOTPOSSIBLE;
751 afd->pwfx->nChannels = PCM_Formats[afd->dwFormatIndex].nChannels;
752 afd->pwfx->nSamplesPerSec = PCM_Formats[afd->dwFormatIndex].rate;
753 afd->pwfx->wBitsPerSample = PCM_Formats[afd->dwFormatIndex].nBits;
754 afd->pwfx->nBlockAlign = afd->pwfx->nChannels * 2;
755 afd->pwfx->nAvgBytesPerSec = afd->pwfx->nSamplesPerSec * afd->pwfx->nBlockAlign;
756 break;
757 case WAVE_FORMAT_ALAW:
758 if (afd->dwFormatIndex >= ARRAY_SIZE(ALaw_Formats)) return ACMERR_NOTPOSSIBLE;
759 afd->pwfx->nChannels = ALaw_Formats[afd->dwFormatIndex].nChannels;
760 afd->pwfx->nSamplesPerSec = ALaw_Formats[afd->dwFormatIndex].rate;
761 afd->pwfx->wBitsPerSample = ALaw_Formats[afd->dwFormatIndex].nBits;
762 afd->pwfx->nBlockAlign = ALaw_Formats[afd->dwFormatIndex].nChannels;
763 afd->pwfx->nAvgBytesPerSec = afd->pwfx->nSamplesPerSec * afd->pwfx->nChannels;
764 afd->pwfx->cbSize = 0;
765 break;
766 case WAVE_FORMAT_MULAW:
767 if (afd->dwFormatIndex >= ARRAY_SIZE(ULaw_Formats)) return ACMERR_NOTPOSSIBLE;
768 afd->pwfx->nChannels = ULaw_Formats[afd->dwFormatIndex].nChannels;
769 afd->pwfx->nSamplesPerSec = ULaw_Formats[afd->dwFormatIndex].rate;
770 afd->pwfx->wBitsPerSample = ULaw_Formats[afd->dwFormatIndex].nBits;
771 afd->pwfx->nBlockAlign = ULaw_Formats[afd->dwFormatIndex].nChannels;
772 afd->pwfx->nAvgBytesPerSec = afd->pwfx->nSamplesPerSec * afd->pwfx->nChannels;
773 afd->pwfx->cbSize = 0;
774 break;
775 default:
776 WARN("Unsupported tag %08x\n", afd->dwFormatTag);
777 return MMSYSERR_INVALPARAM;
778 }
779 break;
780 default:
781 WARN("Unsupported query %08x\n", dwQuery);
782 return MMSYSERR_NOTSUPPORTED;
783 }
784 afd->fdwSupport = ACMDRIVERDETAILS_SUPPORTF_CODEC;
785 afd->szFormat[0] = 0; /* let MSACM format this for us... */
786
787 return MMSYSERR_NOERROR;
788 }
789
790 /***********************************************************************
791 * G711_FormatSuggest
792 *
793 */
794 static LRESULT G711_FormatSuggest(PACMDRVFORMATSUGGEST adfs)
795 {
796 /* some tests ... */
797 if (adfs->cbwfxSrc < sizeof(PCMWAVEFORMAT) ||
798 adfs->cbwfxDst < sizeof(PCMWAVEFORMAT) ||
799 G711_GetFormatIndex(adfs->pwfxSrc) == 0xFFFFFFFF) return ACMERR_NOTPOSSIBLE;
800 /* FIXME: should do those tests against the real size (according to format tag */
801
802 /* If no suggestion for destination, then copy source value */
803 if (!(adfs->fdwSuggest & ACM_FORMATSUGGESTF_NCHANNELS))
804 adfs->pwfxDst->nChannels = adfs->pwfxSrc->nChannels;
805 if (!(adfs->fdwSuggest & ACM_FORMATSUGGESTF_NSAMPLESPERSEC))
806 adfs->pwfxDst->nSamplesPerSec = adfs->pwfxSrc->nSamplesPerSec;
807
808 if (!(adfs->fdwSuggest & ACM_FORMATSUGGESTF_WBITSPERSAMPLE))
809 {
810 if (adfs->pwfxSrc->wFormatTag == WAVE_FORMAT_PCM)
811 adfs->pwfxDst->wBitsPerSample = 8;
812 else
813 adfs->pwfxDst->wBitsPerSample = 16;
814 }
815 if (!(adfs->fdwSuggest & ACM_FORMATSUGGESTF_WFORMATTAG))
816 {
817 switch (adfs->pwfxSrc->wFormatTag)
818 {
819 case WAVE_FORMAT_PCM: adfs->pwfxDst->wFormatTag = WAVE_FORMAT_ALAW; break;
820 case WAVE_FORMAT_ALAW: adfs->pwfxDst->wFormatTag = WAVE_FORMAT_PCM; break;
821 case WAVE_FORMAT_MULAW: adfs->pwfxDst->wFormatTag = WAVE_FORMAT_PCM; break;
822 }
823 }
824 /* check if result is ok */
825 if (G711_GetFormatIndex(adfs->pwfxDst) == 0xFFFFFFFF) return ACMERR_NOTPOSSIBLE;
826
827 /* recompute other values */
828 switch (adfs->pwfxDst->wFormatTag)
829 {
830 case WAVE_FORMAT_PCM:
831 adfs->pwfxDst->nBlockAlign = adfs->pwfxDst->nChannels * 2;
832 adfs->pwfxDst->nAvgBytesPerSec = adfs->pwfxDst->nSamplesPerSec * adfs->pwfxDst->nBlockAlign;
833 break;
834 case WAVE_FORMAT_ALAW:
835 adfs->pwfxDst->nBlockAlign = adfs->pwfxDst->nChannels;
836 adfs->pwfxDst->nAvgBytesPerSec = adfs->pwfxDst->nSamplesPerSec * adfs->pwfxSrc->nChannels;
837 break;
838 case WAVE_FORMAT_MULAW:
839 adfs->pwfxDst->nBlockAlign = adfs->pwfxDst->nChannels;
840 adfs->pwfxDst->nAvgBytesPerSec = adfs->pwfxDst->nSamplesPerSec * adfs->pwfxSrc->nChannels;
841 break;
842 }
843
844 return MMSYSERR_NOERROR;
845 }
846
847 /***********************************************************************
848 * G711_Reset
849 *
850 */
851 static void G711_Reset(PACMDRVSTREAMINSTANCE adsi, AcmG711Data* aad)
852 {
853 }
854
855 /***********************************************************************
856 * G711_StreamOpen
857 *
858 */
859 static LRESULT G711_StreamOpen(PACMDRVSTREAMINSTANCE adsi)
860 {
861 AcmG711Data* aad;
862
863 assert(!(adsi->fdwOpen & ACM_STREAMOPENF_ASYNC));
864
865 if (G711_GetFormatIndex(adsi->pwfxSrc) == 0xFFFFFFFF ||
866 G711_GetFormatIndex(adsi->pwfxDst) == 0xFFFFFFFF)
867 return ACMERR_NOTPOSSIBLE;
868
869 aad = HeapAlloc(GetProcessHeap(), 0, sizeof(AcmG711Data));
870 if (aad == 0) return MMSYSERR_NOMEM;
871
872 adsi->dwDriver = (DWORD_PTR)aad;
873
874 if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_PCM &&
875 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_PCM)
876 {
877 goto theEnd;
878 }
879 else if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_ALAW &&
880 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_PCM)
881 {
882 /* resampling or mono <=> stereo not available
883 * G711 algo only define 16 bit per sample output
884 */
885 if (adsi->pwfxSrc->nSamplesPerSec != adsi->pwfxDst->nSamplesPerSec ||
886 adsi->pwfxSrc->nChannels != adsi->pwfxDst->nChannels ||
887 adsi->pwfxDst->wBitsPerSample != 16)
888 goto theEnd;
889
890 /* g711 A-Law decoding... */
891 if (adsi->pwfxDst->wBitsPerSample == 16)
892 aad->convert = cvtXXalaw16K;
893 }
894 else if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_PCM &&
895 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_ALAW)
896 {
897 if (adsi->pwfxSrc->nSamplesPerSec != adsi->pwfxDst->nSamplesPerSec ||
898 adsi->pwfxSrc->nChannels != adsi->pwfxDst->nChannels ||
899 adsi->pwfxSrc->wBitsPerSample != 16)
900 goto theEnd;
901
902 /* g711 coding... */
903 if (adsi->pwfxSrc->wBitsPerSample == 16)
904 aad->convert = cvtXX16alawK;
905 }
906 else if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_MULAW &&
907 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_PCM)
908 {
909 /* resampling or mono <=> stereo not available
910 * G711 algo only define 16 bit per sample output
911 */
912 if (adsi->pwfxSrc->nSamplesPerSec != adsi->pwfxDst->nSamplesPerSec ||
913 adsi->pwfxSrc->nChannels != adsi->pwfxDst->nChannels ||
914 adsi->pwfxDst->wBitsPerSample != 16)
915 goto theEnd;
916
917 /* g711 MU-Law decoding... */
918 if (adsi->pwfxDst->wBitsPerSample == 16)
919 aad->convert = cvtXXulaw16K;
920 }
921 else if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_PCM &&
922 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_MULAW)
923 {
924 if (adsi->pwfxSrc->nSamplesPerSec != adsi->pwfxDst->nSamplesPerSec ||
925 adsi->pwfxSrc->nChannels != adsi->pwfxDst->nChannels ||
926 adsi->pwfxSrc->wBitsPerSample != 16)
927 goto theEnd;
928
929 /* g711 coding... */
930 if (adsi->pwfxSrc->wBitsPerSample == 16)
931 aad->convert = cvtXX16ulawK;
932 }
933 else if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_MULAW &&
934 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_ALAW)
935 {
936 if (adsi->pwfxSrc->nSamplesPerSec != adsi->pwfxDst->nSamplesPerSec ||
937 adsi->pwfxSrc->nChannels != adsi->pwfxDst->nChannels)
938 goto theEnd;
939
940 /* MU-Law => A-Law... */
941 aad->convert = cvtXXulawalawK;
942 }
943 else if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_ALAW &&
944 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_MULAW)
945 {
946 if (adsi->pwfxSrc->nSamplesPerSec != adsi->pwfxDst->nSamplesPerSec ||
947 adsi->pwfxSrc->nChannels != adsi->pwfxDst->nChannels)
948 goto theEnd;
949
950 /* A-Law => MU-Law... */
951 aad->convert = cvtXXalawulawK;
952 }
953 else goto theEnd;
954
955 G711_Reset(adsi, aad);
956
957 return MMSYSERR_NOERROR;
958
959 theEnd:
960 HeapFree(GetProcessHeap(), 0, aad);
961 adsi->dwDriver = 0L;
962 return MMSYSERR_NOTSUPPORTED;
963 }
964
965 /***********************************************************************
966 * G711_StreamClose
967 *
968 */
969 static LRESULT G711_StreamClose(PACMDRVSTREAMINSTANCE adsi)
970 {
971 HeapFree(GetProcessHeap(), 0, (void*)adsi->dwDriver);
972 return MMSYSERR_NOERROR;
973 }
974
975 /***********************************************************************
976 * G711_StreamSize
977 *
978 */
979 static LRESULT G711_StreamSize(const ACMDRVSTREAMINSTANCE *adsi, PACMDRVSTREAMSIZE adss)
980 {
981 switch (adss->fdwSize)
982 {
983 case ACM_STREAMSIZEF_DESTINATION:
984 /* cbDstLength => cbSrcLength */
985 if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_PCM &&
986 (adsi->pwfxDst->wFormatTag == WAVE_FORMAT_ALAW ||
987 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_MULAW))
988 {
989 adss->cbSrcLength = adss->cbDstLength * 2;
990 }
991 else if ((adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_ALAW ||
992 adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_MULAW) &&
993 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_PCM)
994 {
995 adss->cbSrcLength = adss->cbDstLength / 2;
996 }
997 else if ((adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_ALAW ||
998 adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_MULAW) &&
999 (adsi->pwfxDst->wFormatTag == WAVE_FORMAT_ALAW ||
1000 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_MULAW))
1001 {
1002 adss->cbSrcLength = adss->cbDstLength;
1003 }
1004 else
1005 {
1006 return MMSYSERR_NOTSUPPORTED;
1007 }
1008 break;
1009 case ACM_STREAMSIZEF_SOURCE:
1010 /* cbSrcLength => cbDstLength */
1011 if (adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_PCM &&
1012 (adsi->pwfxDst->wFormatTag == WAVE_FORMAT_ALAW ||
1013 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_MULAW))
1014 {
1015 adss->cbDstLength = adss->cbSrcLength / 2;
1016 }
1017 else if ((adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_ALAW ||
1018 adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_MULAW) &&
1019 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_PCM)
1020 {
1021 adss->cbDstLength = adss->cbSrcLength * 2;
1022 }
1023 else if ((adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_ALAW ||
1024 adsi->pwfxSrc->wFormatTag == WAVE_FORMAT_MULAW) &&
1025 (adsi->pwfxDst->wFormatTag == WAVE_FORMAT_ALAW ||
1026 adsi->pwfxDst->wFormatTag == WAVE_FORMAT_MULAW))
1027 {
1028 adss->cbDstLength = adss->cbSrcLength;
1029 }
1030 else
1031 {
1032 return MMSYSERR_NOTSUPPORTED;
1033 }
1034 break;
1035 default:
1036 WARN("Unsupported query %08x\n", adss->fdwSize);
1037 return MMSYSERR_NOTSUPPORTED;
1038 }
1039 return MMSYSERR_NOERROR;
1040 }
1041
1042 /***********************************************************************
1043 * G711_StreamConvert
1044 *
1045 */
1046 static LRESULT G711_StreamConvert(PACMDRVSTREAMINSTANCE adsi, PACMDRVSTREAMHEADER adsh)
1047 {
1048 AcmG711Data* aad = (AcmG711Data*)adsi->dwDriver;
1049 DWORD nsrc = adsh->cbSrcLength;
1050 DWORD ndst = adsh->cbDstLength;
1051
1052 if (adsh->fdwConvert &
1053 ~(ACM_STREAMCONVERTF_BLOCKALIGN|
1054 ACM_STREAMCONVERTF_END|
1055 ACM_STREAMCONVERTF_START))
1056 {
1057 FIXME("Unsupported fdwConvert (%08x), ignoring it\n", adsh->fdwConvert);
1058 }
1059 /* ACM_STREAMCONVERTF_BLOCKALIGN
1060 * currently all conversions are block aligned, so do nothing for this flag
1061 * ACM_STREAMCONVERTF_END
1062 * no pending data, so do nothing for this flag
1063 */
1064 if ((adsh->fdwConvert & ACM_STREAMCONVERTF_START))
1065 {
1066 G711_Reset(adsi, aad);
1067 }
1068
1069 aad->convert(adsi, adsh->pbSrc, &nsrc, adsh->pbDst, &ndst);
1070 adsh->cbSrcLengthUsed = nsrc;
1071 adsh->cbDstLengthUsed = ndst;
1072
1073 return MMSYSERR_NOERROR;
1074 }
1075
1076 /**************************************************************************
1077 * G711_DriverProc [exported]
1078 */
1079 LRESULT CALLBACK G711_DriverProc(DWORD_PTR dwDevID, HDRVR hDriv, UINT wMsg,
1080 LPARAM dwParam1, LPARAM dwParam2)
1081 {
1082 TRACE("(%08lx %p %04x %08lx %08lx);\n",
1083 dwDevID, hDriv, wMsg, dwParam1, dwParam2);
1084
1085 switch (wMsg)
1086 {
1087 case DRV_LOAD: return 1;
1088 case DRV_FREE: return 1;
1089 case DRV_OPEN: return G711_drvOpen((LPSTR)dwParam1);
1090 case DRV_CLOSE: return G711_drvClose(dwDevID);
1091 case DRV_ENABLE: return 1;
1092 case DRV_DISABLE: return 1;
1093 case DRV_QUERYCONFIGURE: return 1;
1094 case DRV_CONFIGURE: MessageBoxA(0, "MS G711 (a-Law & mu-Law) filter !", "Wine Driver", MB_OK); return 1;
1095 case DRV_INSTALL: return DRVCNF_RESTART;
1096 case DRV_REMOVE: return DRVCNF_RESTART;
1097
1098 case ACMDM_DRIVER_NOTIFY:
1099 /* no caching from other ACM drivers is done so far */
1100 return MMSYSERR_NOERROR;
1101
1102 case ACMDM_DRIVER_DETAILS:
1103 return G711_DriverDetails((PACMDRIVERDETAILSW)dwParam1);
1104
1105 case ACMDM_FORMATTAG_DETAILS:
1106 return G711_FormatTagDetails((PACMFORMATTAGDETAILSW)dwParam1, dwParam2);
1107
1108 case ACMDM_FORMAT_DETAILS:
1109 return G711_FormatDetails((PACMFORMATDETAILSW)dwParam1, dwParam2);
1110
1111 case ACMDM_FORMAT_SUGGEST:
1112 return G711_FormatSuggest((PACMDRVFORMATSUGGEST)dwParam1);
1113
1114 case ACMDM_STREAM_OPEN:
1115 return G711_StreamOpen((PACMDRVSTREAMINSTANCE)dwParam1);
1116
1117 case ACMDM_STREAM_CLOSE:
1118 return G711_StreamClose((PACMDRVSTREAMINSTANCE)dwParam1);
1119
1120 case ACMDM_STREAM_SIZE:
1121 return G711_StreamSize((PACMDRVSTREAMINSTANCE)dwParam1, (PACMDRVSTREAMSIZE)dwParam2);
1122
1123 case ACMDM_STREAM_CONVERT:
1124 return G711_StreamConvert((PACMDRVSTREAMINSTANCE)dwParam1, (PACMDRVSTREAMHEADER)dwParam2);
1125
1126 case ACMDM_HARDWARE_WAVE_CAPS_INPUT:
1127 case ACMDM_HARDWARE_WAVE_CAPS_OUTPUT:
1128 /* this converter is not a hardware driver */
1129 case ACMDM_FILTERTAG_DETAILS:
1130 case ACMDM_FILTER_DETAILS:
1131 /* this converter is not a filter */
1132 case ACMDM_STREAM_RESET:
1133 /* only needed for asynchronous driver... we aren't, so just say it */
1134 return MMSYSERR_NOTSUPPORTED;
1135 case ACMDM_STREAM_PREPARE:
1136 case ACMDM_STREAM_UNPREPARE:
1137 /* nothing special to do here... so don't do anything */
1138 return MMSYSERR_NOERROR;
1139
1140 default:
1141 return DefDriverProc(dwDevID, hDriv, wMsg, dwParam1, dwParam2);
1142 }
1143 }
A free Windows-compatible Operating System