WebSVN – Kolibri OS – Blame – /kernel/branches/Kolibri-acpi/boot/bootvesa.inc

Rev	Author	Line No.	Line
750	victor	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
5565	serge	3	;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
750	victor	4	;; Distributed under terms of the GNU General Public License ;;
		5	;; ;;
		6	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
714	Lrz	7
750	victor	8	$Revision: 5565 $
		9
714	Lrz	10	struc VBE_VGAInfo {
		11	.VESASignature dd ? ; char
		12	.VESAVersion dw ? ; short
		13	.OemStringPtr dd ? ; char *
		14	.Capabilities dd ? ; ulong
		15	.VideoModePtr dd ? ; ulong
		16	.TotalMemory dw ? ; short
		17	; VBE 2.0+
		18	.OemSoftwareRev db ? ; short
		19	.OemVendorNamePtr dw ? ; char *
		20	.OemProductNamePtr dw ? ; char *
		21	.OemProductRevPtr dw ? ; char *
		22	.reserved rb 222 ; char
		23	.OemData rb 256 ; char
		24	}
		25
		26	struc VBE_ModeInfo {
		27	.ModeAttributes dw ? ; short
		28	.WinAAttributes db ? ; char
		29	.WinBAttributes db ? ; char
		30	.WinGranularity dw ? ; short
		31	.WinSize dw ? ; short
		32	.WinASegment dw ? ; ushort
		33	.WinBSegment dw ? ; ushort
		34	.WinFuncPtr dd ? ; void *
		35	.BytesPerScanLine dw ? ; short
		36	.XRes dw ? ; short
		37	.YRes dw ? ; short
		38	.XCharSize db ? ; char
		39	.YCharSize db ? ; char
		40	.NumberOfPlanes db ? ; char
		41	.BitsPerPixel db ? ; char
		42	.NumberOfBanks db ? ; char
		43	.MemoryModel db ? ; char
		44	.BankSize db ? ; char
		45	.NumberOfImagePages db ? ; char
		46	.res1 db ? ; char
		47	.RedMaskSize db ? ; char
		48	.RedFieldPosition db ? ; char
		49	.GreenMaskSize db ? ; char
		50	.GreenFieldPosition db ? ; char
		51	.BlueMaskSize db ? ; char
		52	.BlueFieldPosition db ? ; char
		53	.RsvedMaskSize db ? ; char
		54	.RsvedFieldPosition db ? ; char
		55	.DirectColorModeInfo db ? ; char ; MISSED IN THIS TUTORIAL!! SEE ABOVE
		56	; VBE 2.0+
		57	.PhysBasePtr dd ? ; ulong
		58	.OffScreenMemOffset dd ? ; ulong
		59	.OffScreenMemSize dw ? ; short
		60	; VBE 3.0+
		61	.LinbytesPerScanLine dw ? ; short
		62	.BankNumberOfImagePages db ? ; char
		63	.LinNumberOfImagePages db ? ; char
		64	.LinRedMaskSize db ? ; char
		65	.LinRedFieldPosition db ? ; char
		66	.LingreenMaskSize db ? ; char
		67	.LinGreenFieldPosition db ? ; char
		68	.LinBlueMaskSize db ? ; char
		69	.LinBlueFieldPosition db ? ; char
		70	.LinRsvdMaskSize db ? ; char
		71	.LinRsvdFieldPosition db ? ; char
		72	.MaxPixelClock dd ? ; ulong
		73	.res2 rb 190 ; char
		74	}
		75
		76	virtual at $A000
		77	vi VBE_VGAInfo
		78	mi VBE_ModeInfo
		79	modes_table:
		80	end virtual
3555	Serge	81	cursor_pos dw 0 ;временное хранение курсора.
4265	Serge	82	cursor_pos_old dw 0
714	Lrz	83	home_cursor dw 0 ;current shows rows a table
		84	end_cursor dw 0 ;end of position current shows rows a table
834	diamond	85	scroll_start dw 0 ;start position of scroll bar
		86	scroll_end dw 0 ;end position of scroll bar
714	Lrz	87	long_v_table equ 9 ;long of visible video table
731	diamond	88	size_of_step equ 10
		89	scroll_area_size equ (long_v_table-2)
714	Lrz	90	int2str:
		91	dec bl
		92	jz @f
