rnr.c File Reference

#include <ws2_32.h>
#include <debug.h>

Include dependency graph for rnr.c:

Go to the source code of this file.

Macros
#define	NDEBUG

Functions
INT WSAAPI	WSAAddressToStringA (IN LPSOCKADDR lpsaAddress, IN DWORD dwAddressLength, IN LPWSAPROTOCOL_INFOA lpProtocolInfo, OUT LPSTR lpszAddressString, IN OUT LPDWORD lpdwAddressStringLength)
INT WSAAPI	WSAAddressToStringW (IN LPSOCKADDR lpsaAddress, IN DWORD dwAddressLength, IN LPWSAPROTOCOL_INFOW lpProtocolInfo, OUT LPWSTR lpszAddressString, IN OUT LPDWORD lpdwAddressStringLength)
INT WSAAPI	WSALookupServiceEnd (IN HANDLE hLookup)
INT WSAAPI	WSALookupServiceBeginA (IN LPWSAQUERYSETA lpqsRestrictions, IN DWORD dwControlFlags, OUT LPHANDLE lphLookup)
INT WINAPI	WSALookupServiceBeginW (IN LPWSAQUERYSETW lpqsRestrictions, IN DWORD dwControlFlags, OUT LPHANDLE lphLookup)
INT WINAPI	WSALookupServiceNextW (IN HANDLE hLookup, IN DWORD dwControlFlags, IN OUT LPDWORD lpdwBufferLength, OUT LPWSAQUERYSETW lpqsResults)
INT WSAAPI	WSALookupServiceNextA (IN HANDLE hLookup, IN DWORD dwControlFlags, IN OUT LPDWORD lpdwBufferLength, OUT LPWSAQUERYSETA lpqsResults)
INT WSPAPI	WSANSPIoctl (HANDLE hLookup, DWORD dwControlCode, LPVOID lpvInBuffer, DWORD cbInBuffer, LPVOID lpvOutBuffer, DWORD cbOutBuffer, LPDWORD lpcbBytesReturned, LPWSACOMPLETION lpCompletion)
INT WSAAPI	WSARemoveServiceClass (IN LPGUID lpServiceClassId)
INT WSAAPI	WSASetServiceA (IN LPWSAQUERYSETA lpqsRegInfo, IN WSAESETSERVICEOP essOperation, IN DWORD dwControlFlags)
INT WSAAPI	WSASetServiceW (IN LPWSAQUERYSETW lpqsRegInfo, IN WSAESETSERVICEOP essOperation, IN DWORD dwControlFlags)
INT WSAAPI	WSAGetServiceClassInfoA (IN LPGUID lpProviderId, IN LPGUID lpServiceClassId, IN OUT LPDWORD lpdwBufferLength, OUT LPWSASERVICECLASSINFOA lpServiceClassInfo)
INT WSAAPI	WSAGetServiceClassInfoW (IN LPGUID lpProviderId, IN LPGUID lpServiceClassId, IN OUT LPDWORD lpdwBufferLength, OUT LPWSASERVICECLASSINFOW lpServiceClassInfo)
INT WSAAPI	WSAGetServiceClassNameByClassIdA (IN LPGUID lpServiceClassId, OUT LPSTR lpszServiceClassName, IN OUT LPDWORD lpdwBufferLength)
INT WSAAPI	WSAGetServiceClassNameByClassIdW (IN LPGUID lpServiceClassId, OUT LPWSTR lpszServiceClassName, IN OUT LPDWORD lpdwBufferLength)
INT WSAAPI	WSAInstallServiceClassA (IN LPWSASERVICECLASSINFOA lpServiceClassInfo)
INT WSAAPI	WSAInstallServiceClassW (IN LPWSASERVICECLASSINFOW lpServiceClassInfo)
VOID WSAAPI	NSProviderInfoFromContext (IN PNSCATALOG_ENTRY Entry, IN PNSPROVIDER_ENUM_CONTEXT Context)
BOOL WSAAPI	NSProvidersEnumerationProc (PVOID EnumContext, PNSCATALOG_ENTRY Entry)
INT WSAAPI	WSAEnumNameSpaceProvidersInternal (IN OUT LPDWORD lpdwBufferLength, OUT LPWSANAMESPACE_INFOA lpnspBuffer, BOOLEAN Unicode)
INT WSAAPI	WSAEnumNameSpaceProvidersA (IN OUT LPDWORD lpdwBufferLength, OUT LPWSANAMESPACE_INFOA lpnspBuffer)
INT WSAAPI	WSAEnumNameSpaceProvidersW (IN OUT LPDWORD lpdwBufferLength, OUT LPWSANAMESPACE_INFOW lpnspBuffer)
INT WSAAPI	WSAStringToAddressA (IN LPSTR AddressString, IN INT AddressFamily, IN LPWSAPROTOCOL_INFOA lpProtocolInfo, OUT LPSOCKADDR lpAddress, IN OUT LPINT lpAddressLength)
INT WSAAPI	WSAStringToAddressW (IN LPWSTR AddressString, IN INT AddressFamily, IN LPWSAPROTOCOL_INFOW lpProtocolInfo, OUT LPSOCKADDR lpAddress, IN OUT LPINT lpAddressLength)

