dlls/wldap32/control.c

   1 /*
   2  * WLDAP32 - LDAP support for Wine
   3  *
   4  * Copyright 2005 Hans Leidekker
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22 #include "wine/port.h"
  23
  24 #include <stdarg.h>
  25 #ifdef HAVE_LDAP_H
  26 #include <ldap.h>
  27 #endif
  28
  29 #include "windef.h"
  30 #include "winbase.h"
  31 #include "winnls.h"
  32
  33 #include "winldap_private.h"
  34 #include "wldap32.h"
  35 #include "wine/debug.h"
  36
  37 #ifdef HAVE_LDAP
  38 WINE_DEFAULT_DEBUG_CHANNEL(wldap32);
  39 #endif
  40
  41 /***********************************************************************
  42  *      ldap_control_freeA     (WLDAP32.@)
  43  *
  44  * See ldap_control_freeW.
  45  */
  46 ULONG CDECL ldap_control_freeA( LDAPControlA *control )
  47 {
  48     ULONG ret = WLDAP32_LDAP_SUCCESS;
  49 #ifdef HAVE_LDAP
  50
  51     TRACE( "(%p)\n", control );
  52     controlfreeA( control );
  53
  54 #endif
  55     return ret;
  56 }
  57
  58 /***********************************************************************
  59  *      ldap_control_freeW     (WLDAP32.@)
  60  *
  61  * Free an LDAPControl structure.
  62  *
  63  * PARAMS
  64  *  control  [I] LDAPControl structure to free.
  65  *
  66  * RETURNS
  67  *  LDAP_SUCCESS
  68  */
  69 ULONG CDECL ldap_control_freeW( LDAPControlW *control )
  70 {
  71     ULONG ret = WLDAP32_LDAP_SUCCESS;
  72 #ifdef HAVE_LDAP
  73
  74     TRACE( "(%p)\n", control );
  75     controlfreeW( control );
  76
  77 #endif
  78     return ret;
  79 }
  80
  81 /***********************************************************************
  82  *      ldap_controls_freeA     (WLDAP32.@)
  83  *
  84  * See ldap_controls_freeW.
  85  */
  86 ULONG CDECL ldap_controls_freeA( LDAPControlA **controls )
  87 {
  88     ULONG ret = WLDAP32_LDAP_SUCCESS;
  89 #ifdef HAVE_LDAP
  90
  91     TRACE( "(%p)\n", controls );
  92     controlarrayfreeA( controls );
  93
  94 #endif
  95     return ret;
  96 }
  97
  98 /***********************************************************************
  99  *      ldap_controls_freeW     (WLDAP32.@)
 100  *
 101  * Free an array of LDAPControl structures.
 102  *
 103  * PARAMS
 104  *  controls  [I] Array of LDAPControl structures to free.
 105  *
 106  * RETURNS
 107  *  LDAP_SUCCESS
 108  */
 109 ULONG CDECL ldap_controls_freeW( LDAPControlW **controls )
 110 {
 111     ULONG ret = WLDAP32_LDAP_SUCCESS;
 112 #ifdef HAVE_LDAP
 113
 114     TRACE( "(%p)\n", controls );
 115     controlarrayfreeW( controls );
 116
 117 #endif
 118     return ret;
 119 }
 120
 121 /***********************************************************************
 122  *      ldap_create_sort_controlA     (WLDAP32.@)
 123  *
 124  * See ldap_create_sort_controlW.
 125  */
 126 ULONG CDECL ldap_create_sort_controlA( WLDAP32_LDAP *ld, PLDAPSortKeyA *sortkey,
 127     UCHAR critical, PLDAPControlA *control )
 128 {
 129     ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
 130 #ifdef HAVE_LDAP
 131     LDAPSortKeyW **sortkeyW = NULL;
 132     LDAPControlW *controlW = NULL;
 133
 134     TRACE( "(%p, %p, 0x%02x, %p)\n", ld, sortkey, critical, control );
 135
 136     if (!ld || !sortkey || !control)
 137         return WLDAP32_LDAP_PARAM_ERROR;
 138
 139     sortkeyW = sortkeyarrayAtoW( sortkey );
 140     if (!sortkeyW) return WLDAP32_LDAP_NO_MEMORY;
 141
 142     ret = ldap_create_sort_controlW( ld, sortkeyW, critical, &controlW );
 143
 144     *control = controlWtoA( controlW );
 145     if (!*control) ret = WLDAP32_LDAP_NO_MEMORY;
 146
 147     ldap_control_freeW( controlW );
 148     sortkeyarrayfreeW( sortkeyW );
 149
 150 #endif
 151     return ret;
 152 }
 153
 154 /***********************************************************************
 155  *      ldap_create_sort_controlW     (WLDAP32.@)
 156  *
 157  * Create a control for server sorted search results.
 158  *
 159  * PARAMS
 160  *  ld       [I] Pointer to an LDAP context.
 161  *  sortkey  [I] Array of LDAPSortKey structures, each specifying an
 162  *               attribute to use as a sort key, a matching rule and
 163  *               the sort order (ascending or descending).
 164  *  critical [I] Tells the server this control is critical to the
 165  *               search operation.
 166  *  control  [O] LDAPControl created.
 167  *
 168  * RETURNS
 169  *  Success: LDAP_SUCCESS
 170  *  Failure: An LDAP error code.
 171  *
 172  * NOTES
 173  *  Pass the created control as a server control in subsequent calls
 174  *  to ldap_search_ext(_s) to obtain sorted search results.
 175  */
 176 ULONG CDECL ldap_create_sort_controlW( WLDAP32_LDAP *ld, PLDAPSortKeyW *sortkey,
 177     UCHAR critical, PLDAPControlW *control )
 178 {
 179     ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
 180 #ifdef HAVE_LDAP
 181     LDAPSortKey **sortkeyU = NULL;
 182     LDAPControl *controlU = NULL;
 183
 184     TRACE( "(%p, %p, 0x%02x, %p)\n", ld, sortkey, critical, control );
 185
 186     if (!ld || !sortkey || !control)
 187         return WLDAP32_LDAP_PARAM_ERROR;
 188
 189     sortkeyU = sortkeyarrayWtoU( sortkey );
 190     if (!sortkeyU) return WLDAP32_LDAP_NO_MEMORY;
 191
 192     ret = map_error( ldap_create_sort_control( ld->ld, sortkeyU, critical, &controlU ));
 193
 194     *control = controlUtoW( controlU );
 195     if (!*control) ret = WLDAP32_LDAP_NO_MEMORY;
 196
 197     ldap_control_free( controlU );
 198     sortkeyarrayfreeU( sortkeyU );
 199
 200 #endif
 201     return ret;
 202 }
 203
 204 /***********************************************************************
 205  *      ldap_create_vlv_controlA     (WLDAP32.@)
 206  *
 207  * See ldap_create_vlv_controlW.
 208  */
 209 INT CDECL ldap_create_vlv_controlA( WLDAP32_LDAP *ld, WLDAP32_LDAPVLVInfo *info,
 210     UCHAR critical, LDAPControlA **control )
 211 {
 212     INT ret = WLDAP32_LDAP_NOT_SUPPORTED;
 213 #ifdef HAVE_LDAP
 214     LDAPControlW *controlW = NULL;
 215
 216     TRACE( "(%p, %p, 0x%02x, %p)\n", ld, info, critical, control );
 217
 218     if (!ld || !control) return ~0u;
 219
 220     ret = ldap_create_vlv_controlW( ld, info, critical, &controlW );
 221
 222     if (ret == WLDAP32_LDAP_SUCCESS)
 223     {
 224         *control = controlWtoA( controlW );
 225         if (!*control) ret = WLDAP32_LDAP_NO_MEMORY;
 226         ldap_control_freeW( controlW );
 227     }
 228
 229 #endif
 230     return ret;
 231 }
 232
 233 /***********************************************************************
 234  *      ldap_create_vlv_controlW     (WLDAP32.@)
 235  *
 236  * Create a virtual list view control.
 237  *
 238  * PARAMS
 239  *  ld       [I] Pointer to an LDAP context.
 240  *  info     [I] LDAPVLVInfo structure specifying a list view window.
 241  *  critical [I] Tells the server this control is critical to the
 242  *               search operation.
 243  *  control  [O] LDAPControl created.
 244  *
 245  * RETURNS
 246  *  Success: LDAP_SUCCESS
 247  *  Failure: An LDAP error code.
 248  *
 249  * NOTES
 250  *  Pass the created control in conjunction with a sort control as
 251  *  server controls in subsequent calls to ldap_search_ext(_s). The
 252  *  server will then return a sorted, contiguous subset of results
 253  *  that meets the criteria specified in the LDAPVLVInfo structure.
 254  */
 255 INT CDECL ldap_create_vlv_controlW( WLDAP32_LDAP *ld, WLDAP32_LDAPVLVInfo *info,
 256     UCHAR critical, LDAPControlW **control )
 257 {
 258     INT ret = WLDAP32_LDAP_NOT_SUPPORTED;
 259 #ifdef HAVE_LDAP
 260     LDAPControl *controlU = NULL;
 261
 262     TRACE( "(%p, %p, 0x%02x, %p)\n", ld, info, critical, control );
 263
 264     if (!ld || !control) return ~0u;
 265
 266     ret = map_error( ldap_create_vlv_control( ld->ld, (LDAPVLVInfo *)info, &controlU ));
 267
 268     if (ret == WLDAP32_LDAP_SUCCESS)
 269     {
 270         *control = controlUtoW( controlU );
 271         if (!*control) ret = WLDAP32_LDAP_NO_MEMORY;
 272         ldap_control_free( controlU );
 273     }
 274
 275 #endif
 276     return ret;
 277 }
 278
 279 static inline void bv_val_dup( const struct WLDAP32_berval *src, struct WLDAP32_berval *dst )
 280 {
 281     if ((dst->bv_val = heap_alloc( src->bv_len )))
 282     {
 283         memcpy( dst->bv_val, src->bv_val, src->bv_len );
 284         dst->bv_len = src->bv_len;
 285     }
 286     else
 287         dst->bv_len = 0;
 288 }
 289
 290 /***********************************************************************
 291  *      ldap_encode_sort_controlA     (WLDAP32.@)
 292  *
 293  * See ldap_encode_sort_controlW.
 294  */
 295 ULONG CDECL ldap_encode_sort_controlA( WLDAP32_LDAP *ld, PLDAPSortKeyA *sortkeys,
 296     PLDAPControlA ret, BOOLEAN critical )
 297 {
 298     LDAPControlA *control;
 299     ULONG result;
 300
 301     if ((result = ldap_create_sort_controlA( ld, sortkeys, critical, &control )) == WLDAP32_LDAP_SUCCESS)
 302     {
 303         ret->ldctl_oid = strdupU(control->ldctl_oid);
 304         bv_val_dup( &control->ldctl_value, &ret->ldctl_value );
 305         ret->ldctl_iscritical = control->ldctl_iscritical;
 306         ldap_control_freeA( control );
 307     }
 308     return result;
 309 }
 310
 311 /***********************************************************************
 312  *      ldap_encode_sort_controlW     (WLDAP32.@)
 313  *
 314  * Create a control for server sorted search results.
 315  *
 316  * PARAMS
 317  *  ld       [I] Pointer to an LDAP context.
 318  *  sortkey  [I] Array of LDAPSortKey structures, each specifying an
 319  *               attribute to use as a sort key, a matching rule and
 320  *               the sort order (ascending or descending).
 321  *  critical [I] Tells the server this control is critical to the
 322  *               search operation.
 323  *  control  [O] LDAPControl created.
 324  *
 325  * RETURNS
 326  *  Success: LDAP_SUCCESS
 327  *  Failure: An LDAP error code.
 328  *
 329  * NOTES
 330  *  This function is obsolete. Use its equivalent
 331  *  ldap_create_sort_control instead.
 332  */
 333 ULONG CDECL ldap_encode_sort_controlW( WLDAP32_LDAP *ld, PLDAPSortKeyW *sortkeys,
 334     PLDAPControlW ret, BOOLEAN critical )
 335 {
 336     LDAPControlW *control;
 337     ULONG result;
 338
 339     if ((result = ldap_create_sort_controlW( ld, sortkeys, critical, &control )) == WLDAP32_LDAP_SUCCESS)
 340     {
 341         ret->ldctl_oid = strdupW(control->ldctl_oid);
 342         bv_val_dup( &control->ldctl_value, &ret->ldctl_value );
 343         ret->ldctl_iscritical = control->ldctl_iscritical;
 344         ldap_control_freeW( control );
 345     }
 346     return result;
 347 }
 348
 349 /***********************************************************************
 350  *      ldap_free_controlsA     (WLDAP32.@)
 351  *
 352  * See ldap_free_controlsW.
 353  */
 354 ULONG CDECL ldap_free_controlsA( LDAPControlA **controls )
 355 {
 356     return ldap_controls_freeA( controls );
 357 }
 358
 359 /***********************************************************************
 360  *      ldap_free_controlsW     (WLDAP32.@)
 361  *
 362  * Free an array of LDAPControl structures.
 363  *
 364  * PARAMS
 365  *  controls  [I] Array of LDAPControl structures to free.
 366  *
 367  * RETURNS
 368  *  LDAP_SUCCESS
 369  *
 370  * NOTES
 371  *  Obsolete, use ldap_controls_freeW.
 372  */
 373 ULONG CDECL ldap_free_controlsW( LDAPControlW **controls )
 374 {
 375     return ldap_controls_freeW( controls );
 376 }