WebSVN – Kolibri OS – Blame – /kernel/trunk/drivers/mixer.asm

Rev	Author	Line No.	Line
168	serge	1	;
		2	; This file is part of the Infinity sound library.
		3	; (C) copyright Serge 2006
		4	; email: infinity_sound@mail.ru
		5	;
		6	; This program is free software; you can redistribute it and/or modify
		7	; it under the terms of the GNU General Public License as published by
		8	; the Free Software Foundation; either version 2 of the License, or
		9	; (at your option) any later version.
		10	;
		11	; This program is distributed in the hope that it will be useful,
		12	; but WITHOUT ANY WARRANTY; without even the implied warranty of
		13	; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
		14	; GNU General Public License for more details.
		15
		16	align 4
		17	proc new_mix stdcall, output:dword
281	serge	18	locals
		19	mixCounter dd ?
		20	mixIndex dd ?
		21	streamIndex dd ?
		22	inputCount dd ?
		23	main_count dd ?
		24	blockCount dd ?
		25	mix_out dd ?
		26	endl
168	serge	27
281	serge	28	call prepare_playlist
168	serge	29
281	serge	30	cmp [play_count], 0
		31	je .exit
188	serge	32	call FpuSave
281	serge	33	mov [main_count], 32;
168	serge	34	.l00:
281	serge	35	mov [mix_buff_map], 0x0000FFFF;
		36	xor eax, eax
		37	mov [mixCounter], eax
		38	mov [mixIndex],eax
		39	mov [streamIndex], eax;
		40	mov ebx, [play_count]
		41	mov [inputCount], ebx
168	serge	42	.l0:
281	serge	43	mov ecx, 4
168	serge	44	.l1:
281	serge	45	mov ebx, [streamIndex]
		46	mov esi, [play_list+ebx*4]
		47	mov eax, [esi+STREAM.work_read]
		48	add [esi+STREAM.work_read], 512
168	serge	49
281	serge	50	mov ebx, [mixIndex]
		51	mov [mix_input+ebx*4], eax
		52	inc [mixCounter]
		53	inc [mixIndex]
		54	inc [streamIndex]
		55	dec [inputCount]
		56	jz .m2
168	serge	57
281	serge	58	dec ecx
		59	jnz .l1
168	serge	60
281	serge	61	cmp [mixCounter], 4
		62	jnz .m2
168	serge	63
281	serge	64	stdcall mix_4_1, [mix_input],[mix_input+4],[mix_input+8],[mix_input+12]
		65	sub [mixIndex],4
		66	mov ebx, [mixIndex]
		67	mov [mix_input+ebx*4], eax
		68	inc [mixIndex]
		69	mov [mixCounter], 0
168	serge	70
281	serge	71	cmp [inputCount], 0
		72	jnz .l0
168	serge	73	.m2:
281	serge	74	cmp [mixIndex], 1
		75	jne @f
		76	stdcall copy_mem, [output], [mix_input]
		77	jmp .m3
168	serge	78	@@:
281	serge	79	cmp [mixIndex], 2
		80	jne @f
		81	stdcall mix_2_1, [output], [mix_input], [mix_input+4]
		82	jmp .m3
168	serge	83	@@:
281	serge	84	cmp [mixIndex], 3
		85	jne @f
		86	stdcall mix_3_1, [output],[mix_input],[mix_input+4],[mix_input+8]
		87	jmp .m3
168	serge	88	@@:
281	serge	89	stdcall final_mix, [output],[mix_input],[mix_input+4],[mix_input+8], [mix_input+12]
168	serge	90	.m3:
281	serge	91	add [output],512
168	serge	92
293	serge	93	dec [main_count]
281	serge	94	jnz .l00
168	serge	95
281	serge	96	call update_stream
203	serge	97	emms
188	serge	98	call FpuRestore
281	serge	99	ret
168	serge	100	.exit:
281	serge	101	mov edi, [output]
		102	mov ecx, 0x1000
		103	xor eax, eax
		104	cld
		105	rep stosd
		106	ret
