🚀 go-pugleaf

"Borland Lover" <kdhf@kbdf.com> wrote in message
news:4449633f$1@newsgroups.borland.com...

> However, when execution gets to the lines (marked below) the stack
> gets completely trashed.

That is because you are not managing the stack correctly in the first place.
See below.

> typedef ULONG (*TGetAdaptersAddresses)(ULONG Family, ULONG Flags, PVOID
> Reserved, PIP_ADAPTER_ADDRESSES pAdapterAddresses, PULONG pOutBufLen);

You are not specifying any calling convention in that declaration, so the
compiler's default conention is used.  Under C++, the default is __cdecl,
which is NOT the convention that GetAdaptersAddresses() actually uses.  If
you look at the documentation for GetAdatersAddresses(), it uses WINAPI for
the calling convention, which in turn usually resolves to __stdcall.  Win32
API functions always use the __stdcall convention (wsprintf() is about the
only API function that uses __cdecl instead).  __cdecl and _stdcall
manipulate the stack very differently.

Use this code instead:

    typedef ULONG (WINAPI *TGetAdaptersAddresses)(ULONG Family, ULONG Flags,
PVOID Reserved, PIP_ADAPTER_ADDRESSES pAdapterAddresses, PULONG pOutBufLen);

    void __fastcall TForm10::Button1Click(TObject *Sender)
    {
        HINSTANCE hinst = LoadLibrary("Iphlpapi.dll");
        AnsiString AMacAddress;

        if( NULL != hinst )
        {
            try
            {
                TGetAdaptersAddresses pGetAdaptersAddresses =
(TGetAdaptersAddresses) GetProcAddress(hinst, TEXT("GetAdaptersAddresses"));
                if( NULL != pGetAdaptersAddresses )
                {
                    IP_ADAPTER_ADDRESSES * pAddresses = NULL;
                    try
                    {
                        ULONG outBufLen = 0;

                        ULONG ulErr = pGetAdaptersAddresses(AF_INET, 0,
NULL, NULL, &outBufLen);
                        if( ERROR_BUFFER_OVERFLOW == ulErr )
                        {
                            pAddresses = (IP_ADAPTER_ADDRESSES*) new
BYTE[outBufLen];
                            ulErr = pGetAdaptersAddresses(AF_INET, 0, NULL,
pAddresses, &outBufLen);
                        }

                        if( (NO_ERROR == ulErr) && (0 !=
pAddresses->PhysicalAddressLength) )
                        {

AMacAddress.SetLength((pAddresses->PhysicalAddressLength * 3) - 1);
                            char *ptr = AMacAddress.c_str();

                            LPBYTE MACData = pAddresses->PhysicalAddress;

                            sprintf(ptr, "%02X", MACData[0]);
                            ptr += 2;

                            for(DWORD i = 1; i <
pAddresses->PhysicalAddressLength; ++i)
                            {
                                sprintf(ptr, ":%02X", MACData[i]);
                                ptr += 3;
                            }
                        }
                    }
                    __finally
                    {
                        delete [] pAddresses;
                    }
                }
            }
            catch(...)
            {
                AMacAddress = "UNKNOWN MAC ADDR";
            }

            FreeLibrary(hinst);
        }

        MessageDlg(AMacAddress, mtWarning, TMsgDlgButtons() << mbOK, 0);
    }


Gambit

"Remy Lebeau (TeamB)" <no.spam@no.spam.com> wrote in message 
news:444d1d06$1@newsgroups.borland.com...
>
> "Borland Lover" <kdhf@kbdf.com> wrote in message
> news:4449633f$1@newsgroups.borland.com...
>
>> However, when execution gets to the lines (marked below) the stack
>> gets completely trashed.
>
> That is because you are not managing the stack correctly in the first 
> place.
> See below.
>
>> typedef ULONG (*TGetAdaptersAddresses)(ULONG Family, ULONG Flags, PVOID
>> Reserved, PIP_ADAPTER_ADDRESSES pAdapterAddresses, PULONG pOutBufLen);


Of course!  Makes total sense.  Works like a charm. Thank you very much.

What about these two functions :

GetAdaptersInfo - it does not specify a calling convention in the MSDN. 
What do I use in BCB?

UuidCreateSequential - it specifies RPC_ENTRY. What do I use in BCB?

I am loading and calling both right now without specifying the calling 
convention - and they seem to be working fine.  Is this a fluke?

TIA 

"Borland Lover" <kdhf@kbdf.com> wrote in message
news:444e4463$1@newsgroups.borland.com...

> GetAdaptersInfo - it does not specify a calling convention
> in the MSDN.

As I told you earlier, *all* Win32 API functions use WINAPI (aka __stdcall),
except for wsprintf() which uses __cdecl instead.  If you look in
iphlpapi.h, where GetAdaptersInfo() is actually declared, you can see that:

    DWORD
    WINAPI // <-- here
    GetAdaptersInfo(
        PIP_ADAPTER_INFO pAdapterInfo, PULONG pOutBufLen
    );

> UuidCreateSequential - it specifies RPC_ENTRY. What do I use in BCB?

You use RPC_ENTRY, which transparently maps to __stdcall.  Always use what
is actually in the declaration.

> I am loading and calling both right now without specifying the calling
> convention - and they seem to be working fine.  Is this a fluke?

Yes.  You must always specify a calling convention, or else the compiler is
free to choose its own.  As you have already seen earlier, the compiler can
chose the wrong convention and mess up the runtime behavior as a result.


Gambit

Thank you Remy.

"Remy Lebeau (TeamB)" <no.spam@no.spam.com> wrote
[...]