2434	Serge	93	xor edx, edx
714	Lrz	94	div ecx
		95	push edx
		96	call int2str
		97	pop eax
2434	Serge	98	@@:
		99	or al, 0x30
		100	mov [ds:di], al
714	Lrz	101	inc di
		102	ret
		103
		104	int2strnz:
2434	Serge	105	cmp eax, ecx
714	Lrz	106	jb @f
2434	Serge	107	xor edx, edx
714	Lrz	108	div ecx
		109	push edx
		110	call int2strnz
		111	pop eax
2434	Serge	112	@@:
		113	or al, 0x30
		114	mov [es:di], al
714	Lrz	115	inc di
		116	ret
946	lrz	117
714	Lrz	118	;-------------------------------------------------------
		119	;Write message about incorrect v_mode and write message about jmp on swith v_mode
		120	v_mode_error:
		121	_setcursor 19,2
		122	mov si, fatalsel
		123	call printplain
		124	_setcursor 20,2
2434	Serge	125	mov si, pres_key
714	Lrz	126	call printplain
2434	Serge	127	xor eax, eax
714	Lrz	128	int 16h
		129	jmp cfgmanager.d
		130	;-------------------------------------------------------
		131	;
		132
		133
		134
		135	;-------------------------------------------------------
		136	print_vesa_info:
		137	_setcursor 5,2
		138
2434	Serge	139	mov [es:vi.VESASignature], 'VBE2'
		140	mov ax, 0x4F00
		141	mov di, vi ;0xa000
714	Lrz	142	int 0x10
2434	Serge	143	or ah, ah
714	Lrz	144	jz @f
2434	Serge	145	mov [es:vi.VESASignature], 'VESA'
		146	mov ax, $4F00
		147	mov di, vi
714	Lrz	148	int 0x10
2434	Serge	149	or ah, ah
714	Lrz	150	jnz .exit
		151	@@:
2434	Serge	152	cmp [es:vi.VESASignature], 'VESA'
714	Lrz	153	jne .exit
2434	Serge	154	cmp [es:vi.VESAVersion], 0x0100
714	Lrz	155	jb .exit
		156	jmp .vesaok2
		157
		158	.exit:
2434	Serge	159	mov si, novesa
714	Lrz	160	call printplain
		161	ret
		162
		163	.vesaok2:
2434	Serge	164	mov ax, [es:vi.VESAVersion]
		165	add ax, '00'
714	Lrz	166
		167	mov [s_vesa.ver], ah
		168	mov [s_vesa.ver+2], al
2434	Serge	169	mov si, s_vesa
714	Lrz	170	call printplain
		171
		172	_setcursor 4,2
2434	Serge	173	mov si, word[es:vi.OemStringPtr]
		174	mov di, si
714	Lrz	175
		176	push ds
2434	Serge	177	mov ds, word[es:vi.OemStringPtr+2]
714	Lrz	178	call printplain
		179	pop ds
		180
		181	ret
		182	;-----------------------------------------------------------------------------
		183
		184	calc_vmodes_table:
		185	pushad
		186
		187	; push 0
		188	; pop es
		189
730	diamond	190	lfs si, [es:vi.VideoModePtr]
714	Lrz	191
2434	Serge	192	mov bx, modes_table
3555	Serge	193	;save no vesa mode of work 320x200, EGA/CGA 256 жўҐв®ў and 640x480, VGA 16 жўҐв®ў
2434	Serge	194	mov word [es:bx], 640
		195	mov word [es:bx+2], 480
		196	mov word [es:bx+6], 0x13
3908	Serge	197
2434	Serge	198	mov word [es:bx+10], 640
		199	mov word [es:bx+12], 480
		200	mov word [es:bx+16], 0x12
		201	add bx, 20
714	Lrz	202	.next_mode:
2434	Serge	203	mov cx, word [fs:si]; mode number
		204	cmp cx, -1
714	Lrz	205	je .modes_ok.2
		206
2434	Serge	207	mov ax, 0x4F01
		208	mov di, mi
714	Lrz	209	int 0x10
		210
2434	Serge	211	or ah, ah
714	Lrz	212	jnz .modes_ok.2;vesa_info.exit
		213
