Sweden-Number/dlls/dnsapi/libresolv.c

426 lines
11 KiB
C

/*
* Unix interface for libresolv
*
* Copyright 2021 Hans Leidekker for CodeWeavers
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/
#if 0
#pragma makedep unix
#endif
#include "config.h"
#ifdef HAVE_RESOLV
#include <stdarg.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/types.h>
#ifdef HAVE_NETINET_IN_H
# include <netinet/in.h>
#endif
#ifdef HAVE_ARPA_NAMESER_H
# include <arpa/nameser.h>
#endif
#ifdef HAVE_RESOLV_H
# include <resolv.h>
#endif
#ifdef HAVE_NETDB_H
# include <netdb.h>
#endif
#include "ntstatus.h"
#define WIN32_NO_STATUS
#include "windef.h"
#include "winternl.h"
#include "winbase.h"
#include "windns.h"
#define USE_WS_PREFIX
#include "ws2def.h"
#include "ws2ipdef.h"
#include "wine/debug.h"
#include "dnsapi.h"
WINE_DEFAULT_DEBUG_CHANNEL(dnsapi);
/* call res_init() just once because of a bug in Mac OS X 10.4 */
/* call once per thread on systems that have per-thread _res */
static void init_resolver( void )
{
if (!(_res.options & RES_INIT)) res_init();
}
static unsigned long map_options( DWORD options )
{
unsigned long ret = 0;
if (options == DNS_QUERY_STANDARD)
return RES_DEFAULT;
if (options & DNS_QUERY_ACCEPT_TRUNCATED_RESPONSE)
ret |= RES_IGNTC;
if (options & DNS_QUERY_USE_TCP_ONLY)
ret |= RES_USEVC;
if (options & DNS_QUERY_NO_RECURSION)
ret &= ~RES_RECURSE;
if (options & DNS_QUERY_NO_LOCAL_NAME)
ret &= ~RES_DNSRCH;
if (options & DNS_QUERY_NO_HOSTS_FILE)
ret |= RES_NOALIASES;
if (options & DNS_QUERY_TREAT_AS_FQDN)
ret &= ~RES_DEFNAMES;
if (options & DNS_QUERY_DONT_RESET_TTL_VALUES)
FIXME( "option DNS_QUERY_DONT_RESET_TTL_VALUES not implemented\n" );
if (options & DNS_QUERY_RESERVED)
FIXME( "option DNS_QUERY_RESERVED not implemented\n" );
if (options & DNS_QUERY_WIRE_ONLY)
FIXME( "option DNS_QUERY_WIRE_ONLY not implemented\n" );
if (options & DNS_QUERY_NO_WIRE_QUERY)
FIXME( "option DNS_QUERY_NO_WIRE_QUERY not implemented\n" );
if (options & DNS_QUERY_BYPASS_CACHE)
FIXME( "option DNS_QUERY_BYPASS_CACHE not implemented\n" );
if (options & DNS_QUERY_RETURN_MESSAGE)
FIXME( "option DNS_QUERY_RETURN_MESSAGE not implemented\n" );
if (options & DNS_QUERY_NO_NETBT)
TRACE( "netbios query disabled\n" );
return ret;
}
static DNS_STATUS map_h_errno( int error )
{
switch (error)
{
case NO_DATA:
case HOST_NOT_FOUND: return DNS_ERROR_RCODE_NAME_ERROR;
case TRY_AGAIN: return DNS_ERROR_RCODE_SERVER_FAILURE;
case NO_RECOVERY: return DNS_ERROR_RCODE_REFUSED;
#ifdef NETDB_INTERNAL
case NETDB_INTERNAL: return DNS_ERROR_RCODE;
#endif
default:
FIXME( "unmapped error code: %d\n", error );
return DNS_ERROR_RCODE_NOT_IMPLEMENTED;
}
}
static NTSTATUS resolv_get_searchlist( void *args )
{
const struct get_searchlist_params *params = args;
DNS_TXT_DATAW *list = params->list;
DWORD i, needed, str_needed = 0;
char *ptr, *end;
init_resolver();
for (i = 0; i < MAXDNSRCH + 1 && _res.dnsrch[i]; i++)
str_needed += (strlen(_res.dnsrch[i]) + 1) * sizeof(WCHAR);
needed = FIELD_OFFSET(DNS_TXT_DATAW, pStringArray[i]) + str_needed;
if (!list || *params->len < needed)
{
*params->len = needed;
return !list ? ERROR_SUCCESS : ERROR_MORE_DATA;
}
*params->len = needed;
list->dwStringCount = i;
ptr = (char *)(list->pStringArray + i);
end = ptr + str_needed;
for (i = 0; i < MAXDNSRCH + 1 && _res.dnsrch[i]; i++)
{
list->pStringArray[i] = (WCHAR *)ptr;
ptr += ntdll_umbstowcs( _res.dnsrch[i], strlen(_res.dnsrch[i]) + 1,
list->pStringArray[i], end - ptr );
}
return ERROR_SUCCESS;
}
static inline int filter( unsigned short sin_family, USHORT family )
{
if (sin_family != AF_INET && sin_family != AF_INET6) return TRUE;
if (sin_family == AF_INET6 && family == WS_AF_INET) return TRUE;
if (sin_family == AF_INET && family == WS_AF_INET6) return TRUE;
return FALSE;
}
#ifdef HAVE_RES_GETSERVERS
static NTSTATUS resolv_get_serverlist( void *args )
{
const struct get_serverlist_params *params = args;
DNS_ADDR_ARRAY *addrs = params->addrs;
struct __res_state *state = &_res;
DWORD i, found, total, needed;
union res_sockaddr_union *buf;
init_resolver();
total = res_getservers( state, NULL, 0 );
if (!total) return DNS_ERROR_NO_DNS_SERVERS;
if (!addrs && params->family != WS_AF_INET && params->family != WS_AF_INET6)
{
*params->len = FIELD_OFFSET(DNS_ADDR_ARRAY, AddrArray[total]);
return ERROR_SUCCESS;
}
buf = malloc( total * sizeof(union res_sockaddr_union) );
if (!buf) return ERROR_NOT_ENOUGH_MEMORY;
total = res_getservers( state, buf, total );
for (i = 0, found = 0; i < total; i++)
{
if (filter( buf[i].sin.sin_family, params->family )) continue;
found++;
}
if (!found) return DNS_ERROR_NO_DNS_SERVERS;
needed = FIELD_OFFSET(DNS_ADDR_ARRAY, AddrArray[found]);
if (!addrs || *params->len < needed)
{
*params->len = needed;
return !addrs ? ERROR_SUCCESS : ERROR_MORE_DATA;
}
*params->len = needed;
memset( addrs, 0, needed );
addrs->AddrCount = addrs->MaxCount = found;
for (i = 0, found = 0; i < total; i++)
{
if (filter( buf[i].sin.sin_family, params->family )) continue;
if (buf[i].sin6.sin6_family == AF_INET6)
{
SOCKADDR_IN6 *sa = (SOCKADDR_IN6 *)addrs->AddrArray[found].MaxSa;
sa->sin6_family = WS_AF_INET6;
memcpy( &sa->sin6_addr, &buf[i].sin6.sin6_addr, sizeof(sa->sin6_addr) );
addrs->AddrArray[found].Data.DnsAddrUserDword[0] = sizeof(*sa);
}
else
{
SOCKADDR_IN *sa = (SOCKADDR_IN *)addrs->AddrArray[found].MaxSa;
sa->sin_family = WS_AF_INET;
sa->sin_addr.WS_s_addr = buf[i].sin.sin_addr.s_addr;
addrs->AddrArray[found].Data.DnsAddrUserDword[0] = sizeof(*sa);
}
found++;
}
free( buf );
return ERROR_SUCCESS;
}
#else
static NTSTATUS resolv_get_serverlist( void *args )
{
const struct get_serverlist_params *params = args;
DNS_ADDR_ARRAY *addrs = params->addrs;
DWORD needed, found, i;
init_resolver();
if (!_res.nscount) return DNS_ERROR_NO_DNS_SERVERS;
if (!addrs && params->family != WS_AF_INET && params->family != WS_AF_INET6)
{
*params->len = FIELD_OFFSET(DNS_ADDR_ARRAY, AddrArray[_res.nscount]);
return ERROR_SUCCESS;
}
for (i = 0, found = 0; i < _res.nscount; i++)
{
unsigned short sin_family = AF_INET;
#ifdef HAVE_STRUCT___RES_STATE__U__EXT_NSCOUNT6
if (_res._u._ext.nsaddrs[i]) sin_family = _res._u._ext.nsaddrs[i]->sin6_family;
#endif
if (filter( sin_family, params->family )) continue;
found++;
}
if (!found) return DNS_ERROR_NO_DNS_SERVERS;
needed = FIELD_OFFSET(DNS_ADDR_ARRAY, AddrArray[found]);
if (!addrs || *params->len < needed)
{
*params->len = needed;
return !addrs ? ERROR_SUCCESS : ERROR_MORE_DATA;
}
*params->len = needed;
memset( addrs, 0, needed );
addrs->AddrCount = addrs->MaxCount = found;
for (i = 0, found = 0; i < _res.nscount; i++)
{
unsigned short sin_family = AF_INET;
#ifdef HAVE_STRUCT___RES_STATE__U__EXT_NSCOUNT6
if (_res._u._ext.nsaddrs[i]) sin_family = _res._u._ext.nsaddrs[i]->sin6_family;
#endif
if (filter( sin_family, params->family )) continue;
#ifdef HAVE_STRUCT___RES_STATE__U__EXT_NSCOUNT6
if (sin_family == AF_INET6)
{
SOCKADDR_IN6 *sa = (SOCKADDR_IN6 *)addrs->AddrArray[found].MaxSa;
sa->sin6_family = WS_AF_INET6;
memcpy( &sa->sin6_addr, &_res._u._ext.nsaddrs[i]->sin6_addr, sizeof(sa->sin6_addr) );
addrs->AddrArray[found].Data.DnsAddrUserDword[0] = sizeof(*sa);
}
else
#endif
{
SOCKADDR_IN *sa = (SOCKADDR_IN *)addrs->AddrArray[found].MaxSa;
sa->sin_family = WS_AF_INET;
sa->sin_addr.WS_s_addr = _res.nsaddr_list[i].sin_addr.s_addr;
addrs->AddrArray[found].Data.DnsAddrUserDword[0] = sizeof(*sa);
}
found++;
}
return ERROR_SUCCESS;
}
#endif
static NTSTATUS resolv_set_serverlist( void *args )
{
const IP4_ARRAY *addrs = args;
int i;
init_resolver();
if (!addrs || !addrs->AddrCount) return ERROR_SUCCESS;
if (addrs->AddrCount > MAXNS)
{
WARN( "too many servers: %d only using the first: %d\n",
addrs->AddrCount, MAXNS );
_res.nscount = MAXNS;
}
else _res.nscount = addrs->AddrCount;
for (i = 0; i < _res.nscount; i++)
_res.nsaddr_list[i].sin_addr.s_addr = addrs->AddrArray[i];
return ERROR_SUCCESS;
}
static NTSTATUS resolv_query( void *args )
{
const struct query_params *params = args;
DNS_STATUS ret = ERROR_SUCCESS;
int len;
init_resolver();
_res.options |= map_options( params->options );
if ((len = res_query( params->name, ns_c_in, params->type, params->buf, *params->len )) < 0)
ret = map_h_errno( h_errno );
else
*params->len = len;
return ret;
}
const unixlib_entry_t __wine_unix_call_funcs[] =
{
resolv_get_searchlist,
resolv_get_serverlist,
resolv_set_serverlist,
resolv_query,
};
#ifdef _WIN64
typedef ULONG PTR32;
static NTSTATUS wow64_resolv_get_searchlist( void *args )
{
struct
{
PTR32 list;
PTR32 len;
} const *params32 = args;
struct get_searchlist_params params =
{
ULongToPtr(params32->list),
ULongToPtr(params32->len)
};
return resolv_get_searchlist( &params );
}
static NTSTATUS wow64_resolv_get_serverlist( void *args )
{
struct
{
USHORT family;
PTR32 addrs;
PTR32 len;
} const *params32 = args;
struct get_serverlist_params params =
{
params32->family,
ULongToPtr(params32->addrs),
ULongToPtr(params32->len)
};
return resolv_get_serverlist( &params );
}
static NTSTATUS wow64_resolv_query( void *args )
{
struct
{
PTR32 name;
WORD type;
DWORD options;
PTR32 buf;
PTR32 len;
} const *params32 = args;
struct query_params params =
{
ULongToPtr(params32->name),
params32->type,
params32->options,
ULongToPtr(params32->buf),
ULongToPtr(params32->len)
};
return resolv_query( &params );
}
const unixlib_entry_t __wine_unix_call_wow64_funcs[] =
{
wow64_resolv_get_searchlist,
wow64_resolv_get_serverlist,
resolv_set_serverlist,
wow64_resolv_query,
};
#endif /* _WIN64 */
#endif /* HAVE_RESOLV */