168	serge	107	endp
		108
		109	align 4
		110	proc update_stream
281	serge	111	locals
170	serge	112	stream_index dd ?
227	serge	113	ev_code dd ? ;EVENT
		114	ev_offs dd ?
		115	rd 4
281	serge	116	endl
168	serge	117
281	serge	118	mov [stream_index], 0
168	serge	119	.l1:
281	serge	120	mov edx, [stream_index]
		121	mov esi, [play_list+edx*4]
168	serge	122
281	serge	123	mov eax, [esi+STREAM.work_read]
		124	cmp eax, [esi+STREAM.work_top]
		125	jb @f
328	serge	126	sub eax, 64*1024
168	serge	127	@@:
281	serge	128	mov [esi+STREAM.work_read], eax
168	serge	129
281	serge	130	cmp [esi+STREAM.format], PCM_2_16_48
		131	je .copy
168	serge	132
281	serge	133	sub [esi+STREAM.work_count], 16384
168	serge	134
281	serge	135	cmp [esi+STREAM.work_count], 32768
		136	ja @f
168	serge	137
281	serge	138	stdcall refill, esi
168	serge	139	@@:
281	serge	140	inc [stream_index]
		141	dec [play_count]
		142	jnz .l1
		143	ret
168	serge	144	.copy:
281	serge	145	mov ebx, esi
		146	mov edi, [ebx+STREAM.work_write]
		147	cmp edi, [ebx+STREAM.work_top]
		148	jb @f
328	serge	149
		150	sub edi, 64*1024
281	serge	151	mov [ebx+STREAM.work_write], edi
168	serge	152	@@:
281	serge	153	mov esi, [ebx+STREAM.curr_seg]
		154	mov ecx, 16384/4
		155	cld
		156	rep movsd
168	serge	157
		158	mov [ebx+STREAM.work_write], edi
		159
281	serge	160	cmp esi, [ebx+STREAM.lim_0]
		161	jb @f
168	serge	162
281	serge	163	mov esi, [ebx+STREAM.seg_0]
		164	mov eax, [ebx+STREAM.lim_0]
		165	xchg esi, [ebx+STREAM.seg_1]
		166	xchg eax, [ebx+STREAM.lim_1]
		167	mov [ebx+STREAM.seg_0], esi
		168	mov [ebx+STREAM.lim_0], eax
168	serge	169	@@:
281	serge	170	mov [ebx+STREAM.curr_seg], esi
168	serge	171
281	serge	172	xor ecx, ecx
		173	cmp esi, [ebx+STREAM.notify_off2]
		174	je @f
168	serge	175
281	serge	176	mov ecx,0x8000
		177	cmp esi, [ebx+STREAM.notify_off1]
		178	je @f
168	serge	179
281	serge	180	inc [stream_index]
		181	dec [play_count]
		182	jnz .l1
		183	ret
168	serge	184	@@:
227	serge	185	mov [ev_code], 0xFF000001
		186	mov [ev_offs], ecx
291	serge	187	mov eax, [ebx+STREAM.pid]
227	serge	188
		189	lea edx, [ev_code]
		190	push ebx
		191	stdcall SendEvent, eax, edx
		192	pop ebx
168	serge	193	test eax, eax
227	serge	194	jnz .l_end
		195
168	serge	196	not eax
291	serge	197	mov [ebx+STREAM.pid], eax ;-1
168	serge	198	.l_end:
281	serge	199	inc [stream_index]
		200	dec [play_count]
		201	jnz .l1
		202	ret
168	serge	203	endp
		204
		205	align 4
		206	proc refill stdcall, str:dword
281	serge	207	locals
227	serge	208	ev_code dd ? ;EVENT
		209	ev_offs dd ?
		210	rd 4
281	serge	211	endl
168	serge	212
281	serge	213	mov ebx, [str]
328	serge	214	mov edi, [ebx+STREAM.work_write]
		215	cmp edi, [ebx+STREAM.work_top]
		216	jb @F
		217	sub edi, 64*1024
