kolibrios/kernel/trunk/core/conf_lib.inc

220 lines
3.4 KiB
PHP
Raw Normal View History

;-------------------------------------------------------------------------
;
; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
;
;
; SPraid
;
;-------------------------------------------------------------------------
conf_file_loaded: db 0 ; <EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> <EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
proc load_conf_file
pushad
invoke ini.load,.fname
mov [conf_file_loaded],byte 1
popad
ret
.fname db '%sys%/sys.conf',0
endp
proc set_kentel_conf
locals
par db 30 dup(?)
endl
;[gui]
;mouse_speed
mov eax,ebp
add eax,par-ebp
invoke ini.get_str, ugui, ugui_mouse_speed, eax, ugui_mouse_speed_def
stdcall strtoint,eax
push eax
pop edx
call _mouse_speed
;mouse_delay
mov eax,ebp
add eax,par-ebp
invoke ini.get_str, ugui, ugui_mouse_delay, eax, ugui_mouse_delay_def
stdcall strtoint,eax
push eax
pop edx
call _mouse_delay
;[dev]
;sb16
mov eax,ebp
add eax,par-ebp
invoke ini.get_str, udev, udev_sb16, eax, udev_sb16_def
stdcall strtoint,eax
push eax
pop ecx
call _sb16
;sound_dma
mov eax,ebp
add eax,par-ebp
invoke ini.get_str, udev, udev_sound_dma, eax, udev_sound_dma_def
stdcall strtoint,eax
push eax
pop ecx
call _sound_dma
;midibase
mov eax,ebp
add eax,par-ebp
invoke ini.get_str, udev, udev_midibase, eax, udev_midibase_def
stdcall strtoint,eax
push eax
pop ecx
call _midibase
endp
ugui db 'gui',0
ugui_mouse_speed db 'mouse_speed',0
ugui_mouse_speed_def db '',0
ugui_mouse_delay db 'mouse_delay',0
ugui_mouse_delay_def db '',0
udev db 'dev',0
udev_sb16 db 'sb16',0
udev_sb16_def db '',0
udev_sound_dma db 'sound_dma',0
udev_sound_dma_def db '',0
udev_midibase db 'midibase',0
udev_midibase_def db '',0
; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD> <EFBFBD> DWord <EFBFBD> eax (<EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
proc strtoint stdcall,strs
pushad
mov eax,[strs]
inc eax
mov bl,[eax]
cmp bl,'x'
je .hex
cmp bl,'X'
je .hex
jmp .dec
.hex:
inc eax
stdcall strtoint_hex,eax
jmp .exit
.dec:
dec eax
stdcall strtoint_dec,eax
.exit:
mov [esi+28],eax
popad
ret
endp
; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD> <EFBFBD> DWord <EFBFBD> eax <EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
proc strtoint_dec stdcall,strs
pushad
xor ecx,ecx
mov ebx,1 ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
mov esi,[strs]
@@:
xor eax,eax
lodsb
cmp al,0
je .end
sub al,30h
imul ebx
add ecx,eax
imul ebx,ebx,10
jmp @b
.end:
mov [esi+28],ecx
popad
ret
endp
; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD> <EFBFBD> DWord <EFBFBD> eax <EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
proc strtoint_hex stdcall,strs
pushad
xor ecx,ecx
mov ebx,1 ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
mov esi,[strs]
@@:
xor eax,eax
lodsb
cmp al,0
je .end
cmp al,'a'
jae .bm
cmp al,'A'
jae .bb
jmp .cc
.bm: ; 57h
sub al,57h
jmp .do
.bb: ; 37h
sub al,37h
jmp .do
.cc: ; 30h
sub al,30h
.do:
imul ebx
add ecx,eax
imul ebx,ebx,16
jmp @b
.end:
mov [esi+28],ecx
popad
ret
endp
; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> setup
_mouse_speed:
mov eax,18
mov ebx,19
mov ecx,1
int 0x40
ret
_mouse_delay:
mov eax,18
mov ebx,19
mov ecx,3
int 0x40
ret
_sb16:
mov eax,21
mov ebx,4
int 0x40
ret
_sound_dma:
mov eax,21
mov ebx,10
int 0x40
ret
_midibase:
mov eax,21
mov ebx,1
int 0x40
ret