Diff for /libraries/liblber/decode.c between versions 1.34.6.6 and 1.63

version 1.34.6.6, 2000/10/12 19:52:39 version 1.63, 2001/11/04 16:50:16
Line 1 Line 1
 /* decode.c - ber input decoding routines */  /* decode.c - ber input decoding routines */
 /* $OpenLDAP: pkg/ldap/libraries/liblber/decode.c,v 1.34.6.5 2000/10/02 17:26:31 kurt Exp $ */  /* $OpenLDAP: pkg/ldap/libraries/liblber/decode.c,v 1.62 2001/11/03 21:07:41 kurt Exp $ */
 /*  /*
  * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.   * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file   * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
Line 42  ber_get_tag( BerElement *ber ) Line 42  ber_get_tag( BerElement *ber )
         unsigned int    i;          unsigned int    i;
   
         assert( ber != NULL );          assert( ber != NULL );
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         if ( ber_read( ber, (char *) &xbyte, 1 ) != 1 ) {          if ( ber_read( ber, (char *) &xbyte, 1 ) != 1 ) {
                 return LBER_DEFAULT;                  return LBER_DEFAULT;
Line 85  ber_skip_tag( BerElement *ber, ber_len_t Line 85  ber_skip_tag( BerElement *ber, ber_len_t
   
         assert( ber != NULL );          assert( ber != NULL );
         assert( len != NULL );          assert( len != NULL );
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         /*          /*
          * Any ber element looks like this: tag length contents.           * Any ber element looks like this: tag length contents.
Line 109  ber_skip_tag( BerElement *ber, ber_len_t Line 109  ber_skip_tag( BerElement *ber, ber_len_t
   
         /*          /*
          * Next, read the length.  The first byte contains the length of           * Next, read the length.  The first byte contains the length of
          * the length.  If bit 8 is set, the length is the long form,           * the length.  If bit 8 is set, the length is the long form,
          * otherwise it's the short form.  We don't allow a length that's           * otherwise it's the short form.  We don't allow a length that's
          * greater than what we can hold in a ber_len_t.           * greater than what we can hold in a ber_len_t.
          */           */
Line 137  ber_skip_tag( BerElement *ber, ber_len_t Line 137  ber_skip_tag( BerElement *ber, ber_len_t
                 *len = lc;                  *len = lc;
         }          }
   
           /* BER element should have enough data left */
           if( *len > ber_pvt_ber_remaining( ber ) ) {
                   return LBER_DEFAULT;
           }
   
         return tag;          return tag;
 }  }
   
