| 0,0 → 1,135 |
|---|
| format ELF |
| section '.text' executable |
| public start |
| extrn mf_init |
| extrn main |
| public argc as '__ARGS' |
| |
| __DEBUG__ equ 1 |
| __DEBUG_LEVEL__ equ 1 |
| |
| include 'DEBUG-FDO.INC' |
| |
| virtual at 0 |
| db 'MENUET01' ; 1. Magic number (8 bytes) |
| dd 0x01 ; 2. Version of executable file |
| dd 0x0 ; 3. Start address |
| dd 0x0 ; 4. Size of image |
| dd 0x100000 ; 5. Size of needed memory |
| dd 0x100000 ; 6. Pointer to stack |
| hparams dd 0x0 ; 7. Pointer to program arguments |
| hpath dd 0x0 ; 8. Pointer to program path |
| end virtual |
| start: |
| DEBUGF 1,'Start programm\n' |
| xor eax,eax |
| call mf_init |
| DEBUGF 1,' path "%s"\n params "%s"\n', path, params |
| ; check for overflow |
| mov al, [path+buf_len-1] |
| or al, [params+buf_len-1] |
| jnz .crash |
| ; check if path written by OS |
| mov eax, [hparams] |
| test eax, eax |
| jz .without_path |
| mov eax, path |
| .without_path: |
| mov esi, eax |
| call push_param |
| ; retrieving parameters |
| mov esi, params |
| xor edx, edx ; dl - èä¸ò ïàðàìåòð(1) èëè ðàçäåëèòåëè(0) |
| ; dh - ñèìâîë ñ êîòîðîãî íà÷àëñÿ ïàðàìåòð (1 êàâû÷êè, 0 îñòàëüíîå) |
| mov ecx, 1 ; cl = 1 |
| ; ch = 0 ïðîñòî íîëü |
| .parse: |
| lodsb |
| test al, al |
| jz .run |
| test dl, dl |
| jnz .findendparam |
| ;{åñëè áûë ðàçäåëèòåëü |
| cmp al, ' ' |
| jz .parse ;çàãðóæåí ïðîáåë, ãðóçèì ñëåäóþùèé ñèìâîë |
| mov dl, cl ;íà÷èíàåòñÿ ïàðàìåòð |
| cmp al, '"' |
| jz @f ;çàãðóæåíû êàâû÷êè |
| mov dh, ch ;ïàðàìåòð áåç êàâû÷åê |
| dec esi |
| call push_param |
| inc esi |
| jmp .parse |
| |
| @@: |
| mov dh, cl ;ïàðàìåòð â êàâû÷åêàõ |
| call push_param ;åñëè íå ïðîáåë çíà÷èò íà÷èíàåòñÿ êàêîé òî ïàðàìåòð |
| jmp .parse ;åñëè áûë ðàçäåëèòåëü} |
| |
| .findendparam: |
| test dh, dh |
| jz @f ; áåç êàâû÷åê |
| cmp al, '"' |
| jz .clear |
| jmp .parse |
| @@: |
| cmp al, ' ' |
| jnz .parse |
| |
| .clear: |
| lea ebx, [esi - 1] |
| mov [ebx], ch |
| mov dl, ch |
| jmp .parse |
| |
| .run: |
| DEBUGF 1,'call main(%x, %x) with params:\n', [argc], argv |
| if __DEBUG__ = 1 |
| mov ecx, [argc] |
| @@: |
| lea esi, [ecx * 4 + argv-4] |
| DEBUGF 1,'%d) "%s"\n', cx, [esi] |
| loop @b |
| end if |
| push argv |
| push [argc] |
| call main |
| .exit: |
| DEBUGF 1,'Exit from prog with code: %x\n', eax; |
| xor eax,eax |
| dec eax |
| int 0x40 |
| dd -1 |
| .crash: |
| DEBUGF 1,'E:buffer overflowed\n' |
| jmp .exit |
| ;============================ |
| push_param: |
| ;============================ |
| ;parameters |
| ; esi - pointer |
| ;description |
| ; procedure increase argc |
| ; and add pointer to array argv |
| ; procedure changes ebx |
| mov ebx, [argc] |
| cmp ebx, max_parameters |
| jae .dont_add |
| mov [argv+4*ebx], esi |
| inc [argc] |
| .dont_add: |
| ret |
| ;============================== |
| public params as '__argv' |
| public path as '__path' |
| |
| section '.bss' |
| buf_len = 0x400 |
| max_parameters=0x20 |
| argc rd 1 |
| argv rd max_parameters |
| path rb buf_len |
| params rb buf_len |
| |
| section '.data' |
| include_debug_strings ; ALWAYS present in data section |