2434	Serge	214	test [es:mi.ModeAttributes], 00000001b ;videomode support ?
714	Lrz	215	jz @f
2434	Serge	216	test [es:mi.ModeAttributes], 00010000b ;picture ?
714	Lrz	217	jz @f
2434	Serge	218	test [es:mi.ModeAttributes], 10000000b ;LFB ?
714	Lrz	219	jz @f
		220
5565	serge	221	cmp [es:mi.BitsPerPixel], 16 ;List only supported videomodes (16, 24 and 32 bpp)
947	lrz	222	jb @f
730	diamond	223
5201	serge	224	; 16 bpp might actually be 15 bpp
		225	cmp [es:mi.BitsPerPixel], 16
		226	jne .l0
		227	cmp [es:mi.GreenMaskSize], 5
		228	jne .l0
947	lrz	229	; mov [es:mi.BitsPerPixel],15
5201	serge	230	jmp @f ; 15 bpp isnt supported ATM
714	Lrz	231
		232
947	lrz	233	.l0:
2434	Serge	234	cmp [es:mi.XRes], 640
714	Lrz	235	jb @f
2434	Serge	236	cmp [es:mi.YRes], 480
714	Lrz	237	jb @f
		238	; cmp [es:mi.BitsPerPixel],8
		239	; jb @f
		240
2434	Serge	241	mov ax, [es:mi.XRes]
		242	mov [es:bx+0], ax ; +0[2] : resolution X
		243	mov ax, [es:mi.YRes]
		244	mov [es:bx+2], ax ; +2[2] : resolution Y
		245	mov ax, [es:mi.ModeAttributes]
		246	mov [es:bx+4], ax ; +4[2] : attributes
714	Lrz	247
2434	Serge	248	cmp [s_vesa.ver], '2'
		249	; jb .lp1
		250	jb @f ; We do not use Vesa 1.2 mode is now
714	Lrz	251
2434	Serge	252	or cx, 0x4000 ; use LFB
		253	.lp1:
		254	mov [es:bx+6], cx ; +6 : mode number
		255	movzx ax, byte [es:mi.BitsPerPixel]
		256	mov word [es:bx+8], ax ; +8 : bits per pixel
2441	Serge	257	add bx, size_of_step ; size of record
714	Lrz	258
		259	@@:
2434	Serge	260	add si, 2
714	Lrz	261	jmp .next_mode
		262
		263	.modes_ok.2:
		264
2434	Serge	265	mov word[es:bx], -1 ;end video table
		266	mov word[end_cursor], bx ;save end cursor position
714	Lrz	267	;;;;;;;;;;;;;;;;;;
		268	;Sort array
		269	; mov si,modes_table
		270	;.new_mode:
		271	; mov ax,word [es:si]
		272	; cmp ax,-1
		273	; je .exxit
		274	; add ax,word [es:si+2]
		275	; add ax,word [es:si+8]
		276	; mov bp,si
		277	;.again:
		278	; add bp,12
		279	; mov bx,word [es:bp]
		280	; cmp bx,-1
		281	; je .exit
		282	; add bx,word [es:bp+2]
		283	; add bx,word [es:bp+8]
2441	Serge	284	;
714	Lrz	285	; cmp ax,bx
		286	; ja .loops
		287	; jmp .again
2441	Serge	288	;.loops:
714	Lrz	289	; push dword [es:si]
		290	; push dword [es:si+4]
		291	; push dword [es:si+8]
		292	; push dword [es:bp]
		293	; push dword [es:bp+4]
		294	; push dword [es:bp+8]
		295	;
		296	; pop dword [es:si+8]
		297	; pop dword [es:si+4]
		298	; pop dword [es:si]
		299	; pop dword [es:bp+8]
		300	; pop dword [es:bp+4]
		301	; pop dword [es:bp]
		302	; jmp .new_mode
		303	;
		304	;.exit: add si,12
		305	; jmp .new_mode
		306	;.exxit:
		307	popad
		308	ret
		309
		310	;-----------------------------------------------------------------------------
		311
		312	draw_current_vmode:
		313	push 0
		314	pop es
		315
2434	Serge	316	mov si, word [cursor_pos]
714	Lrz	317
2434	Serge	318	cmp word [es:si+6], 0x12
714	Lrz	319	je .no_vesa_0x12
		320
2434	Serge	321	cmp word [es:si+6], 0x13
714	Lrz	322	je .no_vesa_0x13
		323