Line 170  ber_getnint( Line 175  ber_getnint(
   
         assert( ber != NULL );          assert( ber != NULL );
         assert( num != NULL );          assert( num != NULL );
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         /*          /*
          * The tag and length have already been stripped off.  We should           * The tag and length have already been stripped off.  We should
Line 216  ber_get_int( Line 221  ber_get_int(
         ber_len_t       len;          ber_len_t       len;
   
         assert( ber != NULL );          assert( ber != NULL );
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         if ( (tag = ber_skip_tag( ber, &len )) == LBER_DEFAULT ) {          if ( (tag = ber_skip_tag( ber, &len )) == LBER_DEFAULT ) {
                 return LBER_DEFAULT;                  return LBER_DEFAULT;
Line 247  ber_get_stringb( Line 252  ber_get_stringb(
         ber_tag_t       tag;          ber_tag_t       tag;
   
         assert( ber != NULL );          assert( ber != NULL );
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         if ( (tag = ber_skip_tag( ber, &datalen )) == LBER_DEFAULT ) {          if ( (tag = ber_skip_tag( ber, &datalen )) == LBER_DEFAULT ) {
                 return LBER_DEFAULT;                  return LBER_DEFAULT;
         }          }
         if ( datalen > (*len - 1) ) {  
           /* must fit within allocated space with termination */
           if ( datalen >= *len ) {
                 return LBER_DEFAULT;                  return LBER_DEFAULT;
         }          }
   
Line 275  ber_get_stringa( BerElement *ber, char * Line 282  ber_get_stringa( BerElement *ber, char *
         assert( ber != NULL );          assert( ber != NULL );
         assert( buf != NULL );          assert( buf != NULL );
   
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         if ( (tag = ber_skip_tag( ber, &datalen )) == LBER_DEFAULT ) {          if ( (tag = ber_skip_tag( ber, &datalen )) == LBER_DEFAULT ) {
                 *buf = NULL;                  *buf = NULL;
Line 305  ber_get_stringal( BerElement *ber, struc Line 312  ber_get_stringal( BerElement *ber, struc
         assert( ber != NULL );          assert( ber != NULL );
         assert( bv != NULL );          assert( bv != NULL );
   
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         if ( (tag = ber_skip_tag( ber, &len )) == LBER_DEFAULT ) {          if ( (tag = ber_skip_tag( ber, &len )) == LBER_DEFAULT ) {
                 *bv = NULL;                  *bv = NULL;
Line 356  ber_get_bitstringa( Line 363  ber_get_bitstringa(
         assert( buf != NULL );          assert( buf != NULL );
         assert( blen != NULL );          assert( blen != NULL );
   
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         if ( (tag = ber_skip_tag( ber, &datalen )) == LBER_DEFAULT ) {          if ( (tag = ber_skip_tag( ber, &datalen )) == LBER_DEFAULT ) {
                 *buf = NULL;                  *buf = NULL;
Line 391  ber_get_null( BerElement *ber ) Line 398  ber_get_null( BerElement *ber )
         ber_tag_t       tag;          ber_tag_t       tag;
   
         assert( ber != NULL );          assert( ber != NULL );
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         if ( (tag = ber_skip_tag( ber, &len )) == LBER_DEFAULT ) {          if ( (tag = ber_skip_tag( ber, &len )) == LBER_DEFAULT ) {
                 return LBER_DEFAULT;                  return LBER_DEFAULT;
Line 415  ber_get_boolean( Line 422  ber_get_boolean(
         assert( ber != NULL );          assert( ber != NULL );
         assert( boolval != NULL );          assert( boolval != NULL );
   
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         rc = ber_get_int( ber, &longbool );          rc = ber_get_int( ber, &longbool );
         *boolval = longbool;          *boolval = longbool;
Line 458  ber_next_element( Line 465  ber_next_element(
         assert( len != NULL );          assert( len != NULL );
         assert( last != NULL );          assert( last != NULL );
   
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         if ( ber->ber_ptr == last ) {          if ( ber->ber_ptr == last ) {
                 return LBER_DEFAULT;                  return LBER_DEFAULT;
Line 477  ber_scanf ( BerElement *ber, Line 484  ber_scanf ( BerElement *ber,
         LDAP_CONST char         *fmt_reset;          LDAP_CONST char         *fmt_reset;
         char            *last;          char            *last;
         char            *s, **ss, ***sss;          char            *s, **ss, ***sss;
         struct berval   ***bv, **bvp, *bval;          struct berval   ***bv, **bvp, *bval;
         ber_int_t       *i;          ber_int_t       *i;
         int j;          int j;
         ber_len_t       *l;          ber_len_t       *l;
Line 490  ber_scanf ( BerElement *ber, Line 497  ber_scanf ( BerElement *ber,
         assert( ber != NULL );          assert( ber != NULL );
         assert( fmt != NULL );          assert( fmt != NULL );
   
         assert( BER_VALID( ber ) );          assert( LBER_VALID( ber ) );
   
         fmt_reset = fmt;          fmt_reset = fmt;
   
   #ifdef NEW_LOGGING
           LDAP_LOG(( "liblber", LDAP_LEVEL_ENTRY, "ber_scanf fmt (%s) ber:\n", fmt ));
           BER_DUMP(( "liblber", LDAP_LEVEL_DETAIL2, ber, 1 ));
   #else
         ber_log_printf( LDAP_DEBUG_TRACE, ber->ber_debug,          ber_log_printf( LDAP_DEBUG_TRACE, ber->ber_debug,
                 "ber_scanf fmt (%s) ber:\n", fmt );                  "ber_scanf fmt (%s) ber:\n", fmt );
         ber_log_dump( LDAP_DEBUG_BER, ber->ber_debug, ber, 1 );          ber_log_dump( LDAP_DEBUG_BER, ber->ber_debug, ber, 1 );
   #endif
   
         for ( rc = 0; *fmt && rc != LBER_DEFAULT; fmt++ ) {          for ( rc = 0; *fmt && rc != LBER_DEFAULT; fmt++ ) {
                 /* When this is modified, remember to update                  /* When this is modified, remember to update
Line 578  ber_scanf ( BerElement *ber, Line 590  ber_scanf ( BerElement *ber,
                             tag != LBER_DEFAULT && rc != LBER_DEFAULT;                              tag != LBER_DEFAULT && rc != LBER_DEFAULT;
                             tag = ber_next_element( ber, &len, last ) )                              tag = ber_next_element( ber, &len, last ) )
                         {                          {
                                   void *save = *sss;
   
                                 *sss = (char **) LBER_REALLOC( *sss,                                  *sss = (char **) LBER_REALLOC( *sss,
                                         (j + 2) * sizeof(char *) );                                          (j + 2) * sizeof(char *) );
   
                                   if( *sss == NULL ) {
                                           LBER_FREE( save );
                                           rc = LBER_DEFAULT;
                                           goto breakout;
                                   }
   
                                 rc = ber_get_stringa( ber, &((*sss)[j]) );                                  rc = ber_get_stringa( ber, &((*sss)[j]) );
                                 j++;                                  j++;
                         }                          }
Line 596  ber_scanf ( BerElement *ber, Line 616  ber_scanf ( BerElement *ber,
                             tag != LBER_DEFAULT && rc != LBER_DEFAULT;                              tag != LBER_DEFAULT && rc != LBER_DEFAULT;
                             tag = ber_next_element( ber, &len, last ) )                              tag = ber_next_element( ber, &len, last ) )
                         {                          {
                                   void *save = *bv;
   
                                 *bv = (struct berval **) LBER_REALLOC( *bv,                                  *bv = (struct berval **) LBER_REALLOC( *bv,
                                         (j + 2) * sizeof(struct berval *) );                                          (j + 2) * sizeof(struct berval *) );
                                   
                                   if( *bv == NULL ) {
                                           LBER_FREE( save );
                                           rc = LBER_DEFAULT;
                                           goto breakout;
                                   }
   
                                 rc = ber_get_stringal( ber, &((*bv)[j]) );                                  rc = ber_get_stringal( ber, &((*bv)[j]) );
                                 j++;                                  j++;
                         }                          }
Line 624  ber_scanf ( BerElement *ber, Line 652  ber_scanf ( BerElement *ber,
   
                 default:                  default:
                         if( ber->ber_debug ) {                          if( ber->ber_debug ) {
   #ifdef NEW_LOGGING
                                   LDAP_LOG(( "liblber", LDAP_LEVEL_ERR,
                                              "ber_scanf: unknown fmt %c\n", *fmt ));
   #else
                                 ber_log_printf( LDAP_DEBUG_ANY, ber->ber_debug,                                  ber_log_printf( LDAP_DEBUG_ANY, ber->ber_debug,
                                         "ber_scanf: unknown fmt %c\n", *fmt );                                          "ber_scanf: unknown fmt %c\n", *fmt );
   #endif
                         }                          }
                         rc = LBER_DEFAULT;                          rc = LBER_DEFAULT;
                         break;                          break;
                 }                  }
         }          }
   
   breakout:
         va_end( ap );          va_end( ap );
   
         if ( rc == LBER_DEFAULT ) {          if ( rc == LBER_DEFAULT ) {
Line 710  ber_scanf ( BerElement *ber, Line 744  ber_scanf ( BerElement *ber,
                 case 'v':       /* sequence of strings */                  case 'v':       /* sequence of strings */
                         sss = va_arg( ap, char *** );                          sss = va_arg( ap, char *** );
                         if ( *sss ) {                          if ( *sss ) {
                                 for (j = 0;  (*sss)[j];  j++) {                                  for (j = 0;  (*sss)[j];  j++) {
                                         LBER_FREE( (*sss)[j] );                                          LBER_FREE( (*sss)[j] );
                                         (*sss)[j] = NULL;                                          (*sss)[j] = NULL;
                                 }                                  }

Removed from v.1.34.6.6  
changed lines
  Added in v.1.63


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