281	serge	218	mov [ebx+STREAM.work_write], edi
328	serge	219	@@:
281	serge	220	mov esi, [ebx+STREAM.curr_seg]
		221	mov edi, [ebx+STREAM.work_write]
168	serge	222
285	serge	223	stdcall [ebx+STREAM.resample], edi, esi, \
281	serge	224	[ebx+STREAM.r_dt],[ebx+STREAM.r_size],[ebx+STREAM.r_end]
168	serge	225
281	serge	226	mov ebx, [str]
168	serge	227
281	serge	228	add [ebx+STREAM.work_count], eax;
		229	add [ebx+STREAM.work_write], eax;
168	serge	230
281	serge	231	mov eax, [ebx+STREAM.curr_seg]
		232	add eax, [ebx+STREAM.r_size]
		233	cmp eax, [ebx+STREAM.lim_0]
		234	jb @f
		235
285	serge	236	mov esi, [ebx+STREAM.seg_0]
		237	lea edi, [esi-128]
		238	add esi, 0x7F80
		239	mov ecx, 128/4
		240	cld
		241	rep movsd
		242
281	serge	243	mov eax, [ebx+STREAM.seg_0]
		244	mov ecx, [ebx+STREAM.lim_0]
		245	xchg eax, [ebx+STREAM.seg_1]
		246	xchg ecx, [ebx+STREAM.lim_1]
		247	mov [ebx+STREAM.seg_0], eax
		248	mov [ebx+STREAM.lim_0], ecx
168	serge	249	@@:
281	serge	250	mov [ebx+STREAM.curr_seg], eax
168	serge	251
281	serge	252	xor ecx, ecx
		253	cmp eax, [ebx+STREAM.notify_off2]
		254	je @f
168	serge	255
281	serge	256	mov ecx,0x8000
		257	cmp eax, [ebx+STREAM.notify_off1]
		258	je @f
		259	ret
168	serge	260	@@:
227	serge	261	mov [ev_code], 0xFF000001
		262	mov [ev_offs], ecx
291	serge	263	mov eax, [ebx+STREAM.pid]
227	serge	264
		265	lea edx, [ev_code]
		266	push ebx
		267	stdcall SendEvent, eax, edx
		268	pop ebx
168	serge	269	test eax, eax
227	serge	270	jnz @F
168	serge	271	not eax
291	serge	272	mov [ebx+STREAM.pid], eax ;-1
168	serge	273	@@:
291	serge	274	ret
168	serge	275	endp
		276
		277	align 4
285	serge	278	proc resample_1 stdcall, dest:dword,src:dword,\
291	serge	279	r_dt:dword, r_size:dword,r_end:dword
168	serge	280
285	serge	281	; dest equ esp+8
		282	; src equ esp+12
		283	; r_dt equ esp+16
		284	; r_size equ esp+20
		285	;r_end equ esp+24
168	serge	286
285	serge	287	mov edi, [dest]
		288	mov edx, [src]
		289	sub edx, 32*2
		290	mov eax, 16
168	serge	291
		292	align 16
		293	.l1:
291	serge	294	mov ecx, eax
		295	mov esi, eax
		296	and ecx, 0x7FFF
		297	shr esi, 15
		298	lea esi, [edx+esi*2]
168	serge	299
291	serge	300	movsx ebp, word [esi]
		301	movsx esi, word [esi+2]
		302	mov ebx, 32768
		303	imul esi, ecx
		304	sub ebx, ecx
		305	imul ebx, ebp
		306	lea ecx, [ebx+esi+16384]
		307	sar ecx, 15
		308	cmp ecx, 32767 ; 00007fffH
		309	jle @f
		310	mov ecx, 32767 ; 00007fffH
		311	jmp .write
168	serge	312	@@:
291	serge	313	cmp ecx, -32768 ; ffff8000H
		314	jge .write
		315	mov ecx, -32768 ; ffff8000H
168	serge	316	.write:
291	serge	317	mov ebx, ecx
		318	shl ebx, 16
		319	mov bx, cx
		320	mov [edi], ebx
		321	add edi, 4
