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

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