git.sur5r.net Git - openldap/blob - libraries/libldap/references.c

   1 /* $OpenLDAP$ */
   2 /*
   3  * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
   4  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   5  */
   6 /*
   7  *  references.c
   8  */
   9
  10 #include "portable.h"
  11
  12 #include <stdio.h>
  13
  14 #include <ac/stdlib.h>
  15
  16 #include <ac/socket.h>
  17 #include <ac/string.h>
  18 #include <ac/time.h>
  19
  20 #include "ldap-int.h"
  21
  22 LDAPMessage *
  23 ldap_first_reference( LDAP *ld, LDAPMessage *chain )
  24 {
  25         assert( ld != NULL );
  26         assert( LDAP_VALID( ld ) );
  27         assert( chain != NULL );
  28
  29         return chain->lm_msgtype == LDAP_RES_SEARCH_REFERENCE
  30                 ? chain
  31                 : ldap_next_reference( ld, chain );
  32 }
  33
  34 LDAPMessage *
  35 ldap_next_reference( LDAP *ld, LDAPMessage *ref )
  36 {
  37         assert( ld != NULL );
  38         assert( LDAP_VALID( ld ) );
  39         assert( ref != NULL );
  40
  41         for (
  42                 ref = ref->lm_chain;
  43                 ref != NULL;
  44                 ref = ref->lm_chain )
  45         {
  46                 if( ref->lm_msgtype == LDAP_RES_SEARCH_REFERENCE ) {
  47                         return( ref );
  48                 }
  49         }
  50
  51         return( NULL );
  52 }
  53
  54 int
  55 ldap_count_references( LDAP *ld, LDAPMessage *chain )
  56 {
  57         int     i;
  58
  59         assert( ld != NULL );
  60         assert( LDAP_VALID( ld ) );
  61
  62         for ( i = 0; chain != NULL; chain = chain->lm_chain ) {
  63                 if( chain->lm_msgtype == LDAP_RES_SEARCH_REFERENCE ) {
  64                         i++;
  65                 }
  66         }
  67
  68         return( i );
  69 }
  70
  71 int
  72 ldap_parse_reference(
  73         LDAP            *ld,
  74         LDAPMessage     *ref,
  75         char            ***referralsp,
  76         LDAPControl     ***serverctrls,
  77         int             freeit)
  78 {
  79         BerElement be;
  80         char **refs = NULL;
  81         int rc;
  82
  83         assert( ld != NULL );
  84         assert( LDAP_VALID( ld ) );
  85         assert( ref !=  NULL );
  86
  87         if( ref->lm_msgtype != LDAP_RES_SEARCH_REFERENCE ) {
  88                 return LDAP_PARAM_ERROR;
  89         }
  90
  91         /* make a private copy of BerElement */
  92         AC_MEMCPY(&be, ref->lm_ber, sizeof(be));
  93
  94         if ( ber_scanf( &be, "{v" /*}*/, &refs ) == LBER_ERROR ) {
  95                 rc = LDAP_DECODING_ERROR;
  96                 goto free_and_return;
  97         }
  98
  99         if ( serverctrls == NULL ) {
 100                 rc = LDAP_SUCCESS;
 101                 goto free_and_return;
 102         }
 103
 104         if ( ber_scanf( &be, /*{*/ "}" ) == LBER_ERROR ) {
 105                 rc = LDAP_DECODING_ERROR;
 106                 goto free_and_return;
 107         }
 108
 109         rc = ldap_int_get_controls( &be, serverctrls );
 110
 111 free_and_return:
 112
 113         if( referralsp != NULL ) {
 114                 /* provide references regradless of return code */
 115                 *referralsp = refs;
 116
 117         } else {
 118                 LDAP_VFREE( refs );
 119         }
 120
 121         if( freeit ) {
 122                 ldap_msgfree( ref );
 123         }
 124
 125         if( rc != LDAP_SUCCESS ) {
 126                 ld->ld_errno = rc;
 127
 128                 if( ld->ld_matched != NULL ) {
 129                         LDAP_FREE( ld->ld_matched );
 130                         ld->ld_matched = NULL;
 131                 }
 132
 133                 if( ld->ld_error != NULL ) {
 134                         LDAP_FREE( ld->ld_error );
 135                         ld->ld_error = NULL;
 136                 }
 137         }
 138
 139         return rc;
 140 }