168	serge	322
293	serge	323	add eax, [esp+16]
		324	cmp eax, [esp+24]
291	serge	325	jb .l1
168	serge	326
291	serge	327	mov ebp, esp
168	serge	328
291	serge	329	sub edi, [dest]
		330	mov eax, edi
		331	ret
168	serge	332	endp
		333
		334	align 4
285	serge	335	proc resample_18 stdcall, dest:dword,src:dword,\
291	serge	336	r_dt:dword, r_size:dword,r_end:dword
168	serge	337
		338
291	serge	339	mov edi, [dest]
285	serge	340	mov edx, [src]
		341	sub edx, 32
		342
291	serge	343	mov esi, 16
168	serge	344
		345	align 16
		346	.l1:
291	serge	347	mov ecx, esi
		348	mov eax, esi
		349	and ecx, 0x7FFF
		350	shr eax, 15
		351	lea eax, [edx+eax]
168	serge	352
291	serge	353	mov bx, word [eax]
		354	sub bh, 0x80
		355	sub bl, 0x80
		356	movsx eax, bh
		357	shl eax,8
		358	movsx ebp, bl
		359	shl ebp,8
		360	mov ebx, 32768
		361	imul eax, ecx
		362	sub ebx, ecx
		363	imul ebx, ebp
		364	lea ecx, [ebx+eax+16384]
		365	sar ecx, 15
		366	cmp ecx, 32767 ; 00007fffH
		367	jle @f
		368	mov ecx, 32767 ; 00007fffH
		369	jmp .write
168	serge	370	@@:
291	serge	371	cmp ecx, -32768 ; ffff8000H
		372	jge .write
		373	mov ecx, -32768 ; ffff8000H
168	serge	374	.write:
291	serge	375	mov ebx, ecx
		376	shl ebx, 16
		377	mov bx, cx
		378	mov [edi], ebx
		379	add edi, 4
168	serge	380
293	serge	381	add esi, [esp+16]
		382	cmp esi, [esp+24]
291	serge	383	jb .l1
168	serge	384
291	serge	385	mov ebp, esp
		386	sub edi, [dest]
		387	mov eax, edi
		388	ret
168	serge	389	endp
		390
		391	align 4
285	serge	392	proc copy_stream stdcall, dest:dword,src:dword,\
291	serge	393	r_dt:dword, r_size:dword,r_end:dword
168	serge	394
281	serge	395	mov ecx, [r_size]
		396	mov eax, ecx
		397	shr ecx, 2
		398	mov esi, [src]
		399	mov edi, [dest]
		400	rep movsd
		401	mov eax, 16384
		402	ret
168	serge	403	endp
		404
		405	align 4
285	serge	406	proc resample_2 stdcall, dest:dword,src:dword,\
291	serge	407	r_dt:dword, r_size:dword,r_end:dword
168	serge	408
285	serge	409	mov edx, [src]
		410	sub edx, 32*4
		411	mov edi, [dest]
		412	mov ebx, [r_dt]
		413	mov eax, 16
		414	emms
168	serge	415
		416	align 16
		417	.l1:
285	serge	418	mov ecx, eax
		419	mov esi, eax
		420	and ecx, 0x7FFF
		421	shr esi, 15
		422	lea esi, [edx+esi*4]
168	serge	423
285	serge	424	movq mm0, [esi]
		425	movq mm1, mm0
168	serge	426
285	serge	427	movd mm2, ecx
		428	punpcklwd mm2, mm2
		429	movq mm3, qword [m7] ;0x8000
168	serge	430
285	serge	431	psubw mm3, mm2 ; ;0x8000 - iconst
		432	punpckldq mm3, mm2
168	serge	433
285	serge	434	pmulhw mm0, mm3
		435	pmullw mm1, mm3
168	serge	436
285	serge	437	movq mm4, mm1
		438	punpcklwd mm1, mm0
		439	punpckhwd mm4, mm0
		440	paddd mm1, mm4
		441	psrad mm1, 15
		442	packssdw mm1, mm1
		443	movd [edi], mm1
		444	add edi, 4