2010	serge	324	if defined extended_primary_loader
2434	Serge	325	mov di, config_file_variables
2010	serge	326	else
2434	Serge	327	mov di, loader_block_error
2010	serge	328	end if
2434	Serge	329	movzx eax, word[es:si+0]
		330	mov ecx, 10
714	Lrz	331	call int2strnz
2434	Serge	332	mov byte[es:di], 'x'
714	Lrz	333	inc di
2434	Serge	334	movzx eax, word[es:si+2]
714	Lrz	335	call int2strnz
2434	Serge	336	mov byte[es:di], 'x'
714	Lrz	337	inc di
2434	Serge	338	movzx eax, word[es:si+8]
714	Lrz	339	call int2strnz
2434	Serge	340	mov dword[es:di], 0x00000d0a
2010	serge	341	if defined extended_primary_loader
2434	Serge	342	mov si, config_file_variables
2010	serge	343	else
2434	Serge	344	mov si, loader_block_error
2010	serge	345	end if
714	Lrz	346	push ds
		347	push es
		348	pop ds
		349	call printplain
		350	pop ds
		351	ret
		352	.no_vesa_0x13:
2434	Serge	353	mov si, mode0
714	Lrz	354	jmp .print
		355	.no_vesa_0x12:
2434	Serge	356	mov si, mode9
714	Lrz	357	.print:
		358	call printplain
2441	Serge	359	ret
714	Lrz	360	;-----------------------------------------------------------------------------
		361	check_first_parm:
2010	serge	362	if defined extended_primary_loader
		363	mov cx, [number_vm]
		364	jcxz .novbemode
		365	mov si, modes_table
		366	.findvbemode:
		367	cmp [es:si+6], cx
		368	jnz @f
2434	Serge	369	cmp word [es:si+8], 32
2010	serge	370	je .ok_found_mode
2434	Serge	371	cmp word [es:si+8], 24
2010	serge	372	je .ok_found_mode
5201	serge	373	cmp word [es:si+8], 16
		374	je .ok_found_mode
2434	Serge	375	@@:
		376	add si, size_of_step
		377	cmp word [es:si], -1
2010	serge	378	jnz .findvbemode
		379	.novbemode:
		380	mov ax, [x_save]
		381	test ax, ax
		382	jz .zerro
		383	mov bx, [y_save]
		384	mov si, modes_table
		385	call .loops
		386	test ax, ax
		387	jz .ok_found_mode
		388	else
2434	Serge	389	mov si, word [preboot_graph]
		390	test si, si
3908	Serge	391	jnz .no_zero ;if no zero
2010	serge	392	end if
714	Lrz	393	.zerro:
		394	; mov ax,modes_table
		395	; mov word [cursor_pos],ax
		396	; mov word [home_cursor],ax
		397	; mov word [preboot_graph],ax
		398	;SET default video of mode first probe will fined a move of work 1024x768@32
5201	serge	399	mov cx, 32
		400	.find_mode:
2434	Serge	401	mov ax, 1024
		402	mov bx, 768
		403	mov si, modes_table
714	Lrz	404	call .loops
2434	Serge	405	test ax, ax
3908	Serge	406	jz .ok_found_mode
2434	Serge	407	mov ax, 800
		408	mov bx, 600
		409	mov si, modes_table
714	Lrz	410	call .loops
2434	Serge	411	test ax, ax
3908	Serge	412	jz .ok_found_mode
2434	Serge	413	mov ax, 640
		414	mov bx, 480
		415	mov si, modes_table
714	Lrz	416	call .loops
2434	Serge	417	test ax, ax
3908	Serge	418	jz .ok_found_mode
5201	serge	419	sub cx, 8
		420	jnz .find_mode
714	Lrz	421
2434	Serge	422	mov si, modes_table
2010	serge	423	if ~ defined extended_primary_loader
746	Lrz	424	jmp .ok_found_mode
714	Lrz	425
		426
746	Lrz	427
		428	.no_zero:
2434	Serge	429	mov bp, word [number_vm]
		430	cmp bp, word [es:si+6]
749	Lrz	431	jz .ok_found_mode
2434	Serge	432	mov ax, word [x_save]
		433	mov bx, word [y_save]
		434	mov si, modes_table
