Diff for /libraries/libldap/result.c between versions 1.64.2.7 and 1.64.2.13

version 1.64.2.7, 2002/10/17 15:08:01 version 1.64.2.13, 2004/03/26 22:34:27
Line 1 Line 1
 /* $OpenLDAP: pkg/ldap/libraries/libldap/result.c,v 1.64.2.6 2002/08/30 01:09:36 kurt Exp $ */  /* $OpenLDAP: pkg/ldap/libraries/libldap/result.c,v 1.64.2.12 2003/02/28 17:07:14 kurt Exp $ */
 /*  /*
  * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.   * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file   * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
  */   */
 /*  Portions  /*  Portions
Line 64  static int ldap_mark_abandoned LDAP_P(( Line 64  static int ldap_mark_abandoned LDAP_P((
 static int wait4msg LDAP_P(( LDAP *ld, ber_int_t msgid, int all, struct timeval *timeout,  static int wait4msg LDAP_P(( LDAP *ld, ber_int_t msgid, int all, struct timeval *timeout,
         LDAPMessage **result ));          LDAPMessage **result ));
 static ber_tag_t try_read1msg LDAP_P(( LDAP *ld, ber_int_t msgid,  static ber_tag_t try_read1msg LDAP_P(( LDAP *ld, ber_int_t msgid,
         int all, Sockbuf *sb, LDAPConn *lc, LDAPMessage **result ));          int all, Sockbuf *sb, LDAPConn **lc, LDAPMessage **result ));
 static ber_tag_t build_result_ber LDAP_P(( LDAP *ld, BerElement **bp, LDAPRequest *lr ));  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 ));
 static LDAPMessage * chkResponseList LDAP_P(( LDAP *ld, int msgid, int all));  static LDAPMessage * chkResponseList LDAP_P(( LDAP *ld, int msgid, int all));
Line 298  wait4msg( Line 298  wait4msg(
             rc = (*result)->lm_msgtype;              rc = (*result)->lm_msgtype;
         } else {          } else {
   
                         for ( lc = ld->ld_conns; lc != NULL; lc = lc->lconn_next ) {                          for ( lc = ld->ld_conns; lc != NULL; lc = nextlc ) {
                                   nextlc = lc->lconn_next;
                                 if ( ber_sockbuf_ctrl( lc->lconn_sb,                                  if ( ber_sockbuf_ctrl( lc->lconn_sb,
                                                 LBER_SB_OPT_DATA_READY, NULL ) ) {                                                  LBER_SB_OPT_DATA_READY, NULL ) ) {
                                             rc = try_read1msg( ld, msgid, all, lc->lconn_sb,                                          rc = try_read1msg( ld, msgid, all, lc->lconn_sb,
                                                 lc, result );                                                  &lc, result );
                                     break;                                      break;
                                 }                                  }
                 }                  }
Line 352  wait4msg( Line 353  wait4msg(
                                                 ldap_is_read_ready( ld,                                                  ldap_is_read_ready( ld,
                                                 lc->lconn_sb )) {                                                  lc->lconn_sb )) {
                                                     rc = try_read1msg( ld, msgid, all,                                                      rc = try_read1msg( ld, msgid, all,
                                                         lc->lconn_sb, lc, result );                                                          lc->lconn_sb, &lc, result );
                                                           if ( lc == NULL ) lc = nextlc;
                                             }                                              }
                                     }                                      }
                             }                              }
Line 388  try_read1msg( Line 390  try_read1msg(
         ber_int_t msgid,          ber_int_t msgid,
         int all,          int all,
         Sockbuf *sb,          Sockbuf *sb,
         LDAPConn *lc,          LDAPConn **lcp,
         LDAPMessage **result )          LDAPMessage **result )
 {  {
         BerElement      *ber;          BerElement      *ber;
Line 398  try_read1msg( Line 400  try_read1msg(
         ber_len_t       len;          ber_len_t       len;
         int             foundit = 0;          int             foundit = 0;
         LDAPRequest     *lr, *tmplr;          LDAPRequest     *lr, *tmplr;
           LDAPConn        *lc;
         BerElement      tmpber;          BerElement      tmpber;
         int             rc, refer_cnt, hadref, simple_request;          int             rc, refer_cnt, hadref, simple_request;
         ber_int_t       lderr;          ber_int_t       lderr;
   #ifdef LDAP_CONNECTIONLESS
           int             firstmsg = 1, moremsgs = 0, isv2 = 0;
   #endif
         /*          /*
          * v3ref = flag for V3 referral / search reference           * v3ref = flag for V3 referral / search reference
          * 0 = not a ref, 1 = sucessfully chased ref, -1 = pass ref to application           * 0 = not a ref, 1 = sucessfully chased ref, -1 = pass ref to application
Line 408  try_read1msg( Line 414  try_read1msg(
         int     v3ref;          int     v3ref;
   
         assert( ld != NULL );          assert( ld != NULL );
         assert( lc != NULL );          assert( lcp != NULL );
           assert( *lcp != NULL );
                   
 #ifdef NEW_LOGGING  #ifdef NEW_LOGGING
         LDAP_LOG ( OPERATION, ARGS, "read1msg: msgid %d, all %d\n", msgid, all, 0 );          LDAP_LOG ( OPERATION, ARGS, "read1msg: msgid %d, all %d\n", msgid, all, 0 );
Line 416  try_read1msg( Line 423  try_read1msg(
         Debug( LDAP_DEBUG_TRACE, "read1msg: msgid %d, all %d\n", msgid, all, 0 );          Debug( LDAP_DEBUG_TRACE, "read1msg: msgid %d, all %d\n", msgid, all, 0 );
 #endif  #endif
   
           lc = *lcp;
   
   retry:
     if ( lc->lconn_ber == NULL ) {      if ( lc->lconn_ber == NULL ) {
                 lc->lconn_ber = ldap_alloc_ber_with_options(ld);                  lc->lconn_ber = ldap_alloc_ber_with_options(ld);
   
Line 427  try_read1msg( Line 437  try_read1msg(
         ber = lc->lconn_ber;          ber = lc->lconn_ber;
         assert( LBER_VALID (ber) );          assert( LBER_VALID (ber) );
   
   retry2:
         /* get the next message */          /* get the next message */
         errno = 0;          errno = 0;
 #ifdef LDAP_CONNECTIONLESS  #ifdef LDAP_CONNECTIONLESS
         if ( LDAP_IS_UDP(ld) ) {          if ( LDAP_IS_UDP(ld) ) {
                 struct sockaddr from;                  struct sockaddr from;
                 ber_int_sb_read(sb, &from, sizeof(struct sockaddr));                  ber_int_sb_read(sb, &from, sizeof(struct sockaddr));
                   if (ld->ld_options.ldo_version == LDAP_VERSION2) isv2=1;
         }          }
   nextresp3:
 #endif  #endif
         if ( (tag = ber_get_next( sb, &len, ber ))          if ( (tag = ber_get_next( sb, &len, ber ))
             != LDAP_TAG_MESSAGE ) {              != LDAP_TAG_MESSAGE ) {
Line 475  try_read1msg( Line 488  try_read1msg(
   
         /* if it's been abandoned, toss it */          /* if it's been abandoned, toss it */
         if ( ldap_abandoned( ld, id ) ) {          if ( ldap_abandoned( ld, id ) ) {
                 ber_free( ber, 1 );  
 #ifdef NEW_LOGGING  #ifdef NEW_LOGGING
                 LDAP_LOG ( OPERATION, DETAIL1, "read1msg: abandoned\n", 0, 0, 0 );                  LDAP_LOG ( OPERATION, DETAIL1, "read1msg: abandoned\n", 0, 0, 0 );
 #else  #else
                 Debug( LDAP_DEBUG_ANY, "abandoned\n", 0, 0, 0);                  Debug( LDAP_DEBUG_ANY, "abandoned\n", 0, 0, 0);
 #endif  #endif
   retry_ber:
                   if ( ber_sockbuf_ctrl( sb, LBER_SB_OPT_DATA_READY, NULL ) ) {
                           ber_free_buf( ber );
                           ber_init2( ber, NULL, ld->ld_lberoptions );
                           goto retry2;
                   }
                   ber_free( ber, 1 );
                 return( -2 );   /* continue looking */                  return( -2 );   /* continue looking */
         }          }
   
Line 494  try_read1msg( Line 513  try_read1msg(
                     "no request for response with msgid %ld (tossing)\n",                      "no request for response with msgid %ld (tossing)\n",
                     (long) id, 0, 0 );                      (long) id, 0, 0 );
 #endif  #endif
                 ber_free( ber, 1 );                  goto retry_ber;
                 return( -2 );   /* continue looking */  
         }          }
 #ifdef LDAP_CONNECTIONLESS  #ifdef LDAP_CONNECTIONLESS
         if (LDAP_IS_UDP(ld) && ld->ld_options.ldo_version == LDAP_VERSION2) {          if (LDAP_IS_UDP(ld) && isv2) {
                 struct berval blank;                  ber_scanf(ber, "x{");
                 ber_scanf(ber, "m{", &blank);  
         }          }
   nextresp2:
 #endif  #endif
         /* the message type */          /* the message type */
         if ( (tag = ber_peek_tag( ber, &len )) == LBER_ERROR ) {          if ( (tag = ber_peek_tag( ber, &len )) == LBER_ERROR ) {
Line 638  try_read1msg( Line 656  try_read1msg(
          * go through the following code.  This code also chases V2 referrals           * go through the following code.  This code also chases V2 referrals
          * and checks if all referrals have been chased.           * and checks if all referrals have been chased.
          */           */
         if ( (tag != LDAP_RES_SEARCH_ENTRY) && (v3ref > -1) ) {          if ( (tag != LDAP_RES_SEARCH_ENTRY) && (v3ref > -1)
   #ifdef LDAP_RES_INTERMEDIATE_RESP
                   && (tag != LDAP_RES_INTERMEDIATE_RESP )
   #endif
           ) {
                 /* For a v3 search referral/reference, only come here if already chased it */                  /* For a v3 search referral/reference, only come here if already chased it */
                 if ( ld->ld_version >= LDAP_VERSION2 &&                  if ( ld->ld_version >= LDAP_VERSION2 &&
                         ( lr->lr_parent != NULL ||                          ( lr->lr_parent != NULL ||
Line 782  lr->lr_res_matched ? lr->lr_res_matched Line 804  lr->lr_res_matched ? lr->lr_res_matched
   
                         if ( lc != NULL ) {                          if ( lc != NULL ) {
                                 ldap_free_connection( ld, lc, 0, 1 );                                  ldap_free_connection( ld, lc, 0, 1 );
                                   *lcp = NULL;
                         }                          }
                 }                  }
         }          }
Line 800  lr->lr_res_matched ? lr->lr_res_matched Line 823  lr->lr_res_matched ? lr->lr_res_matched
         new->lm_msgtype = tag;          new->lm_msgtype = tag;
         new->lm_ber = ber;          new->lm_ber = ber;
   
 #ifndef LDAP_NOCACHE  #ifdef LDAP_CONNECTIONLESS
                 if ( ld->ld_cache != NULL ) {          /* CLDAP replies all fit in a single datagram. In LDAPv2 RFC1798
                         ldap_add_result_to_cache( ld, new );           * the responses are all a sequence wrapped in one message. In
            * LDAPv3 each response is in its own message. The datagram must
            * end with a SearchResult. We can't just parse each response in
            * separate calls to try_read1msg because the header info is only
            * present at the beginning of the datagram, not at the beginning
            * of each response. So parse all the responses at once and queue
            * them up, then pull off the first response to return to the
            * caller when all parsing is complete.
            */
           if ( LDAP_IS_UDP(ld) ) {
                   /* If not a result, look for more */
                   if ( tag != LDAP_RES_SEARCH_RESULT ) {
                           int ok = 0;
                           moremsgs = 1;
                           if (isv2) {
                                   /* LDAPv2: dup the current ber, skip past the current
                                    * response, and see if there are any more after it.
                                    */
                                   ber = ber_dup( ber );
                                   ber_scanf( ber, "x" );
                                   if (ber_peek_tag(ber, &len) != LBER_DEFAULT) {
                                           /* There's more - dup the ber buffer so they can all be
                                            * individually freed by ldap_msgfree.
                                            */
                                           struct berval bv;
                                           ber_get_option(ber, LBER_OPT_BER_REMAINING_BYTES, &len);
                                           bv.bv_val = LDAP_MALLOC(len);
                                           if (bv.bv_val) {
                                                   ok=1;
                                                   ber_read(ber, bv.bv_val, len);
                                                   bv.bv_len = len;
                                                   ber_init2(ber, &bv, ld->ld_lberoptions );
                                           }
                                   }
                           } else {
                                   /* LDAPv3: Just allocate a new ber. Since this is a buffered
                                    * datagram, if the sockbuf is readable we still have data
                                    * to parse.
                                    */
                                   ber = ldap_alloc_ber_with_options(ld);
                                   if (ber_sockbuf_ctrl(sb, LBER_SB_OPT_DATA_READY, NULL)) ok=1;
                           }
                           /* set up response chain */
                           if ( firstmsg ) {
                                   firstmsg = 0;
                                   new->lm_next = ld->ld_responses;
                                   ld->ld_responses = new;
                           } else {
                                   tmp->lm_chain = new;
                           }
                           tmp = new;
                           /* "ok" means there's more to parse */
                           if (ok) {
                                   if (isv2) goto nextresp2;
                                   else goto nextresp3;
                           } else {
                                   /* got to end of datagram without a SearchResult. Free
                                    * our dup'd ber, but leave any buffer alone. For v2 case,
                                    * the previous response is still using this buffer. For v3,
                                    * the new ber has no buffer to free yet.
                                    */
                                   ber_free(ber, 0);
                                   return -1;
                           }
                   } else if ( moremsgs ) {
                   /* got search result, and we had multiple responses in 1 datagram.
                    * stick the result onto the end of the chain, and then pull the
                    * first response off the head of the chain.
                    */
                           tmp->lm_chain = new;
                           *result = chkResponseList( ld, msgid, all );
                           ld->ld_errno = LDAP_SUCCESS;
                           return( (*result)->lm_msgtype );
                 }                  }
 #endif /* LDAP_NOCACHE */          }
   #endif
   
         /* is this the one we're looking for? */          /* is this the one we're looking for? */
         if ( msgid == LDAP_RES_ANY || id == msgid ) {          if ( msgid == LDAP_RES_ANY || id == msgid ) {
Line 843  lr->lr_res_matched ? lr->lr_res_matched Line 939  lr->lr_res_matched ? lr->lr_res_matched
   
                 new->lm_next = ld->ld_responses;                  new->lm_next = ld->ld_responses;
                 ld->ld_responses = new;                  ld->ld_responses = new;
                 return( -2 );   /* continue looking */                  goto exit;
         }          }
   
 #ifdef NEW_LOGGING  #ifdef NEW_LOGGING
Line 872  lr->lr_res_matched ? lr->lr_res_matched Line 968  lr->lr_res_matched ? lr->lr_res_matched
                         prev->lm_next = l->lm_next;                          prev->lm_next = l->lm_next;
                 *result = l;                  *result = l;
                 ld->ld_errno = LDAP_SUCCESS;                  ld->ld_errno = LDAP_SUCCESS;
 #ifdef LDAP_WORLD_P16  
                 /*  
                  * XXX questionable fix; see text for [P16] on  
                  * http://www.critical-angle.com/ldapworld/patch/  
                  *  
                  * inclusion of this patch causes searchs to hang on  
                  * multiple platforms  
                  */  
                 return( l->lm_msgtype );  
 #else   /* LDAP_WORLD_P16 */  
                 return( tag );                  return( tag );
 #endif  /* !LDAP_WORLD_P16 */  
         }          }
   
   exit:
           if ( ber_sockbuf_ctrl( sb, LBER_SB_OPT_DATA_READY, NULL ) ) {
                   goto retry;
           }
         return( -2 );   /* continue looking */          return( -2 );   /* continue looking */
 }  }
   

Removed from v.1.64.2.7  
changed lines
  Added in v.1.64.2.13


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