168	serge	445
285	serge	446	add eax, ebx
		447	cmp eax, [r_end]
		448	jb .l1
		449	emms
168	serge	450
285	serge	451	sub edi, [dest]
		452	mov eax, edi
		453	ret
168	serge	454	endp
		455
		456	align 4
285	serge	457	proc resample_28 stdcall, dest:dword,src:dword,\
291	serge	458	r_dt:dword, r_size:dword,r_end:dword
168	serge	459
285	serge	460	mov edx, [src]
		461	sub edx, 32*2
		462	mov edi, [dest]
		463	mov ebx, [r_dt]
		464	mov eax, 16
		465	emms
		466	movq mm7,[mm80]
		467	movq mm6,[mm_mask]
168	serge	468
		469	align 16
		470	.l1:
291	serge	471	mov ecx, eax
		472	mov esi, eax
		473	and ecx, 0x7FFF
		474	shr esi, 15
		475	lea esi, [edx+esi*2]
168	serge	476
291	serge	477	movq mm0, [esi]
		478	psubb mm0,mm7
		479	punpcklbw mm0,mm0
		480	pand mm0,mm6
168	serge	481
291	serge	482	movq mm1, mm0
168	serge	483
291	serge	484	movd mm2, ecx
		485	punpcklwd mm2, mm2
		486	movq mm3, qword [m7] ; // 0x8000
168	serge	487
291	serge	488	psubw mm3, mm2 ; // 0x8000 - iconst
		489	punpckldq mm3, mm2
168	serge	490
291	serge	491	pmulhw mm0, mm3
		492	pmullw mm1, mm3
168	serge	493
291	serge	494	movq mm4, mm1
		495	punpcklwd mm1, mm0
		496	punpckhwd mm4, mm0
		497	paddd mm1, mm4
		498	psrad mm1, 15
		499	packssdw mm1, mm1
		500	movd [edi], mm1
		501	add edi, 4
168	serge	502
291	serge	503	add eax, ebx
		504	cmp eax, [r_end]
		505	jb .l1
		506	emms
168	serge	507
		508
291	serge	509	sub edi, [dest]
		510	mov eax, edi
		511	ret
168	serge	512	endp
		513
		514
285	serge	515	proc m16_stereo stdcall, dest:dword,src:dword,\
291	serge	516	r_dt:dword, r_size:dword,r_end:dword
168	serge	517
291	serge	518	mov esi, [src]
		519	mov edi, [dest]
		520	mov ecx, [r_size]
		521	shr ecx,8
168	serge	522	@@:
291	serge	523	call m16_s_mmx
		524	add edi, 128
		525	add esi, 64
		526	call m16_s_mmx
		527	add edi, 128
		528	add esi, 64
		529	call m16_s_mmx
		530	add edi, 128
		531	add esi, 64
		532	call m16_s_mmx
		533	add edi, 128
		534	add esi, 64
		535	dec ecx
		536	jnz @b
168	serge	537
291	serge	538	mov eax, [r_size]
		539	add eax, eax
		540	ret
168	serge	541	endp
		542
		543	align 4
285	serge	544	proc s8_stereo stdcall, dest:dword,src:dword,\
291	serge	545	r_dt:dword, r_size:dword,r_end:dword
168	serge	546
281	serge	547	mov esi, [src]
		548	mov edi, [dest]
		549	mov ecx, [r_size]
		550	shr ecx, 7
168	serge	551
281	serge	552	movq mm7, [mm80]
		553	movq mm6, [mm_mask]
168	serge	554	@@:
281	serge	555	call s8_s_mmx
		556	add edi, 64
		557	add esi, 32
		558	call s8_s_mmx
		559	add edi, 64
		560	add esi, 32
		561	call s8_s_mmx
		562	add edi, 64
		563	add esi, 32
		564	call s8_s_mmx
		565	add edi, 64
		566	add esi, 32
168	serge	567	dec ecx
281	serge	568	jnz @b
168	serge	569
281	serge	570	mov eax, [r_size]
		571	add eax, eax
		572	ret
