Diff for /libraries/libldap/result.c between versions 1.29 and 1.34

version 1.29, 1999/05/31 15:30:22 version 1.34, 1999/06/18 21:53:09
Line 9 Line 9
  *  result.c - wait for an ldap result   *  result.c - wait for an ldap result
  */   */
   
   /*
    * LDAPv3 (RFC2251)
    *      LDAPResult ::= SEQUENCE {
    *              resultCode              ENUMERATED { ... },
    *              matchedDN               LDAPDN,
    *              errorMessage    LDAPString,
    *              referral                Referral OPTIONAL
    *      }
    *      Referral ::= SEQUENCE OF LDAPURL        (one or more)
    *      LDAPURL ::= LDAPString                          (limited to URL chars)
    */
   
 #include "portable.h"  #include "portable.h"
   
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  
   #include <ac/stdlib.h>
   
 #include <ac/errno.h>  #include <ac/errno.h>
 #include <ac/socket.h>  #include <ac/socket.h>
Line 23 Line 36
 #include "ldap-int.h"  #include "ldap-int.h"
   
   
 static int ldap_abandoned LDAP_P(( LDAP *ld, int msgid ));  static int ldap_abandoned LDAP_P(( LDAP *ld, ber_int_t msgid ));
 static int ldap_mark_abandoned LDAP_P(( LDAP *ld, int msgid ));  static int ldap_mark_abandoned LDAP_P(( LDAP *ld, ber_int_t msgid ));
 static int wait4msg LDAP_P(( LDAP *ld, int msgid, int all, struct timeval *timeout,  static int wait4msg LDAP_P(( LDAP *ld, ber_int_t msgid, int all, struct timeval *timeout,
         LDAPMessage **result ));  
 static int try_read1msg LDAP_P(( LDAP *ld, int msgid, int all, Sockbuf *sb, LDAPConn *lc,  
         LDAPMessage **result ));          LDAPMessage **result ));
 static unsigned long build_result_ber LDAP_P(( LDAP *ld, BerElement *ber, LDAPRequest *lr ));  static ber_tag_t try_read1msg LDAP_P(( LDAP *ld, ber_int_t msgid,
           int all, Sockbuf *sb, LDAPConn *lc, LDAPMessage **result ));
   static ber_tag_t build_result_ber LDAP_P(( LDAP *ld, BerElement **bp, LDAPRequest *lr ));
 static void merge_error_info LDAP_P(( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr ));  static void merge_error_info LDAP_P(( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr ));
   
   