Macro Definition Documentation

NDEBUG

#define NDEBUG

Definition at line 13 of file rnr.c.

Function Documentation

NSProviderInfoFromContext()

VOID WSAAPI NSProviderInfoFromContext	(	IN PNSCATALOG_ENTRY	Entry,
		IN PNSPROVIDER_ENUM_CONTEXT	Context
	)

Definition at line 707 of file rnr.c.

{
    INT size = Context->Unicode ? sizeof(WSANAMESPACE_INFOW) : sizeof(WSANAMESPACE_INFOA);
    /* Calculate ProviderName string size */
    INT size1 = Entry->ProviderName ? wcslen(Entry->ProviderName) + 1 : 0;
    INT size2 = Context->Unicode ? size1 * sizeof(WCHAR) : size1 * sizeof(CHAR);
    WSANAMESPACE_INFOW infoW;
    /* Fill NS Provider data */
    infoW.dwNameSpace = Entry->NamespaceId;
    infoW.dwVersion = Entry->Version;
    infoW.fActive = Entry->Enabled;
    RtlMoveMemory(&infoW.NSProviderId,
        &Entry->ProviderId,
        sizeof(infoW.NSProviderId));
    if (size2)
    {
        /* Calculate ProviderName string pointer */
        infoW.lpszIdentifier = (LPWSTR)((ULONG_PTR)Context->ProtocolBuffer +
            Context->BufferUsed + size);
    }
    else
    {
        infoW.lpszIdentifier = NULL;
    }
 
    /* Check if we'll have space */
    if ((Context->BufferUsed + size + size2) <=
        (Context->BufferLength))
    {
        /* Copy the data */
        RtlMoveMemory((PVOID)((ULONG_PTR)Context->ProtocolBuffer +
            Context->BufferUsed),
            &infoW,
            size);
        if (size2)
        {
            /* Entry->ProviderName is LPWSTR */
            if (Context->Unicode)
            {
                RtlMoveMemory((PVOID)((ULONG_PTR)Context->ProtocolBuffer +
                    Context->BufferUsed + size),
                    Entry->ProviderName,
                    size2);
            }
            else
            {
                /* Call the conversion function */
                WideCharToMultiByte(CP_ACP,
                    0,
                    Entry->ProviderName,
                    -1,
                    (LPSTR)((ULONG_PTR)Context->ProtocolBuffer +
                        Context->BufferUsed + size),
                    size2,
                    NULL,
                    NULL);
 
            }
        }
 
        /* Increase the count */
        Context->Count++;
    }
}

Referenced by NSProvidersEnumerationProc().

NSProvidersEnumerationProc()

BOOL WSAAPI NSProvidersEnumerationProc	(	PVOID	EnumContext,
		PNSCATALOG_ENTRY	Entry
	)

Definition at line 775 of file rnr.c.

{
    PNSPROVIDER_ENUM_CONTEXT Context = (PNSPROVIDER_ENUM_CONTEXT)EnumContext;
 
    /* Calculate ProviderName string size */
    INT size1 = Entry->ProviderName ? wcslen(Entry->ProviderName) + 1 : 0;
    INT size2 = Context->Unicode ? size1 * sizeof(WCHAR) : size1 * sizeof(CHAR);
 
    /* Copy the information */
    NSProviderInfoFromContext(Entry, Context);
    Context->BufferUsed += Context->Unicode ? (sizeof(WSANAMESPACE_INFOW)+size2) : (sizeof(WSANAMESPACE_INFOA)+size2);
 
    /* Continue enumeration */
    return TRUE;
}

Referenced by WSAEnumNameSpaceProvidersInternal().

WSAAddressToStringA()

INT WSAAPI WSAAddressToStringA	(	IN LPSOCKADDR	lpsaAddress,
		IN DWORD	dwAddressLength,
		IN LPWSAPROTOCOL_INFOA	lpProtocolInfo,
		OUT LPSTR	lpszAddressString,
		IN OUT LPDWORD	lpdwAddressStringLength
	)

Definition at line 23 of file rnr.c.