168	serge	573	endp
		574
285	serge	575	proc m8_stereo stdcall, dest:dword,src:dword,\
291	serge	576	r_dt:dword, r_size:dword,r_end:dword
168	serge	577
281	serge	578	mov esi, [src]
		579	mov edi, [dest]
		580	mov ecx, [r_size]
		581	shr ecx, 6
168	serge	582
281	serge	583	movq mm7, [mm80]
		584	movq mm6, [mm_mask]
168	serge	585	@@:
281	serge	586	call m8_s_mmx
		587	add edi, 64
		588	add esi, 16
		589	call m8_s_mmx
		590	add edi, 64
		591	add esi, 16
		592	call m8_s_mmx
		593	add edi, 64
		594	add esi, 16
		595	call m8_s_mmx
		596	add edi, 64
		597	add esi, 16
		598	dec ecx
		599	jnz @b
168	serge	600
281	serge	601	mov eax, [r_size]
		602	add eax, eax
		603	add eax, eax
		604	ret
168	serge	605	endp
		606
		607	align 4
		608	proc alloc_mix_buff
		609
281	serge	610	bsf eax, [mix_buff_map]
		611	jnz .find
		612	xor eax, eax
		613	ret
168	serge	614	.find:
281	serge	615	btr [mix_buff_map], eax
		616	shl eax, 9
		617	add eax, [mix_buff]
		618	ret
168	serge	619	endp
		620
293	serge	621	align 4
168	serge	622	proc m16_s_mmx
		623
291	serge	624	movq mm0, [esi]
		625	movq mm1, mm0
		626	punpcklwd mm0, mm0
		627	punpckhwd mm1, mm1
		628	movq [edi], mm0
		629	movq [edi+8], mm1
168	serge	630
291	serge	631	movq mm0, [esi+8]
		632	movq mm1, mm0
		633	punpcklwd mm0, mm0
		634	punpckhwd mm1, mm1
		635	movq [edi+16], mm0
		636	movq [edi+24], mm1
168	serge	637
291	serge	638	movq mm0, [esi+16]
		639	movq mm1, mm0
		640	punpcklwd mm0, mm0
		641	punpckhwd mm1, mm1
		642	movq [edi+32], mm0
		643	movq [edi+40], mm1
168	serge	644
291	serge	645	movq mm0, [esi+24]
		646	movq mm1, mm0
		647	punpcklwd mm0, mm0
		648	punpckhwd mm1, mm1
		649	movq [edi+48], mm0
		650	movq [edi+56], mm1
168	serge	651
291	serge	652	movq mm0, [esi+32]
		653	movq mm1, mm0
		654	punpcklwd mm0, mm0
		655	punpckhwd mm1, mm1
		656	movq [edi+64], mm0
		657	movq [edi+72], mm1
168	serge	658
291	serge	659	movq mm0, [esi+40]
		660	movq mm1, mm0
		661	punpcklwd mm0, mm0
		662	punpckhwd mm1, mm1
		663	movq [edi+80], mm0
		664	movq [edi+88], mm1
168	serge	665
		666
291	serge	667	movq mm0, [esi+48]
		668	movq mm1, mm0
		669	punpcklwd mm0, mm0
		670	punpckhwd mm1, mm1
		671	movq [edi+96], mm0
		672	movq [edi+104], mm1
168	serge	673
291	serge	674	movq mm0, [esi+56]
		675	movq mm1, mm0
		676	punpcklwd mm0, mm0
		677	punpckhwd mm1, mm1
		678	movq [edi+112], mm0
		679	movq [edi+120], mm1
168	serge	680
291	serge	681	ret
168	serge	682	endp
		683
		684	align 4
		685	proc s8_s_mmx
		686
281	serge	687	movq mm0, [esi]
		688	psubb mm0, mm7
		689	movq mm1, mm0
		690	punpcklbw mm0, mm0
		691	pand mm0, mm6
		692	punpckhbw mm1, mm1
		693	pand mm1, mm6
		694	movq [edi], mm0
		695	movq [edi+8], mm1