Line 74  ldap_result( LDAP *ld, int msgid, int al Line 87  ldap_result( LDAP *ld, int msgid, int al
          * wait until it arrives or timeout occurs.           * wait until it arrives or timeout occurs.
          */           */
   
         *result = NULLMSG;          *result = NULL;
         lastlm = NULLMSG;          lastlm = NULL;
         for ( lm = ld->ld_responses; lm != NULLMSG; lm = nextlm ) {          for ( lm = ld->ld_responses; lm != NULL; lm = nextlm ) {
                 nextlm = lm->lm_next;                  nextlm = lm->lm_next;
   
                 if ( ldap_abandoned( ld, lm->lm_msgid ) ) {                  if ( ldap_abandoned( ld, lm->lm_msgid ) ) {
                         ldap_mark_abandoned( ld, lm->lm_msgid );                          ldap_mark_abandoned( ld, lm->lm_msgid );
   
                         if ( lastlm == NULLMSG ) {                          if ( lastlm == NULL ) {
                                 ld->ld_responses = lm->lm_next;                                  ld->ld_responses = lm->lm_next;
                         } else {                          } else {
                                 lastlm->lm_next = nextlm;                                  lastlm->lm_next = nextlm;
Line 102  ldap_result( LDAP *ld, int msgid, int al Line 115  ldap_result( LDAP *ld, int msgid, int al
                             && lm->lm_msgtype != LDAP_RES_SEARCH_ENTRY) )                              && lm->lm_msgtype != LDAP_RES_SEARCH_ENTRY) )
                                 break;                                  break;
   
                         for ( tmp = lm; tmp != NULLMSG; tmp = tmp->lm_chain ) {                          for ( tmp = lm; tmp != NULL; tmp = tmp->lm_chain ) {
                                 if ( tmp->lm_msgtype == LDAP_RES_SEARCH_RESULT )                                  if ( tmp->lm_msgtype == LDAP_RES_SEARCH_RESULT )
                                         break;                                          break;
                         }                          }
   
                         if ( tmp == NULLMSG ) {                          if ( tmp == NULL ) {
                                 return( wait4msg( ld, msgid, all, timeout,                                  return( wait4msg( ld, msgid, all, timeout,
                                     result ) );                                      result ) );
                         }                          }
Line 116  ldap_result( LDAP *ld, int msgid, int al Line 129  ldap_result( LDAP *ld, int msgid, int al
                 }                  }
                 lastlm = lm;                  lastlm = lm;
         }          }
         if ( lm == NULLMSG ) {          if ( lm == NULL ) {
                 return( wait4msg( ld, msgid, all, timeout, result ) );                  return( wait4msg( ld, msgid, all, timeout, result ) );
         }          }
   
         if ( lastlm == NULLMSG ) {          if ( lastlm == NULL ) {
                 ld->ld_responses = (all == 0 && lm->lm_chain != NULLMSG                  ld->ld_responses = (all == 0 && lm->lm_chain != NULL
                     ? lm->lm_chain : lm->lm_next);                      ? lm->lm_chain : lm->lm_next);
         } else {          } else {
                 lastlm->lm_next = (all == 0 && lm->lm_chain != NULLMSG                  lastlm->lm_next = (all == 0 && lm->lm_chain != NULL
                     ? lm->lm_chain : lm->lm_next);                      ? lm->lm_chain : lm->lm_next);
         }          }
         if ( all == 0 )          if ( all == 0 )
                 lm->lm_chain = NULLMSG;                  lm->lm_chain = NULL;
         lm->lm_next = NULLMSG;          lm->lm_next = NULL;
   
         *result = lm;          *result = lm;
         ld->ld_errno = LDAP_SUCCESS;          ld->ld_errno = LDAP_SUCCESS;
Line 137  ldap_result( LDAP *ld, int msgid, int al Line 150  ldap_result( LDAP *ld, int msgid, int al
 }  }
   
 static int  static int
 wait4msg( LDAP *ld, int msgid, int all, struct timeval *timeout,  wait4msg(
           LDAP *ld,
           ber_int_t msgid,
           int all,
           struct timeval *timeout,
         LDAPMessage **result )          LDAPMessage **result )
 {  {
         int             rc;          int             rc;
Line 240  wait4msg( LDAP *ld, int msgid, int all, Line 257  wait4msg( LDAP *ld, int msgid, int all,
 }  }
   
   
 static int  static ber_tag_t
 try_read1msg( LDAP *ld, int msgid, int all, Sockbuf *sb,  try_read1msg(
     LDAPConn *lc, LDAPMessage **result )          LDAP *ld,
           ber_int_t msgid,
           int all,
           Sockbuf *sb,
       LDAPConn *lc,
           LDAPMessage **result )
 {  {
         BerElement      *ber;          BerElement      *ber;
         LDAPMessage     *new, *l, *prev, *tmp;          LDAPMessage     *new, *l, *prev, *tmp;
         long            id;          ber_int_t       id;
         unsigned long   tag, len;          ber_tag_t       tag;
           ber_len_t       len;
         int             foundit = 0;          int             foundit = 0;
         LDAPRequest     *lr;          LDAPRequest     *lr;
         BerElement      tmpber;          BerElement      tmpber;
         int             rc, refer_cnt, hadref, simple_request;          int             rc, refer_cnt, hadref, simple_request;
         unsigned long   lderr;          ber_int_t       lderr;
   
         assert( ld != NULL );          assert( ld != NULL );
         assert( lc != NULL );          assert( lc != NULL );
                   
         Debug( LDAP_DEBUG_TRACE, "read1msg\n", 0, 0, 0 );          Debug( LDAP_DEBUG_TRACE, "read1msg\n", 0, 0, 0 );
   
     if ( lc->lconn_ber == NULLBER ) {      if ( lc->lconn_ber == NULL ) {
                 lc->lconn_ber = ldap_alloc_ber_with_options(ld);                  lc->lconn_ber = ldap_alloc_ber_with_options(ld);
   
                 if( lc->lconn_ber == NULL ) {                  if( lc->lconn_ber == NULL ) {
Line 296  try_read1msg( LDAP *ld, int msgid, int a Line 319  try_read1msg( LDAP *ld, int msgid, int a
      * We read a complete message.       * We read a complete message.
          * The connection should no longer need this ber.           * The connection should no longer need this ber.
          */           */
     lc->lconn_ber = NULLBER;      lc->lconn_ber = NULL;
   
         /* message id */          /* message id */
         if ( ber_get_int( ber, &id ) == LBER_ERROR ) {          if ( ber_get_int( ber, &id ) == LBER_ERROR ) {
Line 306  try_read1msg( LDAP *ld, int msgid, int a Line 329  try_read1msg( LDAP *ld, int msgid, int a
         }          }
   
         /* if it's been abandoned, toss it */          /* if it's been abandoned, toss it */
         if ( ldap_abandoned( ld, (int)id ) ) {          if ( ldap_abandoned( ld, id ) ) {
                 ber_free( ber, 1 );                  ber_free( ber, 1 );
                 return( -2 );   /* continue looking */                  return( -2 );   /* continue looking */
         }          }
Line 410  lr->lr_res_matched ? lr->lr_res_matched Line 433  lr->lr_res_matched ? lr->lr_res_matched
                                 if ( !simple_request ) {                                  if ( !simple_request ) {
                                         ber_free( ber, 1 );                                          ber_free( ber, 1 );
                                         ber = NULL;                                          ber = NULL;
                                         if ( build_result_ber( ld, ber, lr )                                          if ( build_result_ber( ld, &ber, lr )
                                             == LBER_ERROR ) {                                              == LBER_ERROR ) {
                                                 ld->ld_errno = LDAP_NO_MEMORY;  
                                                 rc = -1; /* fatal error */                                                  rc = -1; /* fatal error */
                                         }                                          }
                                 }                                  }
Line 465  lr->lr_res_matched ? lr->lr_res_matched Line 487  lr->lr_res_matched ? lr->lr_res_matched
          * search response.           * search response.
          */           */
   
         prev = NULLMSG;          prev = NULL;
         for ( l = ld->ld_responses; l != NULLMSG; l = l->lm_next ) {          for ( l = ld->ld_responses; l != NULL; l = l->lm_next ) {
                 if ( l->lm_msgid == new->lm_msgid )                  if ( l->lm_msgid == new->lm_msgid )
                         break;                          break;
                 prev = l;                  prev = l;
         }          }
   
         /* not part of an existing search response */          /* not part of an existing search response */
         if ( l == NULLMSG ) {          if ( l == NULL ) {
                 if ( foundit ) {                  if ( foundit ) {
                         *result = new;                          *result = new;
                         ld->ld_errno = LDAP_SUCCESS;                          ld->ld_errno = LDAP_SUCCESS;
Line 489  lr->lr_res_matched ? lr->lr_res_matched Line 511  lr->lr_res_matched ? lr->lr_res_matched
             new->lm_msgid, new->lm_msgtype, 0 );              new->lm_msgid, new->lm_msgtype, 0 );
   
         /* part of a search response - add to end of list of entries */          /* part of a search response - add to end of list of entries */
         for ( tmp = l; tmp->lm_chain != NULLMSG &&          for ( tmp = l; tmp->lm_chain != NULL &&
             tmp->lm_chain->lm_msgtype == LDAP_RES_SEARCH_ENTRY;              tmp->lm_chain->lm_msgtype == LDAP_RES_SEARCH_ENTRY;
             tmp = tmp->lm_chain )              tmp = tmp->lm_chain )
                 ;       /* NULL */                  ;       /* NULL */
Line 497  lr->lr_res_matched ? lr->lr_res_matched Line 519  lr->lr_res_matched ? lr->lr_res_matched
   
         /* return the whole chain if that's what we were looking for */          /* return the whole chain if that's what we were looking for */
         if ( foundit ) {          if ( foundit ) {
                 if ( prev == NULLMSG )                  if ( prev == NULL )
                         ld->ld_responses = l->lm_next;                          ld->ld_responses = l->lm_next;
                 else                  else
                         prev->lm_next = l->lm_next;                          prev->lm_next = l->lm_next;
Line 521  lr->lr_res_matched ? lr->lr_res_matched Line 543  lr->lr_res_matched ? lr->lr_res_matched
 }  }
   
   
 static unsigned long  static ber_tag_t
 build_result_ber( LDAP *ld, BerElement *ber, LDAPRequest *lr )  build_result_ber( LDAP *ld, BerElement **bp, LDAPRequest *lr )
 {  {
         unsigned long   len;          ber_len_t       len;
         long            along;          ber_int_t       tag;
           ber_int_t       along;
           BerElement *ber;
   
           *bp = NULL;
           ber = ldap_alloc_ber_with_options( ld );
   
           if( ber == NULL ) {
                   ld->ld_errno = LDAP_NO_MEMORY;
                   return LBER_ERROR;
           }
   
         ber_init_w_nullc( ber, 0 );  
         ldap_set_ber_options( ld, ber );  
         if ( ber_printf( ber, "{it{ess}}", lr->lr_msgid,          if ( ber_printf( ber, "{it{ess}}", lr->lr_msgid,
             (unsigned long) lr->lr_res_msgtype, lr->lr_res_errno,              lr->lr_res_msgtype, lr->lr_res_errno,
             lr->lr_res_matched ? lr->lr_res_matched : "",              lr->lr_res_matched ? lr->lr_res_matched : "",
             lr->lr_res_error ? lr->lr_res_error : "" ) == -1 ) {              lr->lr_res_error ? lr->lr_res_error : "" ) == -1 ) {
   
                   ld->ld_errno = LDAP_ENCODING_ERROR;
                   ber_free(ber, 1);
                 return( LBER_ERROR );                  return( LBER_ERROR );
         }          }
   
         ber_reset( ber, 1 );          ber_reset( ber, 1 );
   
         if ( ber_skip_tag( ber, &len ) == LBER_ERROR ) {          if ( ber_skip_tag( ber, &len ) == LBER_ERROR ) {
                   ld->ld_errno = LDAP_DECODING_ERROR;
                   ber_free(ber, 1);
                 return( LBER_ERROR );                  return( LBER_ERROR );
         }          }
   
         if ( ber_get_int( ber, &along ) == LBER_ERROR ) {          if ( ber_get_int( ber, &along ) == LBER_ERROR ) {
                   ld->ld_errno = LDAP_DECODING_ERROR;
                   ber_free(ber, 1);
                 return( LBER_ERROR );                  return( LBER_ERROR );
         }          }
   
         return( ber_peek_tag( ber, &len ));          tag = ber_peek_tag( ber, &len );
   
           if ( tag == LBER_ERROR ) {
                   ld->ld_errno = LDAP_DECODING_ERROR;
                   ber_free(ber, 1);
                   return( LBER_ERROR );
           }
   
           *bp = ber;
           return tag;
 }  }
   
   
Line 615  ldap_msgfree( LDAPMessage *lm ) Line 662  ldap_msgfree( LDAPMessage *lm )
   
         Debug( LDAP_DEBUG_TRACE, "ldap_msgfree\n", 0, 0, 0 );          Debug( LDAP_DEBUG_TRACE, "ldap_msgfree\n", 0, 0, 0 );
   
         for ( ; lm != NULLMSG; lm = next ) {          for ( ; lm != NULL; lm = next ) {
                 next = lm->lm_chain;                  next = lm->lm_chain;
                 type = lm->lm_msgtype;                  type = lm->lm_msgtype;
                 ber_free( lm->lm_ber, 1 );                  ber_free( lm->lm_ber, 1 );
Line 639  ldap_msgdelete( LDAP *ld, int msgid ) Line 686  ldap_msgdelete( LDAP *ld, int msgid )
   
         Debug( LDAP_DEBUG_TRACE, "ldap_msgdelete\n", 0, 0, 0 );          Debug( LDAP_DEBUG_TRACE, "ldap_msgdelete\n", 0, 0, 0 );
   
         prev = NULLMSG;          prev = NULL;
         for ( lm = ld->ld_responses; lm != NULLMSG; lm = lm->lm_next ) {          for ( lm = ld->ld_responses; lm != NULL; lm = lm->lm_next ) {
                 if ( lm->lm_msgid == msgid )                  if ( lm->lm_msgid == msgid )
                         break;                          break;
                 prev = lm;                  prev = lm;
         }          }
   
         if ( lm == NULLMSG )          if ( lm == NULL )
                 return( -1 );                  return( -1 );
   
         if ( prev == NULLMSG )          if ( prev == NULL )
                 ld->ld_responses = lm->lm_next;                  ld->ld_responses = lm->lm_next;
         else          else
                 prev->lm_next = lm->lm_next;                  prev->lm_next = lm->lm_next;
Line 665  ldap_msgdelete( LDAP *ld, int msgid ) Line 712  ldap_msgdelete( LDAP *ld, int msgid )
  * return 1 if message msgid is waiting to be abandoned, 0 otherwise   * return 1 if message msgid is waiting to be abandoned, 0 otherwise
  */   */
 static int  static int
 ldap_abandoned( LDAP *ld, int msgid )  ldap_abandoned( LDAP *ld, ber_int_t msgid )
 {  {
         int     i;          int     i;
   
Line 681  ldap_abandoned( LDAP *ld, int msgid ) Line 728  ldap_abandoned( LDAP *ld, int msgid )
   
   
 static int  static int
 ldap_mark_abandoned( LDAP *ld, int msgid )  ldap_mark_abandoned( LDAP *ld, ber_int_t msgid )
 {  {
         int     i;          int     i;
   
Line 707  ldap_mark_abandoned( LDAP *ld, int msgid Line 754  ldap_mark_abandoned( LDAP *ld, int msgid
 int  int
 cldap_getmsg( LDAP *ld, struct timeval *timeout, BerElement *ber )  cldap_getmsg( LDAP *ld, struct timeval *timeout, BerElement *ber )
 {  {
         int             rc;          int     rc;
         unsigned long   tag, len;          ber_tag_t       tag;
           ber_len_t       len;
   
         if ( ! ber_pvt_sb_data_ready(&ld->ld_sb) ) {          if ( ! ber_pvt_sb_data_ready(&ld->ld_sb) ) {
                 rc = ldap_select1( ld, timeout );                  rc = ldap_select1( ld, timeout );
Line 727  cldap_getmsg( LDAP *ld, struct timeval * Line 775  cldap_getmsg( LDAP *ld, struct timeval *
                 return( -1 );                  return( -1 );
         }          }
   
         return( tag );          return( 0 );
 }  }
 #endif /* LDAP_CONNECTIONLESS */  #endif /* LDAP_CONNECTIONLESS */

Removed from v.1.29  
changed lines
  Added in v.1.34


______________
© Copyright 1998-2020, OpenLDAP Foundation, info@OpenLDAP.org