Return LDAP_BAD_PARAM if res is not EXOP result.

[openldap] / libraries / libldap / error.c

diff --git a/libraries/libldap/error.c b/libraries/libldap/error.c
index 1c5279da7ef563a9bfdc30bc0c02a9051779c85d..41570b64777439757a0c98119504111091580d3f 100644 (file)
--- a/libraries/libldap/error.c
+++ b/libraries/libldap/error.c
@@ -6,7 +6,8 @@
 #include "portable.h"
 
 #include <stdio.h>
-#include <stdlib.h>
+
+#include <ac/stdlib.h>
 
 #include <ac/socket.h>
 #include <ac/string.h>
@@ -91,50 +92,69 @@ static const struct ldaperror ldap_errlist[] = {
        {-1, 0 }
 };
 
-char *
-ldap_err2string( int err )
+static struct ldaperror *ldap_int_error( int err )
 {
        int     i;
 
-       Debug( LDAP_DEBUG_TRACE, "ldap_err2string\n", 0, 0, 0 );
-
        for ( i = 0; ldap_errlist[i].e_code != -1; i++ ) {
                if ( err == ldap_errlist[i].e_code )
-                       return( ldap_errlist[i].e_reason );
+                       return (struct ldaperror *) &ldap_errlist[i];
        }
 
-       return( "Unknown error" );
+       return NULL;
 }
 
-/* depreciated */
-void
-ldap_perror( LDAP *ld, LDAP_CONST char *s )
+char *
+ldap_err2string( int err )
 {
-       int     i;
+       struct ldaperror *e;
+       
+       Debug( LDAP_DEBUG_TRACE, "ldap_err2string\n", 0, 0, 0 );
+
+       e = ldap_int_error( err );
+
+       return ( e != NULL ) ? e->e_reason : "Unknown error";
+}
 
+/* deprecated */
+void
+ldap_perror( LDAP *ld, LDAP_CONST char *str )
+{
+       const char *s;
+       struct ldaperror *e;
        Debug( LDAP_DEBUG_TRACE, "ldap_perror\n", 0, 0, 0 );
 
+       assert( ld != NULL );
+       assert( LDAP_VALID( ld ) );
+       assert( str );
+
+       s = ( str != NULL ) ? str : "ldap_perror";
+
        if ( ld == NULL ) {
                perror( s );
                return;
        }
 
-       for ( i = 0; ldap_errlist[i].e_code != -1; i++ ) {
-               if ( ld->ld_errno == ldap_errlist[i].e_code ) {
-                       fprintf( stderr, "%s: %s\n", s,
-                           ldap_errlist[i].e_reason );
-                       if ( ld->ld_matched != NULL && *ld->ld_matched != '\0' )
-                               fprintf( stderr, "%s: matched: %s\n", s,
-                                   ld->ld_matched );
-                       if ( ld->ld_error != NULL && *ld->ld_error != '\0' )
-                               fprintf( stderr, "%s: additional info: %s\n",
-                                   s, ld->ld_error );
-                       fflush( stderr );
-                       return;
-               }
+       e = ldap_int_error( ld->ld_errno );
+
+       if ( e != NULL ) {
+               fprintf( stderr, "%s: %s\n",
+                       s, e->e_reason );
+       } else {
+               fprintf( stderr, "%s: unknown LDAP error number %d\n",
+                       s, ld->ld_errno );
+       }
+
+       if ( ld->ld_matched != NULL ) {
+               fprintf( stderr, "\tmatched: \"%s\"\n",
+                       ld->ld_matched );
+       }
+
+       if ( ld->ld_error != NULL ) {
+               fprintf( stderr, "\tadditional info: %s\n",
+                   ld->ld_error );
        }
 
-       fprintf( stderr, "%s: Not an LDAP errno %d\n", s, ld->ld_errno );
        fflush( stderr );
 }
 
@@ -143,33 +163,39 @@ ldap_result2error( LDAP *ld, LDAPMessage *r, int freeit )
 {
        LDAPMessage     *lm;
        BerElement      ber;
-       long            along;
-       unsigned long   rc;
+       ber_int_t       along;
+       ber_tag_t       rc;
 
        Debug( LDAP_DEBUG_TRACE, "ldap_result2error\n", 0, 0, 0 );
 
-       if ( r == NULLMSG )
+       assert( ld != NULL );
+       assert( LDAP_VALID( ld ) );
+       assert( r != NULL );
+
+       if ( ld == NULL || r == NULL )
                return( LDAP_PARAM_ERROR );
 
        for ( lm = r; lm->lm_chain != NULL; lm = lm->lm_chain )
                ;       /* NULL */
 
        if ( ld->ld_error ) {
-               free( ld->ld_error );
+               LDAP_FREE( ld->ld_error );
                ld->ld_error = NULL;
        }
        if ( ld->ld_matched ) {
-               free( ld->ld_matched );
+               LDAP_FREE( ld->ld_matched );
                ld->ld_matched = NULL;
        }
 
        ber = *(lm->lm_ber);
-       if ( ld->ld_version == LDAP_VERSION2 ) {
+
+       if ( ld->ld_version < LDAP_VERSION2 ) {
+               rc = ber_scanf( &ber, "{ia}", &along, &ld->ld_error );
+       } else {
                rc = ber_scanf( &ber, "{iaa}", &along, &ld->ld_matched,
                    &ld->ld_error );
-       } else {
-               rc = ber_scanf( &ber, "{ia}", &along, &ld->ld_error );
        }
+
        if ( rc == LBER_ERROR ) {
                ld->ld_errno = LDAP_DECODING_ERROR;
        } else {