{
    PWSPROCESS Process;
    PWSTHREAD Thread;
    INT ErrorCode, Status;
    DWORD CatalogEntryId;
    PTCATALOG Catalog;
    PTCATALOG_ENTRY CatalogEntry;
    LPWSTR UnicodeString;
    DWORD Length = *lpdwAddressStringLength;
 
    DPRINT("WSAAddressToStringA: %p\n", lpsaAddress);
 
    /* Enter prolog */
    if ((ErrorCode = WsApiProlog(&Process, &Thread)) != ERROR_SUCCESS)
    {
        /* Leave now */
        SetLastError(ErrorCode);
        return SOCKET_ERROR;
    }
 
    /* Allocate the unicode string */
    UnicodeString = HeapAlloc(WsSockHeap, 0, Length * 2);
    if (!UnicodeString)
    {
        /* No memory; fail */
        SetLastError(WSAENOBUFS);
        return SOCKET_ERROR;
    }
 
    /* Get the catalog */
    Catalog = WsProcGetTCatalog(Process);
 
    /* Check if we got custom protocol info */
    if (lpProtocolInfo)
    {
        /* Get the entry ID */
        CatalogEntryId = lpProtocolInfo->dwCatalogEntryId;
 
        /* Get the entry associated with it */
        ErrorCode = WsTcGetEntryFromCatalogEntryId(Catalog,
                                                   CatalogEntryId,
                                                   &CatalogEntry);
    }
    else
    {
        /* Get it from the address family */
        ErrorCode = WsTcGetEntryFromAf(Catalog,
                                       lpsaAddress->sa_family,
                                       &CatalogEntry);
    }
 
    /* Check for success */
    if (ErrorCode == ERROR_SUCCESS)
    {
        /* Call the provider */
        Status = CatalogEntry->Provider->Service.lpWSPAddressToString(lpsaAddress,
                                                                      dwAddressLength,
                                                                      &CatalogEntry->
                                                                      ProtocolInfo,
                                                                      UnicodeString,
                                                                      lpdwAddressStringLength,
                                                                      &ErrorCode);
        if (Status == ERROR_SUCCESS)
        {
            /* Convert the string */
            WideCharToMultiByte(CP_ACP,
                                0,
                                UnicodeString,
                                -1,
                                lpszAddressString,
                                Length,
                                NULL,
                                NULL);
        }
 
        /* Dereference the entry */
        WsTcEntryDereference(CatalogEntry);
 
        /* Free the unicode string */
        HeapFree(WsSockHeap, 0, UnicodeString);
 
        /* Check for success and return */
        if (Status == ERROR_SUCCESS) return ERROR_SUCCESS;
    }
    else
    {
        /* Free the unicode string */
        HeapFree(WsSockHeap, 0, UnicodeString);
    }
 
    /* Set the error and return */
    SetLastError(ErrorCode);
    return SOCKET_ERROR;
}

Referenced by START_TEST().

WSAAddressToStringW()

INT WSAAPI WSAAddressToStringW	(	IN LPSOCKADDR	lpsaAddress,
		IN DWORD	dwAddressLength,
		IN LPWSAPROTOCOL_INFOW	lpProtocolInfo,
		OUT LPWSTR	lpszAddressString,
		IN OUT LPDWORD	lpdwAddressStringLength
	)

Definition at line 128 of file rnr.c.

{
    PWSPROCESS Process;
    PWSTHREAD Thread;
    INT ErrorCode, Status;
    DWORD CatalogEntryId;
    PTCATALOG Catalog;
    PTCATALOG_ENTRY CatalogEntry;
 
    DPRINT("WSAAddressToStringW: %p\n", lpsaAddress);
 
    /* Enter prolog */
    if ((ErrorCode = WsApiProlog(&Process, &Thread)) != ERROR_SUCCESS)
    {
        /* Leave now */
        SetLastError(ErrorCode);
        return SOCKET_ERROR;
    }
 
    /* Get the catalog */
    Catalog = WsProcGetTCatalog(Process);
 
    /* Check if we got custom protocol info */
    if (lpProtocolInfo)
    {
        /* Get the entry ID */
        CatalogEntryId = lpProtocolInfo->dwCatalogEntryId;
 
        /* Get the entry associated with it */
        ErrorCode = WsTcGetEntryFromCatalogEntryId(Catalog,
                                                   CatalogEntryId,
                                                   &CatalogEntry);
    }
    else
    {
        /* Get it from the address family */
        ErrorCode = WsTcGetEntryFromAf(Catalog,
                                       lpsaAddress->sa_family,
                                       &CatalogEntry);
    }
 
    /* Check for success */
    if (ErrorCode == ERROR_SUCCESS)
    {
        /* Call the provider */
        Status = CatalogEntry->Provider->Service.lpWSPAddressToString(lpsaAddress,
                                                                      dwAddressLength,
                                                                      &CatalogEntry->
                                                                      ProtocolInfo,
                                                                      lpszAddressString,
                                                                      lpdwAddressStringLength,
                                                                      &ErrorCode);
 
        /* Dereference the entry */
        WsTcEntryDereference(CatalogEntry);
 
        /* Check for success and return */
        if (Status == ERROR_SUCCESS) return ERROR_SUCCESS;
    }
 
    /* Set the error and return */
    SetLastError(ErrorCode);
    return SOCKET_ERROR;
}

Referenced by AllSysInfo(), get_defaultipgateway(), get_dnsserversearchorder(), get_ipaddress(), get_ipsubnet(), GetNameInfoW(), and wmain().

WSAEnumNameSpaceProvidersA()

INT WSAAPI WSAEnumNameSpaceProvidersA	(	IN OUT LPDWORD	lpdwBufferLength,
		OUT LPWSANAMESPACE_INFOA	lpnspBuffer
	)

Definition at line 859 of file rnr.c.