746	Lrz	435	call .loops
2434	Serge	436	test ax, ax
3908	Serge	437	jz .ok_found_mode
746	Lrz	438
2434	Serge	439	mov si, modes_table
746	Lrz	440	; cmp ax,modes_table
		441	; jb .zerro ;check on correct if bellow
		442	; cmp ax,word [end_cursor]
		443	; ja .zerro ;check on correct if anymore
2010	serge	444	end if
746	Lrz	445
714	Lrz	446	.ok_found_mode:
2434	Serge	447	mov word [home_cursor], si
714	Lrz	448	; mov word [cursor_pos],si
2434	Serge	449	mov word [preboot_graph], si
		450	mov ax, si
714	Lrz	451
2434	Serge	452	mov ecx, long_v_table
714	Lrz	453
2434	Serge	454	.loop:
		455	add ax, size_of_step
		456	cmp ax, word [end_cursor]
714	Lrz	457	jae .next_step
		458	loop .loop
		459	.next_step:
2434	Serge	460	sub ax, size_of_step*long_v_table
		461	cmp ax, modes_table
738	diamond	462	jae @f
2434	Serge	463	mov ax, modes_table
738	diamond	464	@@:
714	Lrz	465
2434	Serge	466	mov word [home_cursor], ax
		467	mov si, [preboot_graph]
		468	mov word [cursor_pos], si
946	lrz	469
		470	push word [es:si]
		471	pop word [x_save]
		472	push word [es:si+2]
		473	pop word [y_save]
		474	push word [es:si+6]
		475	pop word [number_vm]
		476
714	Lrz	477	ret
		478	;;;;;;;;;;;;;;;;;;;;;;;;;;;
		479	.loops:
2434	Serge	480	cmp ax, word [es:si]
714	Lrz	481	jne .next
2434	Serge	482	cmp bx, word [es:si+2]
714	Lrz	483	jne .next
5201	serge	484	cmp cx, word [es:si+8]
		485	jne .next
		486	xor ax, ax
		487	ret
2434	Serge	488	.next:
		489	add si, size_of_step
		490	cmp word [es:si], -1
714	Lrz	491	je .exit
		492	jmp .loops
2434	Serge	493	.exit:
		494	or ax, -1
3908	Serge	495	ret
714	Lrz	496
		497
		498	;-----------------------------------------------------------------------------
		499
746	Lrz	500	;default_vmode:
2441	Serge	501
714	Lrz	502	;-----------------------------------------------------------------------------
		503	draw_vmodes_table:
		504	_setcursor 9, 2
2434	Serge	505	mov si, gr_mode
714	Lrz	506	call printplain
		507
2434	Serge	508	mov si, _st
714	Lrz	509	call printplain
		510
		511	push word [cursor_pos]
		512	pop ax
		513	push word [home_cursor]
		514	pop si
2434	Serge	515	mov cx, si
714	Lrz	516
2434	Serge	517	cmp ax, si
714	Lrz	518	je .ok
		519	jb .low
		520
		521
2434	Serge	522	add cx, size_of_step*long_v_table
2441	Serge	523
2434	Serge	524	cmp ax, cx
714	Lrz	525	jb .ok
2441	Serge	526
2434	Serge	527	sub cx, size_of_step*long_v_table
		528	add cx, size_of_step
		529	cmp cx, word[end_cursor]
714	Lrz	530	jae .ok
2434	Serge	531	add si, size_of_step
714	Lrz	532	push si
		533	pop word [home_cursor]
		534	jmp .ok
		535
		536
2434	Serge	537	.low:
		538	sub cx, size_of_step
		539	cmp cx, modes_table
714	Lrz	540	jb .ok
		541	push cx
		542	push cx
		543	pop word [home_cursor]
		544	pop si
		545
		546
		547	.ok:
834	diamond	548	; calculate scroll position
		549	push si
		550	mov ax, [end_cursor]
		551	sub ax, modes_table
		552	mov bx, size_of_step
		553	cwd
		554	div bx
		555	mov si, ax ; si = size of list
		556	mov ax, [home_cursor]
		557	sub ax, modes_table
		558	cwd
		559	div bx
		560	mov di, ax
		561	mov ax, scroll_area_size*long_v_table
		562	cwd
		563	div si
		564	test ax, ax
		565	jnz @f
		566	inc ax
		567	@@:
		568	cmp al, scroll_area_size
		569	jb @f
		570	mov al, scroll_area_size
		571	@@:
		572	mov cx, ax
		573	; cx = scroll height
		574	; calculate scroll pos
		575	xor bx, bx ; initialize scroll pos
		576	sub al, scroll_area_size+1
		577	neg al
		578	sub si, long_v_table-1
		579	jbe @f
		580	mul di
		581	div si
		582	mov bx, ax
		583	@@:
		584	inc bx
		585	imul ax, bx, size_of_step
		586	add ax, [home_cursor]
		587	mov [scroll_start], ax
		588	imul cx, size_of_step
		589	add ax, cx
		590	mov [scroll_end], ax
		591	pop si
2434	Serge	592	mov bp, long_v_table ;show rows
714	Lrz	593	.@@_next_bit:
834	diamond	594	;clear cursor
2434	Serge	595	mov ax, ' '
		596	mov word[ds:_r1+21], ax
		597	mov word[ds:_r1+50], ax
834	diamond	598
2434	Serge	599	mov word[ds:_r2+21], ax
		600	mov word[ds:_r2+45], ax
834	diamond	601
2434	Serge	602	mov word[ds:_rs+21], ax
		603	mov word[ds:_rs+46], ax
834	diamond	604	; draw string
2434	Serge	605	cmp word [es:si+6], 0x12
714	Lrz	606	je .show_0x12
2434	Serge	607	cmp word [es:si+6], 0x13
714	Lrz	608	je .show_0x13
		609
2434	Serge	610	movzx eax, word[es:si]
		611	cmp ax, -1
714	Lrz	612	je .@@_end
2434	Serge	613	mov di, _rs+23
		614	mov ecx, 10
		615	mov bl, 4
714	Lrz	616	call int2str
2434	Serge	617	movzx eax, word[es:si+2]
714	Lrz	618	inc di
2434	Serge	619	mov bl, 4
714	Lrz	620	call int2str
		621
2434	Serge	622	movzx eax, word[es:si+8]
714	Lrz	623	inc di
2434	Serge	624	mov bl, 2
714	Lrz	625	call int2str
		626
		627	cmp si, word [cursor_pos]
		628	jne .next
		629	;draw cursor
2434	Serge	630	mov word[ds:_rs+21], '>>'
		631	mov word[ds:_rs+46], '<<'
714	Lrz	632
		633
2441	Serge	634
714	Lrz	635	.next:
		636	push si
2434	Serge	637	mov si, _rs
714	Lrz	638	.@@_sh:
834	diamond	639	; add to the string pseudographics for scrollbar
		640	pop bx
		641	push bx
		642	mov byte [si+53], ' '
		643	cmp bx, [scroll_start]
		644	jb @f
		645	cmp bx, [scroll_end]
		646	jae @f
		647	mov byte [si+53], 0xDB ; filled bar
		648	@@:
		649	push bx
		650	add bx, size_of_step
		651	cmp bx, [end_cursor]
		652	jnz @f
		653	mov byte [si+53], 31 ; 'down arrow' symbol
		654	@@:
		655	sub bx, [home_cursor]
		656	cmp bx, size_of_step*long_v_table
		657	jnz @f
		658	mov byte [si+53], 31 ; 'down arrow' symbol
		659	@@:
		660	pop bx
		661	cmp bx, [home_cursor]
		662	jnz @f
		663	mov byte [si+53], 30 ; 'up arrow' symbol
		664	@@:
714	Lrz	665	call printplain
		666	pop si
2434	Serge	667	add si, size_of_step
714	Lrz	668
		669	dec bp
		670	jnz .@@_next_bit
		671
		672	.@@_end:
2434	Serge	673	mov si, _bt
714	Lrz	674	call printplain
		675	ret
		676	.show_0x13:
		677	push si
		678
		679	cmp si, word [cursor_pos]
		680	jne @f
2434	Serge	681	mov word[ds:_r1+21], '>>'
		682	mov word[ds:_r1+50], '<<'
714	Lrz	683	@@:
2434	Serge	684	mov si, _r1
714	Lrz	685	jmp .@@_sh
		686	.show_0x12:
		687	push si
		688	cmp si, word [cursor_pos]
		689	jne @f
		690
