]> git.sur5r.net Git - openldap/blobdiff - libraries/libldap/extended.c
Merge remote branch 'origin/mdb.master' into OPENLDAP_REL_ENG_2_4
[openldap] / libraries / libldap / extended.c
index c9c27be37d2a1542975ef86269bce669924599e1..8fb57701f50c5f538a464a7af655ad730709870b 100644 (file)
@@ -1,9 +1,30 @@
 /* $OpenLDAP$ */
-/*
- * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
- * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
+/* This work is part of OpenLDAP Software <http://www.openldap.org/>.
+ *
+ * Copyright 1998-2012 The OpenLDAP Foundation.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted only as authorized by the OpenLDAP
+ * Public License.
+ *
+ * A copy of this license is available in the file LICENSE in the
+ * top-level directory of the distribution or, alternatively, at
+ * <http://www.OpenLDAP.org/license.html>.
  */
 
+#include "portable.h"
+
+#include <stdio.h>
+#include <ac/stdlib.h>
+
+#include <ac/socket.h>
+#include <ac/string.h>
+#include <ac/time.h>
+
+#include "ldap-int.h"
+#include "ldap_log.h"
+
 /*
  * LDAPv3 Extended Operation Request
  *     ExtendedRequest ::= [APPLICATION 23] SEQUENCE {
  *             response         [11] OCTET STRING OPTIONAL
  *     }
  *
+ * (Source RFC 4511)
  */
 
