forked from KolibriOS/kolibrios
Fix CR line endings
- White space clean up only: replace `CR` with `LF` line-endings. Ensures correct git diff processing.
This commit is contained in:
1 parent
3c1e533f95
commit
27a26b669f
1 file changed
+114
-1
@@ -1 +1,114 @@
|
||||
use32 ␍ org 0x0 ␍ ␍ db 'MENUET01' ; 8 byte id ␍ dd 38 ; required os ␍ dd STARTAPP ; program start ␍ dd I_END ; program image size ␍ dd 0x1000000 ; required amount of memory ␍ dd 0x1000000 ; stack heap ␍ dd 0x0 ␍ dd 0x0 ␍ ␍include '../../../proc32.inc' ␍include '../../../macros.inc' ␍include '../../../dll.inc' ␍␍ ␍PATH_MAX equ 255 ␍␍STARTAPP: ␍ ; Initialize heap␍ mcall 68, 11 ␍ ; Import libraries ␍ stdcall dll.Load,importTable␍ ␍ ; Set button style: flat or gradient (3D)␍ invoke ini_get_int, aIni, aSection, aButtonStyle, 0␍ mov ecx, eax␍ mcall 48, 1␍␍ ; Set desktop background␍ invoke ini_get_str, aIni, aSection, aBgProgram, sz_app, PATH_MAX, 0␍ invoke ini_get_str, aIni, aSection, aBgParam, sz_param, PATH_MAX, 0␍ ␍ cmp byte[sz_param], '\' ;detecting KIV param like '\S__/path/to/img'␍ jne @f␍␍ m2m dword [ReadFile.path], sz_param+4␍ call check_file_exists␍␍@@:␍ mcall 70, RunApp␍ ␍ ; Set system skin␍ invoke ini_get_str, aIni, aSection, aSkinPath, sz_param, PATH_MAX, 0␍ cmp byte [sz_param], 0 ;no need to set skin if it was not specified␍ je @f␍ ␍ m2m dword [ReadFile.path], sz_param␍ call check_file_exists␍ ␍ mcall 48, 8, sz_param ␍@@:␍ ; Exit app␍ mcall -1␍␍;----------------------------------------------------------------␍; This is fix for files located at /kolibrios and /usbhd drives␍; It checks is the file exists for 5 times with perioud 1 second␍check_file_exists:␍ mov edi, 0␍@@:␍ mcall 70, ReadFile␍ cmp eax,0␍ je .exit␍ mcall 5, 100␍ inc edi␍ cmp edi, 5␍ jle @b␍.exit:␍ ret␍;----------------------------------------------------------------␍ ␍importTable: ␍library \ ␍ libini, 'libini.obj' ␍ ␍import libini, \ ␍ ini_get_str ,'ini_get_str', \ ␍ ini_get_int ,'ini_get_int' ␍ ␍RunApp:␍ dd 7 ; subfunction number ␍ dd 0 ; position in the file in bytes ␍ dd sz_param ; upper part of the position address ␍ dd 0 ; number of bytes to read ␍ dd 0 ; pointer to the buffer to write data ␍ db 0 ␍ dd sz_app ; pointer to the filename␍␍ReadFile:␍ dd 0 ; subfunction number ␍ dd 0 ; position in the file in bytes ␍ dd 0 ; upper part of the position address ␍ dd 4 ; number of bytes to read ␍ dd buf ; pointer to the buffer to write data ␍ db 0 ␍.path dd ? ; pointer to the filename␍buf rb 4␍ ␍aIni db '/sys/settings/system.ini',0 ␍aSection db 'style',0␍␍aBgProgram db 'bg_program',0␍aBgParam db 'bg_param',0 ␍aButtonStyle db 'buttons_gradient',0␍aSkinPath db 'skin',0␍␍sz_app:␍ rb PATH_MAX␍sz_param: ␍ rb PATH_MAX␍ ␍I_END: ; End of application code and data marker ␍ ␍
|
||||
use32
|
||||
org 0x0
|
||||
|
||||
db 'MENUET01' ; 8 byte id
|
||||
dd 38 ; required os
|
||||
dd STARTAPP ; program start
|
||||
dd I_END ; program image size
|
||||
dd 0x1000000 ; required amount of memory
|
||||
dd 0x1000000 ; stack heap
|
||||
dd 0x0
|
||||
dd 0x0
|
||||
|
||||
include '../../../proc32.inc'
|
||||
include '../../../macros.inc'
|
||||
include '../../../dll.inc'
|
||||
|
||||
|
||||
PATH_MAX equ 255
|
||||
|
||||
STARTAPP:
|
||||
; Initialize heap
|
||||
mcall 68, 11
|
||||
; Import libraries
|
||||
stdcall dll.Load,importTable
|
||||
|
||||
; Set button style: flat or gradient (3D)
|
||||
invoke ini_get_int, aIni, aSection, aButtonStyle, 0
|
||||
mov ecx, eax
|
||||
mcall 48, 1
|
||||
|
||||
; Set desktop background
|
||||
invoke ini_get_str, aIni, aSection, aBgProgram, sz_app, PATH_MAX, 0
|
||||
invoke ini_get_str, aIni, aSection, aBgParam, sz_param, PATH_MAX, 0
|
||||
|
||||
cmp byte[sz_param], '\' ;detecting KIV param like '\S__/path/to/img'
|
||||
jne @f
|
||||
|
||||
m2m dword [ReadFile.path], sz_param+4
|
||||
call check_file_exists
|
||||
|
||||
@@:
|
||||
mcall 70, RunApp
|
||||
|
||||
; Set system skin
|
||||
invoke ini_get_str, aIni, aSection, aSkinPath, sz_param, PATH_MAX, 0
|
||||
cmp byte [sz_param], 0 ;no need to set skin if it was not specified
|
||||
je @f
|
||||
|
||||
m2m dword [ReadFile.path], sz_param
|
||||
call check_file_exists
|
||||
|
||||
mcall 48, 8, sz_param
|
||||
@@:
|
||||
; Exit app
|
||||
mcall -1
|
||||
|
||||
;----------------------------------------------------------------
|
||||
; This is fix for files located at /kolibrios and /usbhd drives
|
||||
; It checks is the file exists for 5 times with perioud 1 second
|
||||
check_file_exists:
|
||||
mov edi, 0
|
||||
@@:
|
||||
mcall 70, ReadFile
|
||||
cmp eax,0
|
||||
je .exit
|
||||
mcall 5, 100
|
||||
inc edi
|
||||
cmp edi, 5
|
||||
jle @b
|
||||
.exit:
|
||||
ret
|
||||
;----------------------------------------------------------------
|
||||
|
||||
importTable:
|
||||
library \
|
||||
libini, 'libini.obj'
|
||||
|
||||
import libini, \
|
||||
ini_get_str ,'ini_get_str', \
|
||||
ini_get_int ,'ini_get_int'
|
||||
|
||||
RunApp:
|
||||
dd 7 ; subfunction number
|
||||
dd 0 ; position in the file in bytes
|
||||
dd sz_param ; upper part of the position address
|
||||
dd 0 ; number of bytes to read
|
||||
dd 0 ; pointer to the buffer to write data
|
||||
db 0
|
||||
dd sz_app ; pointer to the filename
|
||||
|
||||
ReadFile:
|
||||
dd 0 ; subfunction number
|
||||
dd 0 ; position in the file in bytes
|
||||
dd 0 ; upper part of the position address
|
||||
dd 4 ; number of bytes to read
|
||||
dd buf ; pointer to the buffer to write data
|
||||
db 0
|
||||
.path dd ? ; pointer to the filename
|
||||
buf rb 4
|
||||
|
||||
aIni db '/sys/settings/system.ini',0
|
||||
aSection db 'style',0
|
||||
|
||||
aBgProgram db 'bg_program',0
|
||||
aBgParam db 'bg_param',0
|
||||
aButtonStyle db 'buttons_gradient',0
|
||||
aSkinPath db 'skin',0
|
||||
|
||||
sz_app:
|
||||
rb PATH_MAX
|
||||
sz_param:
|
||||
rb PATH_MAX
|
||||
|
||||
I_END: ; End of application code and data marker
|
||||
Reference in new issue
Block a user