{
    DPRINT("WSAEnumNameSpaceProvidersA: %lx\n", lpnspBuffer);
    return WSAEnumNameSpaceProvidersInternal(lpdwBufferLength, (LPWSANAMESPACE_INFOA)lpnspBuffer, FALSE);
}

WSAEnumNameSpaceProvidersInternal()

INT WSAAPI WSAEnumNameSpaceProvidersInternal	(	IN OUT LPDWORD	lpdwBufferLength,
		OUT LPWSANAMESPACE_INFOA	lpnspBuffer,
		BOOLEAN	Unicode
	)

Definition at line 794 of file rnr.c.

{
    INT Status;
    PWSPROCESS WsProcess;
    PNSCATALOG Catalog;
    NSPROVIDER_ENUM_CONTEXT Context;
 
    DPRINT("WSAEnumNameSpaceProvidersInternal: %lx\n", lpnspBuffer);
 
    if (!lpdwBufferLength)
    {
        WSASetLastError(WSAEFAULT);
        return SOCKET_ERROR;
    }
    WsProcess = WsGetProcess();
    /* Create a catalog object from the current one */
    Catalog = WsProcGetNsCatalog(WsProcess);
    if (!Catalog)
    {
        /* Fail if we couldn't */
        WSASetLastError(WSA_NOT_ENOUGH_MEMORY);
        return SOCKET_ERROR;
    }
 
    Context.ProtocolBuffer = lpnspBuffer;
    Context.BufferLength = lpnspBuffer ? *lpdwBufferLength : 0;
    Context.BufferUsed = 0;
    Context.Count = 0;
    Context.Unicode = Unicode;
    Context.ErrorCode = ERROR_SUCCESS;
 
    WsNcEnumerateCatalogItems(Catalog, NSProvidersEnumerationProc, &Context);
 
    /* Get status */
    Status = Context.Count;
 
    /* Check the error code */
    if (Context.ErrorCode == ERROR_SUCCESS)
    {
        /* Check if enough space was available */
        if (Context.BufferLength < Context.BufferUsed)
        {
            /* Fail and tell them how much we need */
            *lpdwBufferLength = Context.BufferUsed;
            WSASetLastError(WSAEFAULT);
            Status = SOCKET_ERROR;
        }
    }
    else
    {
        /* Failure, normalize error */
        Status = SOCKET_ERROR;
        WSASetLastError(Context.ErrorCode);
    }
 
    /* Return */
    return Status;
}

Referenced by WSAEnumNameSpaceProvidersA(), and WSAEnumNameSpaceProvidersW().

WSAEnumNameSpaceProvidersW()

INT WSAAPI WSAEnumNameSpaceProvidersW	(	IN OUT LPDWORD	lpdwBufferLength,
		OUT LPWSANAMESPACE_INFOW	lpnspBuffer
	)

Definition at line 871 of file rnr.c.

{
    DPRINT("WSAEnumNameSpaceProvidersW: %lx\n", lpnspBuffer);
    return WSAEnumNameSpaceProvidersInternal(lpdwBufferLength, (LPWSANAMESPACE_INFOA)lpnspBuffer, TRUE);
}

WSAGetServiceClassInfoA()

INT WSAAPI WSAGetServiceClassInfoA	(	IN LPGUID	lpProviderId,
		IN LPGUID	lpServiceClassId,
		IN OUT LPDWORD	lpdwBufferLength,
		OUT LPWSASERVICECLASSINFOA	lpServiceClassInfo
	)

Definition at line 628 of file rnr.c.

