#ifdef NOTDEF
#ifndef lint
static char copyright[] = "@(#) Copyright (c) 1990 Regents of the University of Michigan.\nAll rights reserved.\n";
#endif
#endif
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <stdlib.h>
#ifdef MACOS
#include <stdlib.h>
#include "macos.h"
#else
#if defined( DOS ) || defined( _WIN32 )
#include <malloc.h>
#include "msdos.h"
#else
#include <sys/types.h>
#include <sys/socket.h>
#endif
#endif
#include "lber.h"
#include "ldap_ldap-int.h"
#include "ldap.h"
char **
ldap_get_values( LDAP *ld, LDAPMessage *entry, char *target )
{
BerElement ber;
char attr[LDAP_MAX_ATTR_LEN];
int found = 0;
long len;
char **vals;
Debug( LDAP_DEBUG_TRACE, "ldap_get_values\n", 0, 0, 0 );
ber = *entry->lm_ber;
len = sizeof(attr);
if ( ber_scanf( &ber, "{x{{s", attr, &len ) == LBER_ERROR ) {
ld->ld_errno = LDAP_DECODING_ERROR;
return( NULL );
}
if ( strcasecmp( target, attr ) == 0 )
found = 1;
while ( ! found ) {
len = sizeof(attr);
if ( ber_scanf( &ber, "x}{s", attr, &len ) == LBER_ERROR ) {
ld->ld_errno = LDAP_DECODING_ERROR;
return( NULL );
}
if ( strcasecmp( target, attr ) == 0 )
break;
}
if ( ber_scanf( &ber, "[v]", &vals ) == LBER_ERROR ) {
ld->ld_errno = LDAP_DECODING_ERROR;
return( NULL );
}
return( vals );
}
struct berval **
ldap_get_values_len( LDAP *ld, LDAPMessage *entry, char *target )
{
BerElement ber;
char attr[LDAP_MAX_ATTR_LEN];
int found = 0;
long len;
struct berval **vals;
Debug( LDAP_DEBUG_TRACE, "ldap_get_values_len\n", 0, 0, 0 );
ber = *entry->lm_ber;
len = sizeof(attr);
if ( ber_scanf( &ber, "{x{{s", attr, &len ) == LBER_ERROR ) {
ld->ld_errno = LDAP_DECODING_ERROR;
return( NULL );
}
if ( strcasecmp( target, attr ) == 0 )
found = 1;
while ( ! found ) {
len = sizeof(attr);
if ( ber_scanf( &ber, "x}{s", attr, &len ) == LBER_ERROR ) {
ld->ld_errno = LDAP_DECODING_ERROR;
return( NULL );
}
if ( strcasecmp( target, attr ) == 0 )
break;
}
if ( ber_scanf( &ber, "[V]", &vals ) == LBER_ERROR ) {
ld->ld_errno = LDAP_DECODING_ERROR;
return( NULL );
}
return( vals );
}
int
ldap_count_values( char **vals )
{
int i;
if ( vals == NULL )
return( 0 );
for ( i = 0; vals[i] != NULL; i++ )
;
return( i );
}
int
ldap_count_values_len( struct berval **vals )
{
return( ldap_count_values( (char **) vals ) );
}
void
ldap_value_free( char **vals )
{
int i;
if ( vals == NULL )
return;
for ( i = 0; vals[i] != NULL; i++ )
free( vals[i] );
free( (char *) vals );
}
void
ldap_value_free_len( struct berval **vals )
{
int i;
if ( vals == NULL )
return;
for ( i = 0; vals[i] != NULL; i++ ) {
free( vals[i]->bv_val );
free( vals[i] );
}
free( (char *) vals );
}