fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2009-07-29 04:24 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/source/rtl/hbsocket.c
    ! finished hb_socketResolveAddr() in systems where getaddrinfo()
      is not available
This commit is contained in:
Przemyslaw Czerpak
2009-07-29 02:25:02 +00:00
parent 6a49526b0f
commit fe03d112cb
2 changed files with 19 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -17,6 +17,11 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-07-29 04:24 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/rtl/hbsocket.c
! finished hb_socketResolveAddr() in systems where getaddrinfo()
is not available
2009-07-29 00:50 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/rtl/hbsocket.c
! disabled inet_pton() and inet_ntop() in OS2 GCC builds.

17
harbour/source/rtl/hbsocket.c
View File

@@ -2579,8 +2579,19 @@ char * hb_socketResolveAddr( const char * szAddr, int af )
he = gethostbyname( szAddr );
if( he && he->h_addr_list[ 0 ] )
szResult = hb_strdup( he->h_addr_list[ 0 ] );
{
struct in_addr * sin = ( struct in_addr * ) he->h_addr_list[ 0 ];
# if defined( HB_HAS_INET_NTOP )
char buf[ INET_ADDRSTRLEN ];
szAddr = inet_ntop( AF_INET, sin, buf, sizeof( buf ) );
# elif defined( HB_IS_INET_NTOA_MT_SAFE )
szAddr = inet_ntoa( *sin );
# else
char buf[ INET_ADDRSTRLEN ];
szAddr = hb_inet_ntoa( sin, buf );
# endif
szResult = hb_strdup( szAddr );
}
hb_vmLock();
}
#if defined( HB_HAS_INET6 )
@@ -2736,7 +2747,7 @@ PHB_ITEM hb_socketGetHosts( const char * szAddr, int af )
pItem = hb_itemArrayNew( iCount );
do
{
struct in_addr * sin = ( struct in_addr * ) he->h_addr_list[ iCount - 1 ];
struct in_addr * sin = ( struct in_addr * ) he->h_addr_list[ iCount - 1 ];
# if defined( HB_HAS_INET_NTOP )
char buf[ INET_ADDRSTRLEN ];
szAddr = inet_ntop( AF_INET, sin, buf, sizeof( buf ) );