Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-devel / 2012-09

rtl/win/winsock2.pp

3 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Martin

The unit contains 3 declarations (just picking one example, may be similar for other functions)

function WSASocketA( af, iType, protocol : Longint; lpProtocolInfo :
LPWSAProtocol_InfoA; g : GROUP; dwFlags : DWORD ): TSocket; stdcall;
external WINSOCK2_DLL name 'WSASocketA';
function WSASocketW( af, iType, protocol : Longint; lpProtocolInfo :
LPWSAProtocol_InfoW; g : GROUP; dwFlags : DWORD ): TSocket; stdcall;
external WINSOCK2_DLL name 'WSASocketW';
function WSASocket( af, iType, protocol : Longint; lpProtocolInfo :
LPWSAProtocol_Info; g : GROUP; dwFlags : DWORD ): TSocket; stdcall;
external WINSOCK2_DLL name 'WSASocket';

Does the last one work. It gives an error on my vista 32 bit ("dll entry point not found")

My understanding is that windows offers the A and W versions, and the none-postfix version is just an in application alias to one of them? Or is there a win version, where the dll actually exports 'WSASocket' ? (And if so, shouldn't it be IFDEF and mapped to A or W for other win versions?

Reply by email

Martin
to Martin
Martin wrote 21 lines
The unit contains 3 declarations (just picking one example, may be similar for other functions) function WSASocketA( af, iType, protocol : Longint; lpProtocolInfo : LPWSAProtocol_InfoA; g : GROUP; dwFlags : DWORD ): TSocket; stdcall; external WINSOCK2_DLL name 'WSASocketA'; function WSASocketW( af, iType, protocol : Longint; lpProtocolInfo : LPWSAProtocol_InfoW; g : GROUP; dwFlags : DWORD ): TSocket; stdcall; external WINSOCK2_DLL name 'WSASocketW'; function WSASocket( af, iType, protocol : Longint; lpProtocolInfo : LPWSAProtocol_Info; g : GROUP; dwFlags : DWORD ): TSocket; stdcall; external WINSOCK2_DLL name 'WSASocket'; Does the last one work. It gives an error on my vista 32 bit ("dll entry point not found") My understanding is that windows offers the A and W versions, and the none-postfix version is just an in application alias to one of them? Or is there a win version, where the dll actually exports 'WSASocket' ? (And if so, shouldn't it be IFDEF and mapped to A or W for other win versions?

I hadno answer? Did Imiss it?

See
http://forum.lazarus.freepascal.org/index.php/topic,18267.0/topicseen.html

Reply by email

Sven Barth
to Martin: The unit contains 3 declarations (just picking one example, may be similar for other…
Martin wrote 21 lines
The unit contains 3 declarations (just picking one example, may be similar for other functions) function WSASocketA( af, iType, protocol : Longint; lpProtocolInfo : LPWSAProtocol_InfoA; g : GROUP; dwFlags : DWORD ): TSocket; stdcall; external WINSOCK2_DLL name 'WSASocketA'; function WSASocketW( af, iType, protocol : Longint; lpProtocolInfo : LPWSAProtocol_InfoW; g : GROUP; dwFlags : DWORD ): TSocket; stdcall; external WINSOCK2_DLL name 'WSASocketW'; function WSASocket( af, iType, protocol : Longint; lpProtocolInfo : LPWSAProtocol_Info; g : GROUP; dwFlags : DWORD ): TSocket; stdcall; external WINSOCK2_DLL name 'WSASocket'; Does the last one work. It gives an error on my vista 32 bit ("dll entry point not found") My understanding is that windows offers the A and W versions, and the none-postfix version is just an in application alias to one of them? Or is there a win version, where the dll actually exports 'WSASocket' ? (And if so, shouldn't it be IFDEF and mapped to A or W for other win versions?

Sorry for the late answer...

It does indeed look like an error as Dependency Walker only reports the WSASocketA and WSASocketW exports. You should file a bug report to correct all imports in that unit in the same way as the Windows unit works.

Regards,
Sven

Reply by email