168	serge	696
281	serge	697	movq mm0, [esi+8]
		698	psubb mm0, mm7
		699	movq mm1, mm0
		700	punpcklbw mm0, mm0
		701	pand mm0, mm6
		702	punpckhbw mm1, mm1
		703	pand mm1, mm6
		704	movq [edi+16], mm0
		705	movq [edi+24], mm1
168	serge	706
281	serge	707	movq mm0, [esi+16]
		708	psubb mm0, mm7
		709	movq mm1, mm0
		710	punpcklbw mm0, mm0
		711	pand mm0, mm6
		712	punpckhbw mm1, mm1
		713	pand mm1, mm6
		714	movq [edi+32], mm0
		715	movq [edi+40], mm1
168	serge	716
281	serge	717	movq mm0, [esi+24]
		718	psubb mm0, mm7
		719	movq mm1, mm0
		720	punpcklbw mm0, mm0
		721	pand mm0, mm6
		722	punpckhbw mm1, mm1
		723	pand mm1, mm6
		724	movq [edi+48], mm0
		725	movq [edi+56], mm1
168	serge	726
281	serge	727	ret
168	serge	728
		729	endp
		730
		731	align 4
		732	proc m8_s_mmx
		733
281	serge	734	movq mm0, [esi]
		735	psubb mm0, mm7
		736	movq mm1, mm0
		737	punpcklbw mm0, mm0
		738	pand mm0, mm6
		739	punpckhbw mm1, mm1
		740	pand mm1, mm6
		741	movq mm2, mm0
		742	punpcklwd mm0, mm0
		743	punpckhwd mm2, mm2
168	serge	744
281	serge	745	movq mm3, mm1
		746	punpcklwd mm1, mm1
		747	punpckhwd mm3, mm3
168	serge	748
281	serge	749	movq [edi], mm0
		750	movq [edi+8], mm2
		751	movq [edi+16], mm1
		752	movq [edi+24], mm3
168	serge	753
281	serge	754	movq mm0, [esi+8]
		755	psubb mm0, mm7
		756	movq mm1, mm0
		757	punpcklbw mm0, mm0
		758	pand mm0, mm6
		759	punpckhbw mm1, mm1
		760	pand mm1, mm6
		761	movq mm2, mm0
		762	punpcklwd mm0, mm0
		763	punpckhwd mm2, mm2
168	serge	764
281	serge	765	movq mm3, mm1
		766	punpcklwd mm1, mm1
		767	punpckhwd mm3, mm3
168	serge	768
281	serge	769	movq [edi+32], mm0
		770	movq [edi+40], mm2
		771	movq [edi+48], mm1
		772	movq [edi+56], mm3
168	serge	773
281	serge	774	ret
168	serge	775	endp
		776
		777	align 4
		778	proc mix_2_1 stdcall, output:dword, str0:dword, str1:dword
		779
281	serge	780	mov edi, [output]
293	serge	781	mov eax, [str0]
		782	mov ebx, [str1]
		783	mov esi, 128
		784	call [mix_2_core] ;edi, eax, ebx
168	serge	785
293	serge	786	add edi, esi
		787	add eax, esi
		788	add ebx, esi
		789	call [mix_2_core] ;edi, eax, ebx
168	serge	790
293	serge	791	add edi, esi
		792	add eax, esi
		793	add ebx, esi
		794	call [mix_2_core] ;edi, eax, ebx
		795
		796	add edi, esi
		797	add eax, esi
		798	add ebx, esi
		799	call [mix_2_core] ;edi, eax, ebx
281	serge	800	ret
168	serge	801	endp
		802
		803	align 4
		804	proc mix_3_1 stdcall, output:dword, str0:dword, str1:dword, str2:dword
		805
291	serge	806	mov edi, [output]
293	serge	807	mov eax, [str0]
		808	mov ebx, [str1]
		809	mov ecx, [str2]
		810	mov esi, 128
		811	call [mix_3_core]
