usr/src/lib/libldap5/sources/ldap/common/getattr.c

   1 /*
   2  * Copyright (c) 2001 by Sun Microsystems, Inc.
   3  * All rights reserved.
   4  */
   5
   6 #pragma ident   "%Z%%M% %I%     %E% SMI"
   7
   8 /*
   9  * The contents of this file are subject to the Netscape Public
  10  * License Version 1.1 (the "License"); you may not use this file
  11  * except in compliance with the License. You may obtain a copy of
  12  * the License at http://www.mozilla.org/NPL/
  13  *
  14  * Software distributed under the License is distributed on an "AS
  15  * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
  16  * implied. See the License for the specific language governing
  17  * rights and limitations under the License.
  18  *
  19  * The Original Code is Mozilla Communicator client code, released
  20  * March 31, 1998.
  21  *
  22  * The Initial Developer of the Original Code is Netscape
  23  * Communications Corporation. Portions created by Netscape are
  24  * Copyright (C) 1998-1999 Netscape Communications Corporation. All
  25  * Rights Reserved.
  26  *
  27  * Contributor(s):
  28  */
  29 /*
  30  *  Copyright (c) 1990 Regents of the University of Michigan.
  31  *  All rights reserved.
  32  */
  33 /*
  34  *  getattr.c
  35  */
  36
  37 #if 0
  38 #ifndef lint
  39 static char copyright[] = "@(#) Copyright (c) 1990 Regents of the University of Michigan.\nAll rights reserved.\n";
  40 #endif
  41 #endif
  42
  43 #include "ldap-int.h"
  44
  45
  46 static ber_len_t
  47 bytes_remaining( BerElement *ber )
  48 {
  49         ber_len_t       len;
  50
  51         if ( ber_get_option( ber, LBER_OPT_REMAINING_BYTES, &len ) != 0 ) {
  52                 return( 0 );    /* not sure what else to do.... */
  53         }
  54         return( len );
  55 }
  56
  57
  58 char *
  59 LDAP_CALL
  60 ldap_first_attribute( LDAP *ld, LDAPMessage *entry, BerElement **ber )
  61 {
  62         char    *attr;
  63         int     err;
  64         ber_int_t       seqlength;
  65
  66         LDAPDebug( LDAP_DEBUG_TRACE, "ldap_first_attribute\n", 0, 0, 0 );
  67
  68         if ( !NSLDAPI_VALID_LDAP_POINTER( ld )) {
  69                 return( NULL );         /* punt */
  70         }
  71
  72         if ( ber == NULL || !NSLDAPI_VALID_LDAPMESSAGE_ENTRY_POINTER( entry )) {
  73                 LDAP_SET_LDERRNO( ld, LDAP_PARAM_ERROR, NULL, NULL );
  74                 return( NULL );
  75         }
  76
  77         if ( nsldapi_alloc_ber_with_options( ld, ber ) != LDAP_SUCCESS ) {
  78                 return( NULL );
  79         }
  80
  81         **ber = *entry->lm_ber;
  82
  83         attr = NULL;                    /* pessimistic */
  84         err = LDAP_DECODING_ERROR;      /* ditto */
  85
  86         /*
  87          * Skip past the sequence, dn, and sequence of sequence.
  88          * Reset number of bytes remaining so we confine the rest of our
  89          * decoding to the current sequence.
  90          */
  91         if ( ber_scanf( *ber, "{xl{", &seqlength ) != LBER_ERROR &&
  92              ber_set_option( *ber, LBER_OPT_REMAINING_BYTES, &seqlength )
  93             == 0 ) {
  94                 /* snarf the attribute type, and skip the set of values,
  95                  * leaving us positioned right before the next attribute
  96                  * type/value sequence.
  97                  */
  98                 if ( ber_scanf( *ber, "{ax}", &attr ) != LBER_ERROR ||
  99                     bytes_remaining( *ber ) == 0 ) {
 100                         err = LDAP_SUCCESS;
 101                 }
 102         }
 103
 104         LDAP_SET_LDERRNO( ld, err, NULL, NULL );
 105         if ( attr == NULL || err != LDAP_SUCCESS ) {
 106                 ber_free( *ber, 0 );
 107                 *ber = NULL;
 108         }
 109         return( attr );
 110 }
 111
 112 /* ARGSUSED */
 113 char *
 114 LDAP_CALL
 115 ldap_next_attribute( LDAP *ld, LDAPMessage *entry, BerElement *ber )
 116 {
 117         char    *attr;
 118         int     err;
 119
 120         LDAPDebug( LDAP_DEBUG_TRACE, "ldap_next_attribute\n", 0, 0, 0 );
 121
 122         if ( !NSLDAPI_VALID_LDAP_POINTER( ld )) {
 123                 return( NULL );         /* punt */
 124         }
 125
 126         if ( ber == NULL || !NSLDAPI_VALID_LDAPMESSAGE_ENTRY_POINTER( entry )) {
 127                 LDAP_SET_LDERRNO( ld, LDAP_PARAM_ERROR, NULL, NULL );
 128                 return( NULL );
 129         }
 130
 131         attr = NULL;                    /* pessimistic */
 132         err = LDAP_DECODING_ERROR;      /* ditto */
 133
 134         /* skip sequence, snarf attribute type, skip values */
 135         if ( ber_scanf( ber, "{ax}", &attr ) != LBER_ERROR ||
 136             bytes_remaining( ber ) == 0 ) {
 137                 err = LDAP_SUCCESS;
 138         }
 139
 140         LDAP_SET_LDERRNO( ld, err, NULL, NULL );
 141         return( attr );
 142 }