475 lines
14 KiB
C
475 lines
14 KiB
C
/*
|
|
* WLDAP32 - LDAP support for Wine
|
|
*
|
|
* Copyright 2005 Hans Leidekker
|
|
*
|
|
* 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
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include "wine/port.h"
|
|
#include "wine/debug.h"
|
|
|
|
#include <stdarg.h>
|
|
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "winnls.h"
|
|
|
|
#ifdef HAVE_LDAP_H
|
|
#include <ldap.h>
|
|
#endif
|
|
|
|
#include "winldap_private.h"
|
|
#include "wldap32.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(wldap32);
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_extended_resultA (WLDAP32.@)
|
|
*
|
|
* See ldap_parse_extended_resultW.
|
|
*/
|
|
ULONG CDECL ldap_parse_extended_resultA( WLDAP32_LDAP *ld, WLDAP32_LDAPMessage *result,
|
|
PCHAR *oid, struct WLDAP32_berval **data, BOOLEAN free )
|
|
{
|
|
ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
WCHAR *oidW = NULL;
|
|
|
|
TRACE( "(%p, %p, %p, %p, 0x%02x)\n", ld, result, oid, data, free );
|
|
|
|
if (!ld) return WLDAP32_LDAP_PARAM_ERROR;
|
|
if (!result) return WLDAP32_LDAP_NO_RESULTS_RETURNED;
|
|
|
|
ret = ldap_parse_extended_resultW( ld, result, &oidW, data, free );
|
|
|
|
if (oid) {
|
|
*oid = strWtoA( oidW );
|
|
if (!*oid) ret = WLDAP32_LDAP_NO_MEMORY;
|
|
ldap_memfreeW( oidW );
|
|
}
|
|
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_extended_resultW (WLDAP32.@)
|
|
*
|
|
* Parse the result of an extended operation.
|
|
*
|
|
* PARAMS
|
|
* ld [I] Pointer to an LDAP context.
|
|
* result [I] Result message from an extended operation.
|
|
* oid [O] OID of the extended operation.
|
|
* data [O] Result data.
|
|
* free [I] Free the result message?
|
|
*
|
|
* RETURNS
|
|
* Success: LDAP_SUCCESS
|
|
* Failure: An LDAP error code.
|
|
*
|
|
* NOTES
|
|
* Free the OID and result data with ldap_memfree. Pass a nonzero
|
|
* value for 'free' or call ldap_msgfree to free the result message.
|
|
*/
|
|
ULONG CDECL ldap_parse_extended_resultW( WLDAP32_LDAP *ld, WLDAP32_LDAPMessage *result,
|
|
PWCHAR *oid, struct WLDAP32_berval **data, BOOLEAN free )
|
|
{
|
|
ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
char *oidU = NULL;
|
|
|
|
TRACE( "(%p, %p, %p, %p, 0x%02x)\n", ld, result, oid, data, free );
|
|
|
|
if (!ld) return WLDAP32_LDAP_PARAM_ERROR;
|
|
if (!result) return WLDAP32_LDAP_NO_RESULTS_RETURNED;
|
|
|
|
ret = map_error( ldap_parse_extended_result( ld, result, &oidU, (struct berval **)data, free ) );
|
|
|
|
if (oid) {
|
|
*oid = strUtoW( oidU );
|
|
if (!*oid) ret = WLDAP32_LDAP_NO_MEMORY;
|
|
ldap_memfree( oidU );
|
|
}
|
|
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_referenceA (WLDAP32.@)
|
|
*
|
|
* See ldap_parse_referenceW.
|
|
*/
|
|
ULONG CDECL ldap_parse_referenceA( WLDAP32_LDAP *ld, WLDAP32_LDAPMessage *message,
|
|
PCHAR **referrals )
|
|
{
|
|
ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
WCHAR **referralsW = NULL;
|
|
|
|
TRACE( "(%p, %p, %p)\n", ld, message, referrals );
|
|
|
|
if (!ld) return ~0u;
|
|
|
|
ret = ldap_parse_referenceW( ld, message, &referralsW );
|
|
|
|
*referrals = strarrayWtoA( referralsW );
|
|
ldap_value_freeW( referralsW );
|
|
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_referenceW (WLDAP32.@)
|
|
*
|
|
* Return any referrals from a result message.
|
|
*
|
|
* PARAMS
|
|
* ld [I] Pointer to an LDAP context.
|
|
* result [I] Result message.
|
|
* referrals [O] Array of referral URLs.
|
|
*
|
|
* RETURNS
|
|
* Success: LDAP_SUCCESS
|
|
* Failure: An LDAP error code.
|
|
*
|
|
* NOTES
|
|
* Free the referrals with ldap_value_free.
|
|
*/
|
|
ULONG CDECL ldap_parse_referenceW( WLDAP32_LDAP *ld, WLDAP32_LDAPMessage *message,
|
|
PWCHAR **referrals )
|
|
{
|
|
ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP_PARSE_REFERENCE
|
|
char **referralsU = NULL;
|
|
|
|
TRACE( "(%p, %p, %p)\n", ld, message, referrals );
|
|
|
|
if (!ld) return ~0u;
|
|
|
|
ret = map_error( ldap_parse_reference( ld, message, &referralsU, NULL, 0 ));
|
|
|
|
*referrals = strarrayUtoW( referralsU );
|
|
ldap_memfree( referralsU );
|
|
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_resultA (WLDAP32.@)
|
|
*
|
|
* See ldap_parse_resultW.
|
|
*/
|
|
ULONG CDECL ldap_parse_resultA( WLDAP32_LDAP *ld, WLDAP32_LDAPMessage *result,
|
|
ULONG *retcode, PCHAR *matched, PCHAR *error, PCHAR **referrals,
|
|
PLDAPControlA **serverctrls, BOOLEAN free )
|
|
{
|
|
ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
WCHAR *matchedW = NULL, *errorW = NULL, **referralsW = NULL;
|
|
LDAPControlW **serverctrlsW = NULL;
|
|
|
|
TRACE( "(%p, %p, %p, %p, %p, %p, %p, 0x%02x)\n", ld, result, retcode,
|
|
matched, error, referrals, serverctrls, free );
|
|
|
|
if (!ld) return WLDAP32_LDAP_PARAM_ERROR;
|
|
|
|
ret = ldap_parse_resultW( ld, result, retcode, &matchedW, &errorW,
|
|
&referralsW, &serverctrlsW, free );
|
|
|
|
if (matched) *matched = strWtoA( matchedW );
|
|
if (error) *error = strWtoA( errorW );
|
|
|
|
if (referrals) *referrals = strarrayWtoA( referralsW );
|
|
if (serverctrls) *serverctrls = controlarrayWtoA( serverctrlsW );
|
|
|
|
ldap_memfreeW( matchedW );
|
|
ldap_memfreeW( errorW );
|
|
ldap_value_freeW( referralsW );
|
|
ldap_controls_freeW( serverctrlsW );
|
|
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_resultW (WLDAP32.@)
|
|
*
|
|
* Parse a result message.
|
|
*
|
|
* PARAMS
|
|
* ld [I] Pointer to an LDAP context.
|
|
* result [I] Result message.
|
|
* retcode [O] Return code for the server operation.
|
|
* matched [O] DNs matched in the operation.
|
|
* error [O] Error message for the operation.
|
|
* referrals [O] Referrals found in the result message.
|
|
* serverctrls [O] Controls used in the operation.
|
|
* free [I] Free the result message?
|
|
*
|
|
* RETURNS
|
|
* Success: LDAP_SUCCESS
|
|
* Failure: An LDAP error code.
|
|
*
|
|
* NOTES
|
|
* Free the DNs and error message with ldap_memfree. Free
|
|
* the referrals with ldap_value_free and the controls with
|
|
* ldap_controls_free. Pass a nonzero value for 'free' or call
|
|
* ldap_msgfree to free the result message.
|
|
*/
|
|
ULONG CDECL ldap_parse_resultW( WLDAP32_LDAP *ld, WLDAP32_LDAPMessage *result,
|
|
ULONG *retcode, PWCHAR *matched, PWCHAR *error, PWCHAR **referrals,
|
|
PLDAPControlW **serverctrls, BOOLEAN free )
|
|
{
|
|
ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
char *matchedU = NULL, *errorU = NULL, **referralsU = NULL;
|
|
LDAPControl **serverctrlsU = NULL;
|
|
|
|
TRACE( "(%p, %p, %p, %p, %p, %p, %p, 0x%02x)\n", ld, result, retcode,
|
|
matched, error, referrals, serverctrls, free );
|
|
|
|
if (!ld) return WLDAP32_LDAP_PARAM_ERROR;
|
|
|
|
ret = map_error( ldap_parse_result( ld, result, (int *)retcode, &matchedU, &errorU,
|
|
&referralsU, &serverctrlsU, free ));
|
|
|
|
if (matched) *matched = strUtoW( matchedU );
|
|
if (error) *error = strUtoW( errorU );
|
|
|
|
if (referrals) *referrals = strarrayUtoW( referralsU );
|
|
if (serverctrls) *serverctrls = controlarrayUtoW( serverctrlsU );
|
|
|
|
ldap_memfree( matchedU );
|
|
ldap_memfree( errorU );
|
|
strarrayfreeU( referralsU );
|
|
ldap_controls_free( serverctrlsU );
|
|
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_sort_controlA (WLDAP32.@)
|
|
*
|
|
* See ldap_parse_sort_controlW.
|
|
*/
|
|
ULONG CDECL ldap_parse_sort_controlA( WLDAP32_LDAP *ld, PLDAPControlA *control,
|
|
ULONG *result, PCHAR *attr )
|
|
{
|
|
ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
WCHAR *attrW = NULL;
|
|
LDAPControlW **controlW = NULL;
|
|
|
|
TRACE( "(%p, %p, %p, %p)\n", ld, control, result, attr );
|
|
|
|
if (!ld) return WLDAP32_LDAP_PARAM_ERROR;
|
|
if (!control) return WLDAP32_LDAP_CONTROL_NOT_FOUND;
|
|
|
|
controlW = controlarrayAtoW( control );
|
|
if (!controlW) return WLDAP32_LDAP_NO_MEMORY;
|
|
|
|
ret = ldap_parse_sort_controlW( ld, controlW, result, &attrW );
|
|
|
|
*attr = strWtoA( attrW );
|
|
controlarrayfreeW( controlW );
|
|
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_sort_controlW (WLDAP32.@)
|
|
*
|
|
* Parse a sort control.
|
|
*
|
|
* PARAMS
|
|
* ld [I] Pointer to an LDAP context.
|
|
* control [I] Control obtained from a result message.
|
|
* result [O] Result code.
|
|
* attr [O] Failing attribute.
|
|
*
|
|
* RETURNS
|
|
* Success: LDAP_SUCCESS
|
|
* Failure: An LDAP error code.
|
|
*
|
|
* NOTES
|
|
* If the function fails, free the failing attribute with ldap_memfree.
|
|
*/
|
|
ULONG CDECL ldap_parse_sort_controlW( WLDAP32_LDAP *ld, PLDAPControlW *control,
|
|
ULONG *result, PWCHAR *attr )
|
|
{
|
|
ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
char *attrU = NULL;
|
|
LDAPControl **controlU = NULL;
|
|
#ifdef HAVE_LDAP_PARSE_SORT_CONTROL
|
|
unsigned long res;
|
|
#elif defined(HAVE_LDAP_PARSE_SORTRESPONSE_CONTROL)
|
|
ber_int_t res;
|
|
LDAPControl *sortcontrol = NULL;
|
|
unsigned int i;
|
|
#endif
|
|
|
|
TRACE( "(%p, %p, %p, %p)\n", ld, control, result, attr );
|
|
|
|
if (!ld) return WLDAP32_LDAP_PARAM_ERROR;
|
|
if (!control) return WLDAP32_LDAP_CONTROL_NOT_FOUND;
|
|
|
|
controlU = controlarrayWtoU( control );
|
|
if (!controlU) return WLDAP32_LDAP_NO_MEMORY;
|
|
|
|
#ifdef HAVE_LDAP_PARSE_SORT_CONTROL
|
|
if (!(ret = ldap_parse_sort_control( ld, controlU, &res, &attrU )))
|
|
{
|
|
*result = res;
|
|
*attr = strUtoW( attrU );
|
|
}
|
|
#elif defined(HAVE_LDAP_PARSE_SORTRESPONSE_CONTROL)
|
|
for (i = 0; controlU[i]; i++)
|
|
{
|
|
if (!strcmp( LDAP_SERVER_RESP_SORT_OID, controlU[i]->ldctl_oid ))
|
|
sortcontrol = controlU[i];
|
|
}
|
|
if (!sortcontrol)
|
|
{
|
|
controlarrayfreeU( controlU );
|
|
return WLDAP32_LDAP_CONTROL_NOT_FOUND;
|
|
}
|
|
if (!(ret = ldap_parse_sortresponse_control( ld, sortcontrol, &res, &attrU )))
|
|
{
|
|
*result = res;
|
|
*attr = strUtoW( attrU );
|
|
}
|
|
#endif
|
|
controlarrayfreeU( controlU );
|
|
|
|
#endif
|
|
return map_error( ret );
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_vlv_controlA (WLDAP32.@)
|
|
*
|
|
* See ldap_parse_vlv_controlW.
|
|
*/
|
|
INT CDECL ldap_parse_vlv_controlA( WLDAP32_LDAP *ld, PLDAPControlA *control,
|
|
PULONG targetpos, PULONG listcount,
|
|
struct WLDAP32_berval **context, PINT errcode )
|
|
{
|
|
int ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
LDAPControlW **controlW = NULL;
|
|
|
|
TRACE( "(%p, %p, %p, %p, %p, %p)\n", ld, control, targetpos,
|
|
listcount, context, errcode );
|
|
|
|
if (!ld) return ~0u;
|
|
|
|
if (control) {
|
|
controlW = controlarrayAtoW( control );
|
|
if (!controlW) return WLDAP32_LDAP_NO_MEMORY;
|
|
}
|
|
|
|
ret = ldap_parse_vlv_controlW( ld, controlW, targetpos, listcount,
|
|
context, errcode );
|
|
|
|
controlarrayfreeW( controlW );
|
|
|
|
#endif
|
|
return ret;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ldap_parse_vlv_controlW (WLDAP32.@)
|
|
*
|
|
* Parse a virtual list view control.
|
|
*
|
|
* PARAMS
|
|
* ld [I] Pointer to an LDAP context.
|
|
* control [I] Controls obtained from a result message.
|
|
* targetpos [O] Position of the target in the result list.
|
|
* listcount [O] Estimate of the number of results in the list.
|
|
* context [O] Server side context.
|
|
* errcode [O] Error code from the listview operation.
|
|
*
|
|
* RETURNS
|
|
* Success: LDAP_SUCCESS
|
|
* Failure: An LDAP error code.
|
|
*
|
|
* NOTES
|
|
* Free the server context with ber_bvfree.
|
|
*/
|
|
INT CDECL ldap_parse_vlv_controlW( WLDAP32_LDAP *ld, PLDAPControlW *control,
|
|
PULONG targetpos, PULONG listcount,
|
|
struct WLDAP32_berval **context, PINT errcode )
|
|
{
|
|
int ret = WLDAP32_LDAP_NOT_SUPPORTED;
|
|
#ifdef HAVE_LDAP
|
|
LDAPControl **controlU = NULL;
|
|
#ifdef HAVE_LDAP_PARSE_VLV_CONTROL
|
|
unsigned long pos, count;
|
|
#elif defined(HAVE_LDAP_PARSE_VLVRESPONSE_CONTROL)
|
|
ber_int_t pos, count;
|
|
LDAPControl *vlvcontrol = NULL;
|
|
unsigned int i;
|
|
#endif
|
|
|
|
TRACE( "(%p, %p, %p, %p, %p, %p)\n", ld, control, targetpos,
|
|
listcount, context, errcode );
|
|
|
|
if (!ld || !control) return ~0u;
|
|
|
|
controlU = controlarrayWtoU( control );
|
|
if (!controlU) return WLDAP32_LDAP_NO_MEMORY;
|
|
|
|
#ifdef HAVE_LDAP_PARSE_VLV_CONTROL
|
|
if (!(ret = ldap_parse_vlv_control( ld, controlU, &pos, &count,
|
|
(struct berval **)context, errcode )))
|
|
{
|
|
*targetpos = pos;
|
|
*listcount = count;
|
|
}
|
|
#elif defined(HAVE_LDAP_PARSE_VLVRESPONSE_CONTROL)
|
|
for (i = 0; controlU[i]; i++)
|
|
{
|
|
if (!strcmp( LDAP_CONTROL_VLVRESPONSE, controlU[i]->ldctl_oid ))
|
|
vlvcontrol = controlU[i];
|
|
}
|
|
if (!vlvcontrol)
|
|
{
|
|
controlarrayfreeU( controlU );
|
|
return WLDAP32_LDAP_CONTROL_NOT_FOUND;
|
|
}
|
|
if (!(ret = ldap_parse_vlvresponse_control( ld, vlvcontrol, &pos, &count,
|
|
(struct berval **)context, errcode )))
|
|
{
|
|
*targetpos = pos;
|
|
*listcount = count;
|
|
}
|
|
#endif
|
|
controlarrayfreeU( controlU );
|
|
|
|
#endif
|
|
return map_error( ret );
|
|
}
|