168	serge	812
293	serge	813	add edi, esi
		814	add eax, esi
		815	add ebx, esi
		816	add ecx, esi
		817	call [mix_3_core]
168	serge	818
293	serge	819	add edi, esi
		820	add eax, esi
		821	add ebx, esi
		822	add ecx, esi
		823	call [mix_3_core]
		824
		825	add edi, esi
		826	add eax, esi
		827	add ebx, esi
		828	add ecx, esi
		829	call [mix_3_core]
291	serge	830	ret
168	serge	831	endp
		832
		833	align 4
		834	proc mix_4_1 stdcall, str0:dword, str1:dword,\
291	serge	835	str2:dword, str3:dword
168	serge	836
291	serge	837	local output:DWORD
168	serge	838
291	serge	839	call alloc_mix_buff
		840	and eax, eax
		841	jz .err
168	serge	842
291	serge	843	mov edi, eax
293	serge	844	mov eax, [str0]
		845	mov ebx, [str1]
		846	mov ecx, [str2]
		847	mov edx, [str3]
		848	mov esi, 128
		849	call [mix_4_core] ;edi, eax, ebx, ecx, edx
168	serge	850
293	serge	851	add edi, esi
		852	add eax, esi
		853	add ebx, esi
		854	add ecx, esi
		855	add edx, esi
		856	call [mix_4_core] ;edi, eax, ebx, ecx, edx
		857
		858	add edi, esi
		859	add eax, esi
		860	add ebx, esi
		861	add ecx, esi
		862	add edx, esi
		863	call [mix_4_core] ;edi, eax, ebx, ecx, edx
		864
		865	add edi, esi
		866	add eax, esi
		867	add ebx, esi
		868	add ecx, esi
		869	add edx, esi
		870	call [mix_4_core] ;edi, eax, ebx, ecx, edx
291	serge	871	mov eax, [output]
		872	ret
168	serge	873	.err:
291	serge	874	xor eax, eax
		875	ret
168	serge	876	endp
		877
		878
		879	align 4
		880	proc final_mix stdcall, output:dword, str0:dword, str1:dword,\
291	serge	881	str2:dword, str3:dword
168	serge	882
291	serge	883	mov edi, [output]
168	serge	884
281	serge	885	mov eax, [str0]
		886	mov ebx, [str1]
		887	mov ecx, [str2]
293	serge	888	mov edx, [str3]
		889	mov esi, 128
		890	call [mix_4_core] ;edi, eax, ebx, ecx, edx
168	serge	891
293	serge	892	add edi, esi
		893	add eax, esi
		894	add ebx, esi
		895	add ecx, esi
		896	add edx, esi
		897	call [mix_4_core] ;edi, eax, ebx, ecx, edx
168	serge	898
293	serge	899	add edi, esi
		900	add eax, esi
		901	add ebx, esi
		902	add ecx, esi
		903	add edx, esi
		904	call [mix_4_core] ;edi, eax, ebx, ecx, edx
168	serge	905
293	serge	906	add edi, esi
		907	add eax, esi
		908	add ebx, esi
		909	add ecx, esi
		910	add edx, esi
		911	call [mix_4_core] ;edi, eax, ebx, ecx, edx
281	serge	912	ret
168	serge	913	endp
		914
		915	align 4
		916	proc copy_mem stdcall, output:dword, input:dword
		917
291	serge	918	mov edi, [output]
		919	mov esi, [input]
		920	mov ecx, 0x80
168	serge	921	.l1:
291	serge	922	mov eax, [esi]
		923	mov [edi], eax
		924	add esi, 4
		925	add edi, 4
		926	loop .l1
168	serge	927
291	serge	928	ret
168	serge	929	endp
		930
		931	proc memcpy
		932	@@:
291	serge	933	mov eax, [esi]
		934	mov [edi], eax
		935	add esi, 4
		936	add edi, 4
		937	dec ecx
		938	jnz @B
		939	ret
168	serge	940	endp
		941

Subversion Repositories Kolibri OS

(root)/kernel/trunk/drivers/mixer.asm – Rev 328