2434	Serge	691	mov word[ds:_r2+21], '>>'
		692	mov word[ds:_r2+45], '<<'
714	Lrz	693	@@:
2434	Serge	694	mov si, _r2
714	Lrz	695	jmp .@@_sh
		696
		697	;-----------------------------------------------------------------------------
		698	;Clear arrea of current video page (0xb800)
		699	clear_vmodes_table:
		700	pusha
		701	; draw frames
		702	push es
		703	push 0xb800
		704	pop es
2434	Serge	705	mov di, 1444
		706	xor ax, ax
714	Lrz	707	mov ah, 1*16+15
3908	Serge	708	mov cx, 77
2434	Serge	709	mov bp, 12
714	Lrz	710	.loop_start:
3908	Serge	711	rep stosw
		712	mov cx, 77
		713	add di, 6
946	lrz	714	dec bp
3908	Serge	715	jns .loop_start
714	Lrz	716	pop es
		717	popa
		718	ret
		719
		720	;-----------------------------------------------------------------------------
		721
		722	set_vmode:
		723	push 0 ;0;x1000
		724	pop es
		725
2434	Serge	726	mov si, word [preboot_graph] ;[preboot_graph]
		727	mov cx, word [es:si+6] ; number of mode
3908	Serge	728
714	Lrz	729
2434	Serge	730	mov ax, word [es:si+0] ; resolution X
		731	mov bx, word [es:si+2] ; resolution Y
714	Lrz	732
		733
2441	Serge	734	mov word [es:BOOT_X_RES], ax ; resolution X
		735	mov word [es:BOOT_Y_RES], bx ; resolution Y
		736	mov word [es:BOOT_VESA_MODE], cx ; number of mode
714	Lrz	737
2434	Serge	738	cmp cx, 0x12
714	Lrz	739	je .mode0x12_0x13
2434	Serge	740	cmp cx, 0x13
714	Lrz	741	je .mode0x12_0x13
		742
		743
2434	Serge	744	; cmp byte [s_vesa.ver], '2'
		745	; jb .vesa12
714	Lrz	746
		747	; VESA 2 and Vesa 3
		748
2434	Serge	749	mov ax, 0x4f01
		750	and cx, 0xfff
		751	mov di, mi;0xa000
714	Lrz	752	int 0x10
		753	; LFB
2434	Serge	754	mov eax, [es:mi.PhysBasePtr];di+0x28]
2441	Serge	755	mov [es:BOOT_LFB], eax
714	Lrz	756	; ---- vbe voodoo
		757	BytesPerLine equ 0x10
		758	mov ax, [es:di+BytesPerLine]
2441	Serge	759	mov [es:BOOT_PITCH], ax
714	Lrz	760	; BPP
2434	Serge	761	cmp [es:mi.BitsPerPixel], 16
714	Lrz	762	jne .l0
2434	Serge	763	cmp [es:mi.GreenMaskSize], 5
714	Lrz	764	jne .l0
2434	Serge	765	mov [es:mi.BitsPerPixel], 15
714	Lrz	766	.l0:
		767	mov al, byte [es:di+0x19]
2441	Serge	768	mov [es:BOOT_BPP], al
714	Lrz	769	jmp .exit
		770
		771	.mode0x12_0x13:
2441	Serge	772	mov byte [es:BOOT_BPP], 32
		773	or dword [es:BOOT_LFB], 0xFFFFFFFF; 0x800000
714	Lrz	774
		775
		776	; VESA 1.2 PM BANK SWITCH ADDRESS
		777
2434	Serge	778	;.vesa12:
		779	; mov ax, 0x4f0A
		780	; xor bx, bx
		781	; int 0x10
		782	; xor eax, eax
		783	; xor ebx, ebx
		784	; mov ax, es
		785	; shl eax, 4
		786	; mov bx, di
		787	; add eax, ebx
		788	; movzx ebx, word[es:di]
		789	; add eax, ebx
		790	; push 0x0000
		791	; pop es
		792	; mov [es:0x9014], eax
714	Lrz	793	.exit:
		794	ret
		795
		796	;=============================================================================
		797	;=============================================================================
		798	;=============================================================================
		799

Subversion Repositories Kolibri OS

(root)/kernel/branches/Kolibri-acpi/boot/bootvesa.inc @ 3232 – Rev 5565