3 * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
4 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
8 * LDAPv3 Extended Operation Request
9 * ExtendedRequest ::= [APPLICATION 23] SEQUENCE {
10 * requestName [0] LDAPOID,
11 * requestValue [1] OCTET STRING OPTIONAL
14 * LDAPv3 Extended Operation Response
15 * ExtendedResponse ::= [APPLICATION 24] SEQUENCE {
16 * COMPONENTS OF LDAPResult,
17 * responseName [10] LDAPOID OPTIONAL,
18 * response [11] OCTET STRING OPTIONAL
26 #include <ac/stdlib.h>
28 #include <ac/socket.h>
29 #include <ac/string.h>
36 ldap_extended_operation(
38 LDAP_CONST char *reqoid,
39 struct berval *reqdata,
48 LDAP_LOG ( OPERATION, ENTRY, "ldap_extended_operation\n", 0,0,0 );
50 Debug( LDAP_DEBUG_TRACE, "ldap_extended_operation\n", 0, 0, 0 );
54 assert( LDAP_VALID( ld ) );
55 assert( reqoid != NULL || *reqoid == '\0' );
56 assert( msgidp != NULL );
58 /* must be version 3 (or greater) */
59 if ( ld->ld_version < LDAP_VERSION3 ) {
60 ld->ld_errno = LDAP_NOT_SUPPORTED;
61 return( ld->ld_errno );
64 /* create a message to send */
65 if ( (ber = ldap_alloc_ber_with_options( ld )) == NULL ) {
66 ld->ld_errno = LDAP_NO_MEMORY;
67 return( ld->ld_errno );
70 if ( reqdata != NULL ) {
71 rc = ber_printf( ber, "{it{tstON}", /* '}' */
72 ++ld->ld_msgid, LDAP_REQ_EXTENDED,
73 LDAP_TAG_EXOP_REQ_OID, reqoid,
74 LDAP_TAG_EXOP_REQ_VALUE, reqdata );
77 rc = ber_printf( ber, "{it{tsN}", /* '}' */
78 ++ld->ld_msgid, LDAP_REQ_EXTENDED,
79 LDAP_TAG_EXOP_REQ_OID, reqoid );
83 ld->ld_errno = LDAP_ENCODING_ERROR;
85 return( ld->ld_errno );
88 /* Put Server Controls */
89 if( ldap_int_put_controls( ld, sctrls, ber ) != LDAP_SUCCESS ) {
94 if ( ber_printf( ber, /*{*/ "N}" ) == -1 ) {
95 ld->ld_errno = LDAP_ENCODING_ERROR;
97 return( ld->ld_errno );
100 /* send the message */
101 *msgidp = ldap_send_initial_request( ld, LDAP_REQ_EXTENDED, NULL, ber );
103 return( *msgidp < 0 ? ld->ld_errno : LDAP_SUCCESS );
107 ldap_extended_operation_s(
109 LDAP_CONST char *reqoid,
110 struct berval *reqdata,
111 LDAPControl **sctrls,
112 LDAPControl **cctrls,
114 struct berval **retdatap )
121 LDAP_LOG ( OPERATION, ENTRY, "ldap_extended_operation_s\n", 0,0,0 );
123 Debug( LDAP_DEBUG_TRACE, "ldap_extended_operation_s\n", 0, 0, 0 );
126 assert( ld != NULL );
127 assert( LDAP_VALID( ld ) );
128 assert( reqoid != NULL || *reqoid == '\0' );
129 assert( retoidp != NULL || retdatap != NULL );
131 rc = ldap_extended_operation( ld, reqoid, reqdata,
132 sctrls, cctrls, &msgid );
134 if ( rc != LDAP_SUCCESS ) {
138 if ( ldap_result( ld, msgid, 1, (struct timeval *) NULL, &res ) == -1 ) {
139 return( ld->ld_errno );
142 if ( retoidp != NULL ) *retoidp = NULL;
143 if ( retdatap != NULL ) *retdatap = NULL;
145 rc = ldap_parse_extended_result( ld, res, retoidp, retdatap, 0 );
147 if( rc != LDAP_SUCCESS ) {
152 return( ldap_result2error( ld, res, 1 ) );
155 /* Parse an extended result */
157 ldap_parse_extended_result (
161 struct berval **retdatap,
168 struct berval *resdata;
172 assert( ld != NULL );
173 assert( LDAP_VALID( ld ) );
174 assert( res != NULL );
177 LDAP_LOG ( OPERATION, ENTRY, "ldap_parse_extended_result\n", 0,0,0 );
179 Debug( LDAP_DEBUG_TRACE, "ldap_parse_extended_result\n", 0, 0, 0 );
182 if( ld->ld_version < LDAP_VERSION3 ) {
183 ld->ld_errno = LDAP_NOT_SUPPORTED;
187 if( res->lm_msgtype != LDAP_RES_EXTENDED ) {
188 ld->ld_errno = LDAP_PARAM_ERROR;
192 if( retoidp != NULL ) *retoidp = NULL;
193 if( retdatap != NULL ) *retdatap = NULL;
195 if ( ld->ld_error ) {
196 LDAP_FREE( ld->ld_error );
200 if ( ld->ld_matched ) {
201 LDAP_FREE( ld->ld_matched );
202 ld->ld_matched = NULL;
205 ber = ber_dup( res->lm_ber );
208 ld->ld_errno = LDAP_NO_MEMORY;
212 rc = ber_scanf( ber, "{iaa" /*}*/, &errcode,
213 &ld->ld_matched, &ld->ld_error );
215 if( rc == LBER_ERROR ) {
216 ld->ld_errno = LDAP_DECODING_ERROR;
224 tag = ber_peek_tag( ber, &len );
226 if( tag == LDAP_TAG_REFERRAL ) {
227 /* skip over referral */
228 if( ber_scanf( ber, "x" ) == LBER_ERROR ) {
229 ld->ld_errno = LDAP_DECODING_ERROR;
234 tag = ber_peek_tag( ber, &len );
237 if( tag == LDAP_TAG_EXOP_RES_OID ) {
238 /* we have a resoid */
239 if( ber_scanf( ber, "a", &resoid ) == LBER_ERROR ) {
240 ld->ld_errno = LDAP_DECODING_ERROR;
245 tag = ber_peek_tag( ber, &len );
248 if( tag == LDAP_TAG_EXOP_RES_VALUE ) {
249 /* we have a resdata */
250 if( ber_scanf( ber, "O", &resdata ) == LBER_ERROR ) {
251 ld->ld_errno = LDAP_DECODING_ERROR;
253 if( resoid != NULL ) LDAP_FREE( resoid );
260 if( retoidp != NULL ) {
266 if( retdatap != NULL ) {
269 ber_bvfree( resdata );
272 ld->ld_errno = errcode;
282 /* Parse an extended partial */
284 ldap_parse_extended_partial (
288 struct berval **retdatap,
289 LDAPControl ***serverctrls,
296 struct berval *resdata;
299 assert( ld != NULL );
300 assert( LDAP_VALID( ld ) );
301 assert( res != NULL );
304 LDAP_LOG ( OPERATION, ENTRY, "ldap_parse_extended_partial\n", 0,0,0 );
306 Debug( LDAP_DEBUG_TRACE, "ldap_parse_extended_partial\n", 0, 0, 0 );
309 if( ld->ld_version < LDAP_VERSION3 ) {
310 ld->ld_errno = LDAP_NOT_SUPPORTED;
314 if( res->lm_msgtype != LDAP_RES_EXTENDED_PARTIAL ) {
315 ld->ld_errno = LDAP_PARAM_ERROR;
319 if( retoidp != NULL ) *retoidp = NULL;
320 if( retdatap != NULL ) *retdatap = NULL;
322 ber = ber_dup( res->lm_ber );
325 ld->ld_errno = LDAP_NO_MEMORY;
329 rc = ber_scanf( ber, "{" /*}*/ );
331 if( rc == LBER_ERROR ) {
332 ld->ld_errno = LDAP_DECODING_ERROR;
340 tag = ber_peek_tag( ber, &len );
342 if( tag == LDAP_TAG_EXOP_RES_OID ) {
343 /* we have a resoid */
344 if( ber_scanf( ber, "a", &resoid ) == LBER_ERROR ) {
345 ld->ld_errno = LDAP_DECODING_ERROR;
350 tag = ber_peek_tag( ber, &len );
353 if( tag == LDAP_TAG_EXOP_RES_VALUE ) {
354 /* we have a resdata */
355 if( ber_scanf( ber, "O", &resdata ) == LBER_ERROR ) {
356 ld->ld_errno = LDAP_DECODING_ERROR;
358 if( resoid != NULL ) LDAP_FREE( resoid );
363 if ( serverctrls == NULL ) {
365 goto free_and_return;
368 if ( ber_scanf( ber, /*{*/ "}" ) == LBER_ERROR ) {
369 rc = LDAP_DECODING_ERROR;
370 goto free_and_return;
373 rc = ldap_int_get_controls( ber, serverctrls );
378 if( retoidp != NULL ) {
384 if( retdatap != NULL ) {
387 ber_bvfree( resdata );