]> git.sur5r.net Git - openldap/blob - libraries/libldap/references.c
updates from HEAD
[openldap] / 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         assert( chain !=  NULL );
62
63         if ( ld == NULL ) {
64                 return -1;
65         }
66
67         
68         for ( i = 0; chain != NULL; chain = chain->lm_chain ) {
69                 if( chain->lm_msgtype == LDAP_RES_SEARCH_REFERENCE ) {
70                         i++;
71                 }
72         }
73
74         return( i );
75 }
76
77 int
78 ldap_parse_reference( 
79         LDAP            *ld,    
80         LDAPMessage     *ref,
81         char            ***referralsp,
82         LDAPControl     ***serverctrls,
83         int             freeit)
84 {
85         BerElement be;
86         char **refs = NULL;
87         int rc;
88
89         assert( ld != NULL );
90         assert( LDAP_VALID( ld ) );
91         assert( ref !=  NULL );
92
93         if( ref->lm_msgtype != LDAP_RES_SEARCH_REFERENCE ) {
94                 return LDAP_PARAM_ERROR;
95         }
96
97         /* make a private copy of BerElement */
98         AC_MEMCPY(&be, ref->lm_ber, sizeof(be));
99         
100         if ( ber_scanf( &be, "{v" /*}*/, &refs ) == LBER_ERROR ) {
101                 rc = LDAP_DECODING_ERROR;
102                 goto free_and_return;
103         }
104
105         if ( serverctrls == NULL ) {
106                 rc = LDAP_SUCCESS;
107                 goto free_and_return;
108         }
109
110         if ( ber_scanf( &be, /*{*/ "}" ) == LBER_ERROR ) {
111                 rc = LDAP_DECODING_ERROR;
112                 goto free_and_return;
113         }
114
115         rc = ldap_int_get_controls( &be, serverctrls );
116
117 free_and_return:
118
119         if( referralsp != NULL ) {
120                 /* provide references regradless of return code */
121                 *referralsp = refs;
122
123         } else {
124                 LDAP_VFREE( refs );
125         }
126
127         if( freeit ) {
128                 ldap_msgfree( ref );
129         }
130
131         if( rc != LDAP_SUCCESS ) {
132                 ld->ld_errno = rc;
133
134                 if( ld->ld_matched != NULL ) {
135                         LDAP_FREE( ld->ld_matched );
136                         ld->ld_matched = NULL;
137                 }
138
139                 if( ld->ld_error != NULL ) {
140                         LDAP_FREE( ld->ld_error );
141                         ld->ld_error = NULL;
142                 }
143         }
144
145         return rc;
146 }