-#include "portable.h"
-
-#include <stdio.h>
-#include <ac/stdlib.h>
-
-#include <ac/socket.h>
-#include <ac/string.h>
-#include <ac/time.h>
-
-#include "ldap-int.h"
-#include "ldap_log.h"
-
 int
 ldap_extended_operation(
        LDAP                    *ld,
@@ -43,16 +53,13 @@ ldap_extended_operation(
 {
        BerElement *ber;
        int rc;
+       ber_int_t id;
 
-#ifdef NEW_LOGGING
-       LDAP_LOG ( OPERATION, ENTRY, "ldap_extended_operation\n", 0,0,0 );
-#else
        Debug( LDAP_DEBUG_TRACE, "ldap_extended_operation\n", 0, 0, 0 );
-#endif
 
        assert( ld != NULL );
        assert( LDAP_VALID( ld ) );
-       assert( reqoid != NULL || *reqoid == '\0' );
+       assert( reqoid != NULL && *reqoid != '\0' );
        assert( msgidp != NULL );
 
        /* must be version 3 (or greater) */
@@ -67,15 +74,16 @@ ldap_extended_operation(
                return( ld->ld_errno );
        }
 
+       LDAP_NEXT_MSGID( ld, id );
        if ( reqdata != NULL ) {
                rc = ber_printf( ber, "{it{tstON}", /* '}' */
-                       ++ld->ld_msgid, LDAP_REQ_EXTENDED,
+                       id, LDAP_REQ_EXTENDED,
                        LDAP_TAG_EXOP_REQ_OID, reqoid,
                        LDAP_TAG_EXOP_REQ_VALUE, reqdata );
 
        } else {
                rc = ber_printf( ber, "{it{tsN}", /* '}' */
-                       ++ld->ld_msgid, LDAP_REQ_EXTENDED,
+                       id, LDAP_REQ_EXTENDED,
                        LDAP_TAG_EXOP_REQ_OID, reqoid );
        }
 
@@ -98,7 +106,7 @@ ldap_extended_operation(
        }
 
        /* send the message */
-       *msgidp = ldap_send_initial_request( ld, LDAP_REQ_EXTENDED, NULL, ber );
+       *msgidp = ldap_send_initial_request( ld, LDAP_REQ_EXTENDED, NULL, ber, id );
 
        return( *msgidp < 0 ? ld->ld_errno : LDAP_SUCCESS );
 }
@@ -117,16 +125,11 @@ ldap_extended_operation_s(
     int     msgid;
     LDAPMessage *res;
 
-#ifdef NEW_LOGGING
-       LDAP_LOG ( OPERATION, ENTRY, "ldap_extended_operation_s\n", 0,0,0 );
-#else
        Debug( LDAP_DEBUG_TRACE, "ldap_extended_operation_s\n", 0, 0, 0 );
-#endif
 
        assert( ld != NULL );
        assert( LDAP_VALID( ld ) );
-       assert( reqoid != NULL || *reqoid == '\0' );
-       assert( retoidp != NULL || retdatap != NULL );
+       assert( reqoid != NULL && *reqoid != '\0' );
 
     rc = ldap_extended_operation( ld, reqoid, reqdata,
                sctrls, cctrls, &msgid );
@@ -135,7 +138,7 @@ ldap_extended_operation_s(
         return( rc );
        }
  
-    if ( ldap_result( ld, msgid, 1, (struct timeval *) NULL, &res ) == -1 ) {
+    if ( ldap_result( ld, msgid, LDAP_MSG_ALL, (struct timeval *) NULL, &res ) == -1 || !res ) {
         return( ld->ld_errno );
        }
 
@@ -173,11 +176,7 @@ ldap_parse_extended_result (
        assert( LDAP_VALID( ld ) );
        assert( res != NULL );
 
-#ifdef NEW_LOGGING
-       LDAP_LOG ( OPERATION, ENTRY, "ldap_parse_extended_result\n", 0,0,0 );
-#else
        Debug( LDAP_DEBUG_TRACE, "ldap_parse_extended_result\n", 0, 0, 0 );
-#endif
 
        if( ld->ld_version < LDAP_VERSION3 ) {
                ld->ld_errno = LDAP_NOT_SUPPORTED;
@@ -209,7 +208,7 @@ ldap_parse_extended_result (
                return ld->ld_errno;
        }
 
-       rc = ber_scanf( ber, "{iaa" /*}*/, &errcode,
+       rc = ber_scanf( ber, "{eAA" /*}*/, &errcode,
                &ld->ld_matched, &ld->ld_error );
 
        if( rc == LBER_ERROR ) {
@@ -242,6 +241,8 @@ ldap_parse_extended_result (
                        return ld->ld_errno;
                }
 
+               assert( resoid[ 0 ] != '\0' );
+
                tag = ber_peek_tag( ber, &len );
        }
 
@@ -281,7 +282,7 @@ ldap_parse_extended_result (
 
 /* Parse an extended partial */
 int
-ldap_parse_extended_partial (
+ldap_parse_intermediate (
        LDAP                    *ld,
        LDAPMessage             *res,
        char                    **retoidp,
@@ -290,7 +291,6 @@ ldap_parse_extended_partial (
        int                             freeit )
 {
        BerElement *ber;
-       ber_tag_t rc;
        ber_tag_t tag;
        ber_len_t len;
        struct berval *resdata;
@@ -300,24 +300,21 @@ ldap_parse_extended_partial (
        assert( LDAP_VALID( ld ) );
        assert( res != NULL );
 
-#ifdef NEW_LOGGING
-       LDAP_LOG ( OPERATION, ENTRY, "ldap_parse_extended_partial\n", 0,0,0 );
-#else
-       Debug( LDAP_DEBUG_TRACE, "ldap_parse_extended_partial\n", 0, 0, 0 );
-#endif
+       Debug( LDAP_DEBUG_TRACE, "ldap_parse_intermediate\n", 0, 0, 0 );
 
        if( ld->ld_version < LDAP_VERSION3 ) {
                ld->ld_errno = LDAP_NOT_SUPPORTED;
                return ld->ld_errno;
        }
 
-       if( res->lm_msgtype != LDAP_RES_EXTENDED_PARTIAL ) {
+       if( res->lm_msgtype != LDAP_RES_INTERMEDIATE ) {
                ld->ld_errno = LDAP_PARAM_ERROR;
                return ld->ld_errno;
        }
 
        if( retoidp != NULL ) *retoidp = NULL;
        if( retdatap != NULL ) *retdatap = NULL;
+       if( serverctrls != NULL ) *serverctrls = NULL;
 
        ber = ber_dup( res->lm_ber );
 
@@ -326,9 +323,9 @@ ldap_parse_extended_partial (
                return ld->ld_errno;
        }
 
-       rc = ber_scanf( ber, "{" /*}*/ );
+       tag = ber_scanf( ber, "{" /*}*/ );
 
-       if( rc == LBER_ERROR ) {
+       if( tag == LBER_ERROR ) {
                ld->ld_errno = LDAP_DECODING_ERROR;
                ber_free( ber, 0 );
                return ld->ld_errno;
@@ -339,7 +336,13 @@ ldap_parse_extended_partial (
 
        tag = ber_peek_tag( ber, &len );
 
-       if( tag == LDAP_TAG_EXOP_RES_OID ) {
+       /*
+        * NOTE: accept intermediate and extended response tag values
+        * as older versions of slapd(8) incorrectly used extended
+        * response tags.
+        * Should be removed when 2.2 is moved to Historic.
+        */
+       if( tag == LDAP_TAG_IM_RES_OID || tag == LDAP_TAG_EXOP_RES_OID ) {
                /* we have a resoid */
                if( ber_scanf( ber, "a", &resoid ) == LBER_ERROR ) {
                        ld->ld_errno = LDAP_DECODING_ERROR;
@@ -347,10 +350,12 @@ ldap_parse_extended_partial (
                        return ld->ld_errno;
                }
 
+               assert( resoid[ 0 ] != '\0' );
+
                tag = ber_peek_tag( ber, &len );
        }
 
-       if( tag == LDAP_TAG_EXOP_RES_VALUE ) {
+       if( tag == LDAP_TAG_IM_RES_VALUE || tag == LDAP_TAG_EXOP_RES_VALUE ) {
                /* we have a resdata */
                if( ber_scanf( ber, "O", &resdata ) == LBER_ERROR ) {
                        ld->ld_errno = LDAP_DECODING_ERROR;
@@ -361,16 +366,16 @@ ldap_parse_extended_partial (
        }
 
        if ( serverctrls == NULL ) {
-               rc = LDAP_SUCCESS;
+               ld->ld_errno = LDAP_SUCCESS;
                goto free_and_return;
        }
 
        if ( ber_scanf( ber, /*{*/ "}" ) == LBER_ERROR ) {
-               rc = LDAP_DECODING_ERROR;
+               ld->ld_errno = LDAP_DECODING_ERROR;
                goto free_and_return;
        }
 
-       rc = ldap_int_get_controls( ber, serverctrls );
+       ld->ld_errno = ldap_pvt_get_controls( ber, serverctrls );
 
 free_and_return:
        ber_free( ber, 0 );
@@ -391,122 +396,6 @@ free_and_return:
                ldap_msgfree( res );
        }
 
-       return LDAP_SUCCESS;
+       return ld->ld_errno;
 }
 
-#ifdef LDAP_RES_INTERMEDIATE_RESP
-/* Parse an intermediate response result */
-int
-ldap_parse_intermediate_resp_result (
-       LDAP                    *ld,
-       LDAPMessage             *res,
-       char                    **retoidp,
-       struct berval           **retdatap,
-       int                     freeit )
-{
-       BerElement *ber;
-       ber_tag_t rc;
-       ber_tag_t tag;
-       ber_len_t len;
-       struct berval *resdata;
-       ber_int_t errcode;
-       char *resoid;
-
-       assert( ld != NULL );
-       assert( LDAP_VALID( ld ) );
-       assert( res != NULL );
-
-#ifdef NEW_LOGGING
-       LDAP_LOG ( OPERATION, ENTRY, "ldap_parse_intermediate_resp_result\n", 0,0,0 );
-#else
-       Debug( LDAP_DEBUG_TRACE, "ldap_parse_intermediate_resp_result\n", 0, 0, 0 );
-#endif
-
-       if( ld->ld_version < LDAP_VERSION3 ) {
-               ld->ld_errno = LDAP_NOT_SUPPORTED;
-               return ld->ld_errno;
-       }
-
-       if( res->lm_msgtype != LDAP_RES_INTERMEDIATE_RESP ) {
-               ld->ld_errno = LDAP_PARAM_ERROR;
-               return ld->ld_errno;
-       }
-
-       if( retoidp != NULL ) *retoidp = NULL;
-       if( retdatap != NULL ) *retdatap = NULL;
-
-       if ( ld->ld_error ) {
-               LDAP_FREE( ld->ld_error );
-               ld->ld_error = NULL;
-       }
-
-       if ( ld->ld_matched ) {
-               LDAP_FREE( ld->ld_matched );
-               ld->ld_matched = NULL;
-       }
-
-       ber = ber_dup( res->lm_ber );
-
-       if ( ber == NULL ) {
-               ld->ld_errno = LDAP_NO_MEMORY;
-               return ld->ld_errno;
-       }
-
-       rc = ber_scanf( ber, "{iaa" /*}*/, &errcode,
-               &ld->ld_matched, &ld->ld_error );
-
-       if( rc == LBER_ERROR ) {
-               ld->ld_errno = LDAP_DECODING_ERROR;
-               ber_free( ber, 0 );
-               return ld->ld_errno;
-       }
-
-       resoid = NULL;
-       resdata = NULL;
-
-       tag = ber_peek_tag( ber, &len );
-
-       if( tag == LDAP_TAG_EXOP_RES_OID ) {
-               /* we have a resoid */
-               if( ber_scanf( ber, "a", &resoid ) == LBER_ERROR ) {
-                       ld->ld_errno = LDAP_DECODING_ERROR;
-                       ber_free( ber, 0 );
-                       return ld->ld_errno;
-               }
-
-               tag = ber_peek_tag( ber, &len );
-       }
-
-       if( tag == LDAP_TAG_EXOP_RES_VALUE ) {
-               /* we have a resdata */
-               if( ber_scanf( ber, "O", &resdata ) == LBER_ERROR ) {
-                       ld->ld_errno = LDAP_DECODING_ERROR;
-                       ber_free( ber, 0 );
-                       if( resoid != NULL ) LDAP_FREE( resoid );
-                       return ld->ld_errno;
-               }
-       }
-
-       ber_free( ber, 0 );
-
-       if( retoidp != NULL ) {
-               *retoidp = resoid;
-       } else {
-               LDAP_FREE( resoid );
-       }
-
-       if( retdatap != NULL ) {
-               *retdatap = resdata;
-       } else {
-               ber_bvfree( resdata );
-       }
-
-       ld->ld_errno = errcode;
-
-       if( freeit ) {
-               ldap_msgfree( res );
-       }
-
-       return LDAP_SUCCESS;
-}
-#endif