DOS ain't dead

Hello Japheth!

Maybe you add these:

K32_Enum_Process_Modules_Ex
K32_Get_Module_Base_Name_A
K32_Get_Module_Information

procedures to HXDOS to be able to run new delphi compiler in DOS.
Please omit "_" in procedure names.

Thanks.

> K32_Enum_Process_Modules_Ex
> K32_Get_Module_Base_Name_A
> K32_Get_Module_Information

These names don't look like kernel32 function names.

---
MS-DOS forever!

> > K32_Enum_Process_Modules_Ex
> > K32_Get_Module_Base_Name_A
> > K32_Get_Module_Information
>
> These names don't look like kernel32 function names.

See: https://stackoverflow.com/questions/49647559/how-t...c-name-for-getprocaddress-function-using-windbg

I also found bug in ConvertAStr that crashes with delphi compilers.

ConvertAStr proc public pBuffer:ptr
;       pushad
;       mov ecx, eax
;       mov ah,0
;       inc ecx                 ;copy the term 0 as well
;       mov edi, pBuffer
;       mov esi, edi
;       .while (ecx)
;               dec ecx
;               mov al,[esi+ecx]
;               mov [edi+ecx*2],ax
;       .endw
;       popad
;       ret
        pop     ebp
        pop     ecx
        pop     eax
        pushad
        mov     esi,eax
        mov     edi,eax
        xchg    ecx,eax
        jecxz   @Quit
@Loop:  lodsb
        or      al,al
        jnz     @Loop
        sub     esi,ecx
        mov     ecx,esi
        mov     ah,al
@Pool:  dec     ecx
        mov     al,[ecx+edi]
        mov     [edi+ecx*2],ax
        jnz     @Pool
@Quit:  popad
        jmp     ecx
        align 4
ConvertAStr endp


Hello Candyman, hello Japheth,

> > > K32_Enum_Process_Modules_Ex
> > > K32_Get_Module_Base_Name_A
> > > K32_Get_Module_Information
> > These names don't look like kernel32 function names.
> See:
> https://stackoverflow.com/questions/49647559/how-t...c-name-for-getprocaddress-function-using-windbg

The names should probably just be "GetModuleBaseNameA", etc. (without "K32")?

These are declared in psapi.h ( https://docs.microsoft.com/en-us/windows/win32/api/psapi/ ) within the Windows API.

---
https://gitlab.com/tkchia · https://codeberg.org/tkchia · 😴 "MOV AX,0D500H+CMOS_REG_D+NMI"

> The names should probably just be "GetModuleBaseNameA", etc. (without
> "K32")?

Unfortunately, I need them with the K32 prefix. Look in your kernel32.dll (ver. 6.1) for such names.