{
    DPRINT("WSAGetServiceClassInfoA: %lx\n", lpProviderId);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSAGetServiceClassInfoW()

INT WSAAPI WSAGetServiceClassInfoW	(	IN LPGUID	lpProviderId,
		IN LPGUID	lpServiceClassId,
		IN OUT LPDWORD	lpdwBufferLength,
		OUT LPWSASERVICECLASSINFOW	lpServiceClassInfo
	)

Definition at line 643 of file rnr.c.

{
    DPRINT("WSAGetServiceClassInfoW: %lx\n", lpProviderId);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSAGetServiceClassNameByClassIdA()

INT WSAAPI WSAGetServiceClassNameByClassIdA	(	IN LPGUID	lpServiceClassId,
		OUT LPSTR	lpszServiceClassName,
		IN OUT LPDWORD	lpdwBufferLength
	)

Definition at line 658 of file rnr.c.

{
    DPRINT("WSAGetServiceClassNameByClassIdA: %lx\n", lpServiceClassId);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSAGetServiceClassNameByClassIdW()

INT WSAAPI WSAGetServiceClassNameByClassIdW	(	IN LPGUID	lpServiceClassId,
		OUT LPWSTR	lpszServiceClassName,
		IN OUT LPDWORD	lpdwBufferLength
	)

Definition at line 672 of file rnr.c.

{
    DPRINT("WSAGetServiceClassNameByClassIdW: %lx\n", lpServiceClassId);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSAInstallServiceClassA()

INT WSAAPI WSAInstallServiceClassA

(

IN LPWSASERVICECLASSINFOA

lpServiceClassInfo

)

Definition at line 686 of file rnr.c.

{
    DPRINT("WSAInstallServiceClassA: %lx\n", lpServiceClassInfo);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSAInstallServiceClassW()

INT WSAAPI WSAInstallServiceClassW

(

IN LPWSASERVICECLASSINFOW

lpServiceClassInfo

)

Definition at line 698 of file rnr.c.

{
    DPRINT("WSAInstallServiceClassW: %lx\n", lpServiceClassInfo);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSALookupServiceBeginA()

INT WSAAPI WSALookupServiceBeginA	(	IN LPWSAQUERYSETA	lpqsRestrictions,
		IN DWORD	dwControlFlags,
		OUT LPHANDLE	lphLookup
	)

Definition at line 245 of file rnr.c.

{
    INT ErrorCode;
    LPWSAQUERYSETW UnicodeQuerySet = NULL;
    SIZE_T UnicodeQuerySetSize = 0;
 
    DPRINT("WSALookupServiceBeginA: %p\n", lpqsRestrictions);
 
    /* Verify pointer */
    if (IsBadReadPtr(lpqsRestrictions, sizeof(*lpqsRestrictions)) ||
        IsBadReadPtr(lpqsRestrictions->lpServiceClassId, sizeof(*lpqsRestrictions->lpServiceClassId)))
    {
        /* Invalid */
        SetLastError(WSAEFAULT);
        return SOCKET_ERROR;
    }
 
    /* Clear the reserved fields */
    lpqsRestrictions->dwOutputFlags = 0;
    lpqsRestrictions->lpszComment = NULL;
    lpqsRestrictions->dwNumberOfCsAddrs = 0;
 
    /* Find out the side we'll need */
    ErrorCode = MapAnsiQuerySetToUnicode(lpqsRestrictions,
                                         &UnicodeQuerySetSize,
                                         UnicodeQuerySet);
 
    /* We should've failed */
    if (ErrorCode == WSAEFAULT)
    {
        /* Allocate the buffer we'll need */
        UnicodeQuerySet = HeapAlloc(WsSockHeap, 0, UnicodeQuerySetSize);
        if (UnicodeQuerySet)
        {
            /* Do the conversion for real */
            ErrorCode = MapAnsiQuerySetToUnicode(lpqsRestrictions,
                                                 &UnicodeQuerySetSize,
                                                 UnicodeQuerySet);
            if (ErrorCode == ERROR_SUCCESS)
            {
                /* Now call the Unicode function */
                ErrorCode = WSALookupServiceBeginW(UnicodeQuerySet,
                                                   dwControlFlags,
                                                   lphLookup);
            }
 
            /* Free our buffer */
            HeapFree(WsSockHeap, 0, UnicodeQuerySet);
        }
        else
        {
            /* No memory to allocate */
            ErrorCode = WSAEFAULT;
        }
    }
 
    /* Set the error in case of failure */
    if (ErrorCode != ERROR_SUCCESS)
        SetLastError(ErrorCode);
 
    /* Return to caller */
    return ErrorCode == ERROR_SUCCESS ? ErrorCode : SOCKET_ERROR;
}

Referenced by getxyDataEnt().

WSALookupServiceBeginW()

INT WINAPI WSALookupServiceBeginW	(	IN LPWSAQUERYSETW	lpqsRestrictions,
		IN DWORD	dwControlFlags,
		OUT LPHANDLE	lphLookup
	)

Definition at line 316 of file rnr.c.

{
    PWSPROCESS Process;
    PWSTHREAD Thread;
    INT ErrorCode;
    PNSQUERY Query;
 
    DPRINT("WSALookupServiceBeginW: %p\n", lpqsRestrictions);
 
    /* Enter prolog */
    if ((ErrorCode = WsApiProlog(&Process, &Thread)) != ERROR_SUCCESS)
    {
        /* Leave now */
        SetLastError(ErrorCode);
        return SOCKET_ERROR;
    }
 
    /* Verify pointers */
    if (IsBadWritePtr(lphLookup, sizeof(*lphLookup)) ||
        IsBadReadPtr(lpqsRestrictions, sizeof(*lpqsRestrictions)) ||
        IsBadReadPtr(lpqsRestrictions->lpServiceClassId, sizeof(*lpqsRestrictions->lpServiceClassId)))
    {
        /* They are invalid; fail */
        SetLastError(WSAEFAULT);
        return SOCKET_ERROR;
    }
 
    /* Create a new query object */
    if ((Query = WsNqAllocate()))
    {
        /* Initialize it */
        WsNqInitialize(Query);
 
        /* Do the lookup */
        ErrorCode = WsNqLookupServiceBegin(Query,
                                           lpqsRestrictions,
                                           dwControlFlags,
                                           WsProcGetNsCatalog(Process));
 
        /* Check for success */
        if (ErrorCode == ERROR_SUCCESS)
        {
            /* Return the handle */
            *lphLookup = Query;
        }
        else
        {
            /* Fail */
            *lphLookup = NULL;
            WsNqDelete(Query);
        }
    }
    else
    {
        /* No memory */
        ErrorCode = SOCKET_ERROR;
        SetLastError(WSAENOBUFS);
    }
 
    /* Return */
    return ErrorCode;
}

Referenced by LookupNodeByAddr(), and WSALookupServiceBeginA().

WSALookupServiceEnd()

INT WSAAPI WSALookupServiceEnd

(

IN HANDLE

hLookup

)

Definition at line 202 of file rnr.c.

{
    PWSPROCESS Process;
    PWSTHREAD Thread;
    INT ErrorCode;
    PNSQUERY Query = hLookup;
 
    DPRINT("WSALookupServiceEnd: %lx\n", hLookup);
 
    /* Enter prolog */
    if ((ErrorCode = WsApiProlog(&Process, &Thread)) != ERROR_SUCCESS)
    {
        /* Leave now */
        SetLastError(ErrorCode);
        return SOCKET_ERROR;
    }
 
    /* Check for a valid handle, then validate and reference it */
    if (IsBadReadPtr(Query, sizeof(*Query)) || !WsNqValidateAndReference(Query))
    {
        /* Fail */
        SetLastError(WSA_INVALID_HANDLE);
        return SOCKET_ERROR;
    }
 
    /* Do the lookup */
    ErrorCode = WsNqLookupServiceEnd(Query);
 
    /* Remove the validation reference */
    WsNqDereference(Query);
 
    /* Remove the keep-alive */
    WsNqDereference(Query);
 
    /* Return */
    return ERROR_SUCCESS;
}

Referenced by getxyDataEnt(), and LookupNodeByAddr().

WSALookupServiceNextA()

INT WSAAPI WSALookupServiceNextA	(	IN HANDLE	hLookup,
		IN DWORD	dwControlFlags,
		IN OUT LPDWORD	lpdwBufferLength,
		OUT LPWSAQUERYSETA	lpqsResults
	)

Definition at line 444 of file rnr.c.

{
    LPWSAQUERYSETW UnicodeQuerySet;
    DWORD UnicodeQuerySetSize;
    INT ErrorCode;
 
    DPRINT("WSALookupServiceNextA: %lx\n", hLookup);
 
    /*
     * Verify pointers. Note that the size of the buffer
     * pointed by lpqsResults is given by *lpdwBufferLength.
     */
    if (IsBadReadPtr(lpdwBufferLength, sizeof(*lpdwBufferLength)) ||
        IsBadWritePtr(lpqsResults, *lpdwBufferLength))
    {
        /* It is invalid; fail */
        SetLastError(WSAEFAULT);
        return SOCKET_ERROR;
    }
 
    UnicodeQuerySetSize = *lpdwBufferLength;
 
    /* Check how much the user is giving */
    if (UnicodeQuerySetSize >= sizeof(WSAQUERYSETW))
    {
        /* Allocate the buffer we'll use */
        UnicodeQuerySet = HeapAlloc(WsSockHeap, 0, UnicodeQuerySetSize);
        if (!UnicodeQuerySet)
        {
            /*
             * We failed, possibly because the specified size was too large?
             * Retrieve the needed buffer size with the WSALookupServiceNextW
             * call and retry again a second time.
             */
            UnicodeQuerySetSize = 0;
        }
    }
    else
    {
        /*
         * The buffer is too small. Retrieve the needed buffer size with
         * the WSALookupServiceNextW call and return it to the caller.
         */
        UnicodeQuerySet = NULL;
        UnicodeQuerySetSize = 0;
    }
 
    /* Call the Unicode Function */
    ErrorCode = WSALookupServiceNextW(hLookup,
                                      dwControlFlags,
                                      &UnicodeQuerySetSize,
                                      UnicodeQuerySet);
 
    /*
     * Check whether we actually just retrieved the needed buffer size
     * because our previous local allocation did fail. If so, allocate
     * a new buffer and retry again.
     */
    if ( (!UnicodeQuerySet) && (*lpdwBufferLength >= sizeof(WSAQUERYSETW)) &&
         (ErrorCode == SOCKET_ERROR) && (GetLastError() == WSAEFAULT) )
    {
        /* Allocate the buffer we'll use */
        UnicodeQuerySet = HeapAlloc(WsSockHeap, 0, UnicodeQuerySetSize);
        if (UnicodeQuerySet)
        {
            /* Call the Unicode Function */
            ErrorCode = WSALookupServiceNextW(hLookup,
                                              dwControlFlags,
                                              &UnicodeQuerySetSize,
                                              UnicodeQuerySet);
        }
        /*
         * Otherwise the allocation failed and we
         * fall back into the error checks below.
         */
    }
 
    if (ErrorCode == ERROR_SUCCESS)
    {
        SIZE_T SetSize = *lpdwBufferLength;
 
        /* Now convert back to ANSI */
        ErrorCode = MapUnicodeQuerySetToAnsi(UnicodeQuerySet,
                                             &SetSize,
                                             lpqsResults);
        if (ErrorCode != ERROR_SUCCESS)
        {
            SetLastError(ErrorCode);
        }
        else if (SetSize > MAXDWORD)
        {
            ErrorCode = ERROR_ARITHMETIC_OVERFLOW;
            SetLastError(ErrorCode);
        }
        else
        {
            *lpdwBufferLength = SetSize;
        }
    }
    else
    {
        /* Check if we ran out of space */
        if (GetLastError() == WSAEFAULT)
        {
            /* Return how much space we'll need, including padding */
            *lpdwBufferLength = UnicodeQuerySetSize +
                                ((sizeof(ULONG) * 6) - (6 * 1));
        }
    }
 
    /* If we had a local buffer, free it */
    if (UnicodeQuerySet)
        HeapFree(WsSockHeap, 0, UnicodeQuerySet);
 
    /* Return to caller */
    return (ErrorCode == ERROR_SUCCESS) ? ErrorCode : SOCKET_ERROR;
}

Referenced by getxyDataEnt().

WSALookupServiceNextW()

INT WINAPI WSALookupServiceNextW	(	IN HANDLE	hLookup,
		IN DWORD	dwControlFlags,
		IN OUT LPDWORD	lpdwBufferLength,
		OUT LPWSAQUERYSETW	lpqsResults
	)

Definition at line 386 of file rnr.c.

{
    PWSPROCESS Process;
    PWSTHREAD Thread;
    INT ErrorCode;
    PNSQUERY Query = hLookup;
 
    DPRINT("WSALookupServiceNextW: %lx\n", hLookup);
 
    /* Enter prolog */
    if ((ErrorCode = WsApiProlog(&Process, &Thread)) != ERROR_SUCCESS)
    {
        /* Leave now */
        SetLastError(ErrorCode);
        return SOCKET_ERROR;
    }
 
    /*
     * Verify pointers. Note that the size of the buffer
     * pointed by lpqsResults is given by *lpdwBufferLength.
     */
    if (IsBadReadPtr(lpdwBufferLength, sizeof(*lpdwBufferLength)) ||
        IsBadWritePtr(lpqsResults, *lpdwBufferLength))
    {
        /* It is invalid; fail */
        SetLastError(WSAEFAULT);
        return SOCKET_ERROR;
    }
 
    /* Check for a valid handle, then validate and reference it */
    if (IsBadReadPtr(Query, sizeof(*Query)) || !WsNqValidateAndReference(Query))
    {
        /* Fail */
        SetLastError(WSA_INVALID_HANDLE);
        return SOCKET_ERROR;
    }
 
    /* Do the lookup */
    ErrorCode = WsNqLookupServiceNext(Query,
                                      dwControlFlags,
                                      lpdwBufferLength,
                                      lpqsResults);
 
    /* Remove the validation reference */
    WsNqDereference(Query);
 
    /* Return */
    return ErrorCode;
}

Referenced by LookupNodeByAddr(), and WSALookupServiceNextA().

WSANSPIoctl()

INT WSPAPI WSANSPIoctl	(	HANDLE	hLookup,
		DWORD	dwControlCode,
		LPVOID	lpvInBuffer,
		DWORD	cbInBuffer,
		LPVOID	lpvOutBuffer,
		DWORD	cbOutBuffer,
		LPDWORD	lpcbBytesReturned,
		LPWSACOMPLETION	lpCompletion
	)

Definition at line 570 of file rnr.c.

{
    DPRINT("WSANSPIoctl: %lx\n", hLookup);
    return 0;
}

WSARemoveServiceClass()

INT WSAAPI WSARemoveServiceClass

(

IN LPGUID

lpServiceClassId

)

Definition at line 588 of file rnr.c.

{
    DPRINT("WSARemoveServiceClass: %lx\n", lpServiceClassId);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSASetServiceA()

INT WSAAPI WSASetServiceA	(	IN LPWSAQUERYSETA	lpqsRegInfo,
		IN WSAESETSERVICEOP	essOperation,
		IN DWORD	dwControlFlags
	)

Definition at line 600 of file rnr.c.

{
    DPRINT("WSASetServiceA: %lx\n", lpqsRegInfo);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSASetServiceW()

INT WSAAPI WSASetServiceW	(	IN LPWSAQUERYSETW	lpqsRegInfo,
		IN WSAESETSERVICEOP	essOperation,
		IN DWORD	dwControlFlags
	)

Definition at line 614 of file rnr.c.

{
    DPRINT("WSASetServiceW: %lx\n", lpqsRegInfo);
    SetLastError(WSAEINVAL);
    return SOCKET_ERROR;
}

WSAStringToAddressA()

INT WSAAPI WSAStringToAddressA	(	IN LPSTR	AddressString,
		IN INT	AddressFamily,
		IN LPWSAPROTOCOL_INFOA	lpProtocolInfo,
		OUT LPSOCKADDR	lpAddress,
		IN OUT LPINT	lpAddressLength
	)

Definition at line 883 of file rnr.c.

{
    PWSPROCESS Process;
    PWSTHREAD Thread;
    INT ErrorCode, Status;
    DWORD CatalogEntryId;
    PTCATALOG Catalog;
    PTCATALOG_ENTRY CatalogEntry;
    LPWSTR UnicodeString;
    DWORD Length = (DWORD)strlen(AddressString) + 1;
 
    DPRINT("WSAStringToAddressA: %s\n", AddressString);
 
    /* Enter prolog */
    if ((ErrorCode = WsApiProlog(&Process, &Thread)) != ERROR_SUCCESS)
    {
        /* Leave now */
        SetLastError(ErrorCode);
        return SOCKET_ERROR;
    }
 
    /* Allocate the unicode string */
    UnicodeString = HeapAlloc(WsSockHeap, 0, Length * 2);
    if (!UnicodeString)
    {
        /* No memory; fail */
        SetLastError(WSAENOBUFS);
        return SOCKET_ERROR;
    }
 
    /* Convert the string */
    MultiByteToWideChar(CP_ACP, 0, AddressString, -1, UnicodeString, Length);
 
    /* Get the catalog */
    Catalog = WsProcGetTCatalog(Process);
 
    /* Check if we got custom protocol info */
    if (lpProtocolInfo)
    {
        /* Get the entry ID */
        CatalogEntryId = lpProtocolInfo->dwCatalogEntryId;
 
        /* Get the entry associated with it */
        ErrorCode = WsTcGetEntryFromCatalogEntryId(Catalog,
                                                   CatalogEntryId,
                                                   &CatalogEntry);
    }
    else
    {
        /* Get it from the address family */
        ErrorCode = WsTcGetEntryFromAf(Catalog, AddressFamily, &CatalogEntry);
    }
 
    /* Check for success */
    if (ErrorCode == ERROR_SUCCESS)
    {
        /* Call the provider */
        Status = CatalogEntry->Provider->Service.lpWSPStringToAddress(UnicodeString,
                                                              AddressFamily,
                                                              &CatalogEntry->
                                                              ProtocolInfo,
                                                              lpAddress,
                                                              lpAddressLength,
                                                              &ErrorCode);
 
        /* Dereference the entry */
        WsTcEntryDereference(CatalogEntry);
 
        /* Free the unicode string */
        HeapFree(WsSockHeap, 0, UnicodeString);
 
        /* Check for success and return */
        if (Status == ERROR_SUCCESS) return ERROR_SUCCESS;
    }
    else
    {
        /* Free the unicode string */
        HeapFree(WsSockHeap, 0, UnicodeString);
    }
 
    /* Set the error and return */
    SetLastError(ErrorCode);
    return SOCKET_ERROR;
}

WSAStringToAddressW()

INT WSAAPI WSAStringToAddressW	(	IN LPWSTR	AddressString,
		IN INT	AddressFamily,
		IN LPWSAPROTOCOL_INFOW	lpProtocolInfo,
		OUT LPSOCKADDR	lpAddress,
		IN OUT LPINT	lpAddressLength
	)

Definition at line 977 of file rnr.c.

{
    PWSPROCESS Process;
    PWSTHREAD Thread;
    INT ErrorCode, Status;
    DWORD CatalogEntryId;
    PTCATALOG Catalog;
    PTCATALOG_ENTRY CatalogEntry;
 
    DPRINT("WSAStringToAddressW: %S\n", AddressString);
 
    /* Enter prolog */
    if ((ErrorCode = WsApiProlog(&Process, &Thread)) != ERROR_SUCCESS)
    {
        /* Leave now */
        SetLastError(ErrorCode);
        return SOCKET_ERROR;
    }
 
    /* Get the catalog */
    Catalog = WsProcGetTCatalog(Process);
 
    /* Check if we got custom protocol info */
    if (lpProtocolInfo)
    {
        /* Get the entry ID */
        CatalogEntryId = lpProtocolInfo->dwCatalogEntryId;
 
        /* Get the entry associated with it */
        ErrorCode = WsTcGetEntryFromCatalogEntryId(Catalog,
                                                   CatalogEntryId,
                                                   &CatalogEntry);
    }
    else
    {
        /* Get it from the address family */
        ErrorCode = WsTcGetEntryFromAf(Catalog, AddressFamily, &CatalogEntry);
    }
 
    /* Check for success */
    if (ErrorCode == ERROR_SUCCESS)
    {
        /* Call the provider */
        Status = CatalogEntry->Provider->Service.lpWSPStringToAddress(AddressString,
                                                                      AddressFamily,
                                                                      &CatalogEntry->
                                                                      ProtocolInfo,
                                                                      lpAddress,
                                                                      lpAddressLength,
                                                                      &ErrorCode);
 
        /* Dereference the entry */
        WsTcEntryDereference(CatalogEntry);
 
        /* Check for success and return */
        if (Status == ERROR_SUCCESS) return ERROR_SUCCESS;
    }
 
    /* Set the error and return */
    SetLastError(ErrorCode);
    return SOCKET_ERROR;
}