WebSVN – Kolibri OS – Blame – /kernel/trunk/core/dll.inc

Rev	Author	Line No.	Line
164	serge	1
227	serge	2	DRV_EXIT equ -1
		3	DRV_COMPAT equ 3 ;minimal required drivers version
287	serge	4	DRV_CURRENT equ 3 ;current drivers model version
		5
214	serge	6
227	serge	7
		8
164	serge	9	proc attach_int_handler stdcall, irq:dword, handler:dword
		10
		11
		12	test ebx, ebx
		13	jz .err
		14	mov eax, [handler]
		15	test eax, eax
		16	jz .err
		17	mov [irq_tab+ebx*4], eax
		18	stdcall enable_irq, [irq]
		19	ret
		20	.err:
		21	xor eax, eax
		22	ret
		23	endp
		24
		25
		26	proc detach_int_handler
		27
		28
		29	endp
		30
		31
		32	proc enable_irq stdcall, irq_line:dword
		33	mov ebx, [irq_line]
		34	mov edx, 0x21
		35	cmp ebx, 8
		36	jb @F
		37	mov edx, 0xA1
		38	sub ebx,8
		39	@@:
		40	in al,dx
		41	btr eax, ebx
		42	out dx, al
		43	ret
		44	endp
		45
		46
		47	;; proc irq_serv
		48
		49
		50
		51
		52	push eax
		53	mov eax, 1
		54	jmp .main
		55	align 4
		56	.irq_2:
		57	push eax
		58	mov eax, 2
		59	jmp .main
		60	align 4
		61	.irq_3:
		62	push eax
		63	mov eax, 3
		64	jmp .main
		65	align 4
		66	.irq_4:
		67	push eax
		68	mov eax, 4
		69	jmp .main
		70	align 4
		71	.irq_5:
		72	push eax
		73	mov eax, 5
		74	jmp .main
		75	align 4
		76	.irq_6:
		77	push eax
		78	mov eax, 6
		79	jmp .main
		80	align 4
		81	.irq_7:
		82	push eax
		83	mov eax, 7
		84	jmp .main
		85	align 4
		86	.irq_8:
		87	push eax
		88	mov eax, 8
		89	jmp .main
		90	align 4
		91	.irq_9:
		92	push eax
		93	mov eax, 9
		94	jmp .main
		95	align 4
		96	.irq_10:
		97	push eax
		98	mov eax, 10
		99	jmp .main
		100	align 4
		101	.irq_11:
		102	push eax
		103	mov eax, 11
		104	jmp .main
		105	align 4
		106	.irq_12:
		107	push eax
		108	mov eax, 12
		109	jmp .main
		110	align 4
		111	.irq_13:
		112	push eax
		113	mov eax, 13
		114	jmp .main
		115	align 4
		116	.irq_14:
		117	push eax
		118	mov eax, 14
		119	jmp .main
		120	align 4
		121	.irq_15:
		122	push eax
		123	mov eax, 15
		124	jmp .main
		125
		126
		127	.main:
		128	save_ring3_context
		129	mov bx, os_data
		130	mov ds, bx
		131	mov es, bx
		132
		133
		134	test ebx, ebx
		135	jz .exit
		136
		137
		138
		139
		140	restore_ring3_context
		141
		142
		143	mov al, 0x20
		144	jb @f
		145	out 0xa0, al
		146	@@:
		147	out 0x20, al
		148
		149
		150	iret
		151
		152
		153	proc get_notify stdcall, p_ev:dword
		154
		155
		156	mov ebx,[CURRENT_TASK]
		157	shl ebx,8
		158	test dword [ebx+PROC_BASE+0xA8],EVENT_NOTIFY
		159	jz @f
		160	and dword [ebx+PROC_BASE+0xA8], not EVENT_NOTIFY
		161	mov edi, [p_ev]
		162	mov dword [edi], EV_INTR
		163	mov eax, [ebx+PROC_BASE+APPDATA.event]
		164	mov dword [edi+4], eax
		165	ret
		166	@@:
		167	call change_task
		168	jmp .wait
		169	endp
		170
		171
		172	proc pci_read32 stdcall, bus:dword, devfn:dword, reg:dword
		173	xor eax, eax
		174	xor ebx, ebx
		175	mov ah, byte [bus]
		176	mov al, 6
		177	mov bh, byte [devfn]
		178	mov bl, byte [reg]
		179	call pci_read_reg
		180	ret
		181	endp
		182
		183
		184	proc pci_read8 stdcall, bus:dword, devfn:dword, reg:dword
		185	xor eax, eax
		186	xor ebx, ebx
		187	mov ah, byte [bus]
		188	mov al, 4
		189	mov bh, byte [devfn]
		190	mov bl, byte [reg]
		191	call pci_read_reg
		192	ret
		193	endp
		194
		195
		196	proc pci_write8 stdcall, bus:dword, devfn:dword, reg:dword, val:dword
		197	xor eax, eax
		198	xor ebx, ebx
		199	mov ah, byte [bus]
		200	mov al, 8
		201	mov bh, byte [devfn]
		202	mov bl, byte [reg]
		203	mov ecx, [val]
		204	call pci_write_reg
		205	ret
		206	endp
		207
		208
		209	io_code equ IOCTL.io_code
		210	input equ IOCTL.input
		211	inp_size equ IOCTL.inp_size
		212	output equ IOCTL.output
		213	out_size equ IOCTL.out_size
		214
		215
		216
		217	proc srv_handler stdcall, ioctl:dword
		218	mov esi, [ioctl]
		219	test esi, esi
		220	jz .err
		221
		222
		223	cmp [edi+SRV.magic], ' SRV'
		224	jne .fail
		225
		226
		227	jne .fail
		228
		229
		230	ret
		231	.fail:
		232	xor eax, eax
		233	not eax
		234	mov [esi+output], eax
		235	mov [esi+out_size], 4
		236	ret
		237	.err:
		238	xor eax, eax
		239	not eax
		240	ret
		241	endp
		242
		243
		244	proc srv_handlerEx stdcall, ioctl:dword
		245	mov esi, [ioctl]
		246	test esi, esi
		247	jz .err
		248	add esi, new_app_base
		249
		250
		251	cmp [edi+SRV.magic], ' SRV'
		252	jne .fail
		253
		254
		255	jne .fail
		256
		257
		258	add [esi+output], new_app_base
		259
		260
		261	ret
		262	.fail:
		263	xor eax, eax
		264	not eax
		265	mov [esi+output], eax
		266	mov [esi+out_size], 4
		267	ret
		268	.err:
		269	xor eax, eax
		270	not eax
		271	ret
		272	endp
		273
		274
		275	restore io_code
		276	restore input
		277	restore inp_size
		278	restore output
		279	restore out_size
		280
		281
		282	proc get_service stdcall, sz_name:dword
		283	mov eax, [sz_name]
188	serge	284	test eax, eax
		285	jnz @F

Subversion Repositories Kolibri OS

(root)/kernel/trunk/core/dll.inc @ 465 – Rev 363