Rev 485 | Rev 1741 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
31 | halyavin | 1 | ; |
2 | ; LAUNCHER - АВТОЗАПУСК ПРОГРАММ |
||
3 | ; Код программы совсем не оптимизирован, но очень прост для понимания. |
||
4 | ; Этот лаунчер грузит информацию о программах для запуска из файла |
||
5 | ; AUTORUN.DAT. Формат очень прост и в комментариях не нуждается. |
||
6 | ; |
||
7 | ; Компилируйте с помощью FASM 1.52 и выше |
||
8 | ; |
||
485 | heavyiron | 9 | include "..\..\..\MACROS.INC" |
31 | halyavin | 10 | |
11 | use32 |
||
12 | org 0x0 |
||
13 | db 'MENUET01' ; 8 byte id |
||
14 | dd 0x01 ; header version |
||
15 | dd START ; start of code |
||
16 | dd I_END ; size of image |
||
17 | dd 0x8000 ; memory for app |
||
18 | dd 0x8000 ; esp |
||
19 | dd 0x0 , 0x0 ; I_Param , I_Icon |
||
20 | |||
21 | ;include "DEBUG.INC" |
||
22 | |||
23 | START: ; start of execution |
||
24 | |||
132 | diamond | 25 | ; mov eax, 5 |
26 | ; mov ebx, 10 |
||
485 | heavyiron | 27 | ; mcall |
31 | halyavin | 28 | |
132 | diamond | 29 | mcall 18,15 |
30 | |||
142 | diamond | 31 | mov eax, 70 ; load AUTORUN.DAT |
31 | halyavin | 32 | mov ebx, autorun_dat_info |
485 | heavyiron | 33 | mcall |
31 | halyavin | 34 | |
35 | call get_number |
||
36 | mov [number_of_files], eax |
||
37 | ;dps "NUMBER OF FILES: " |
||
38 | ;dpd eax |
||
39 | ;dps <13,10> |
||
40 | call next_line |
||
41 | |||
42 | start_program: |
||
43 | ;dps <"STARTING A PROGRAM",13,10> |
||
44 | call clear_strings |
||
45 | mov edi, program |
||
46 | call get_string |
||
47 | mov edi, parameters |
||
48 | call get_string |
||
49 | call get_number |
||
50 | call run_program |
||
51 | call next_line |
||
52 | dec [number_of_files] |
||
53 | jnz start_program |
||
54 | |||
55 | exit: |
||
56 | or eax, -1 |
||
485 | heavyiron | 57 | mcall |
31 | halyavin | 58 | |
59 | |||
60 | run_program: ; time to delay in eax |
||
61 | push eax |
||
142 | diamond | 62 | mcall 70, start_info |
31 | halyavin | 63 | pop ebx |
64 | |||
65 | mov eax, 5 |
||
485 | heavyiron | 66 | mcall |
31 | halyavin | 67 | ret |
68 | |||
69 | |||
70 | clear_strings: ; clears buffers |
||
71 | pushad |
||
72 | |||
73 | mov ecx, 60 |
||
74 | mov edi, program |
||
75 | xor al, al ;mov al, ' ' |
||
76 | rep stosb |
||
77 | |||
78 | mov ecx, 60 |
||
79 | mov edi, parameters |
||
80 | rep stosb |
||
81 | |||
82 | popad |
||
83 | ret |
||
84 | |||
85 | |||
86 | get_string: ; pointer to destination buffer in edi |
||
87 | pushad |
||
88 | call skip_spaces |
||
89 | mov esi, [position] |
||
90 | ;dpd esi |
||
91 | ;dps <13,10> |
||
92 | add esi, file_data |
||
93 | .start: |
||
94 | lodsb |
||
95 | cmp al, ' ' |
||
96 | je .finish |
||
97 | stosb |
||
98 | inc [position] |
||
99 | jmp .start |
||
100 | .finish: |
||
101 | popad |
||
102 | ret |
||
103 | |||
104 | |||
105 | get_number: |
||
106 | push ebx esi |
||
107 | call skip_spaces |
||
108 | mov esi, [position] |
||
109 | add esi, file_data |
||
110 | xor eax, eax |
||
111 | xor ebx, ebx |
||
112 | .start: |
||
113 | lodsb |
||
142 | diamond | 114 | sub al, '0' |
115 | cmp al, 9 |
||
31 | halyavin | 116 | ja .finish |
142 | diamond | 117 | lea ebx,[ebx*4+ebx] |
118 | lea ebx,[ebx*2+eax] |
||
31 | halyavin | 119 | inc [position] |
120 | jmp .start |
||
121 | .finish: |
||
122 | mov eax, ebx |
||
123 | pop esi ebx |
||
124 | ret |
||
125 | |||
126 | |||
127 | skip_spaces: |
||
128 | pushad |
||
129 | xor eax, eax |
||
130 | mov esi, [position] |
||
131 | add esi, file_data |
||
132 | .start: |
||
133 | lodsb |
||
134 | cmp al, ' ' |
||
135 | jne .finish |
||
136 | inc [position] |
||
137 | jmp .start |
||
138 | .finish: |
||
139 | ;dps "NOW AL = " |
||
140 | ;mov [tmp],al |
||
141 | ;mov edx, tmp |
||
142 | ;call debug_outstr |
||
143 | ;dps <13,10> |
||
144 | popad |
||
145 | ret |
||
146 | |||
147 | |||
148 | next_line: |
||
149 | pushad |
||
150 | mov esi, [position] |
||
151 | add esi, file_data |
||
152 | .start: |
||
153 | lodsb |
||
154 | cmp al, 13 |
||
155 | je .finish |
||
156 | inc [position] |
||
157 | jmp .start |
||
158 | .finish: |
||
159 | add [position], 2 |
||
160 | inc esi |
||
161 | lodsb |
||
162 | cmp al, '#' |
||
163 | je .skipline |
||
164 | cmp al, 13 |
||
165 | jne .donotskip |
||
166 | .skipline: |
||
167 | call next_line |
||
168 | .donotskip: |
||
169 | popad |
||
170 | ret |
||
171 | |||
172 | |||
173 | |||
174 | ; DATA: |
||
175 | position dd 0 ; position in file |
||
176 | |||
177 | autorun_dat_info: ; AUTORUN.DAT |
||
178 | .mode dd 0 ; read file |
||
179 | .start_block dd 0 ; block to read |
||
142 | diamond | 180 | dd 0 |
181 | .blocks dd 16*512 ; 16*512 bytes max |
||
31 | halyavin | 182 | .address dd file_data |
529 | spraid | 183 | db "AUTORUN.DAT",0 |
31 | halyavin | 184 | |
185 | start_info: |
||
142 | diamond | 186 | .mode dd 7 |
31 | halyavin | 187 | dd 0 |
188 | .params dd parameters |
||
189 | dd 0 |
||
142 | diamond | 190 | dd 0 |
31 | halyavin | 191 | .path: ; |
192 | |||
193 | I_END: |
||
194 | |||
195 | program rb 61 ; 60 + [0] char |
||
196 | parameters rb 61 |
||
197 | |||
198 | number_of_files dd ? |
||
199 | |||
200 | file_data rb 16*51213,10>13,10>"STARTING>13,10> |