openldap/servers/slapd/attr.c

203 lines
3.1 KiB
C
Raw Normal View History

/* $OpenLDAP$ */
1999-08-07 07:07:46 +08:00
/*
2000-05-13 10:47:56 +08:00
* Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
1999-08-07 07:07:46 +08:00
* COPYING RESTRICTIONS APPLY, see COPYRIGHT file
*/
1998-08-09 08:43:13 +08:00
/* attr.c - routines for dealing with attributes */
1998-10-25 09:41:42 +08:00
#include "portable.h"
1998-08-09 08:43:13 +08:00
#include <stdio.h>
1998-10-25 09:41:42 +08:00
#ifdef HAVE_FCNTL_H
1998-08-09 08:43:13 +08:00
#include <fcntl.h>
1998-10-25 09:41:42 +08:00
#endif
#include <ac/ctype.h>
#include <ac/errno.h>
1998-10-25 09:41:42 +08:00
#include <ac/socket.h>
#include <ac/string.h>
#include <ac/time.h>
#include "ldap_pvt.h"
1998-08-09 08:43:13 +08:00
#include "slap.h"
1999-05-28 22:27:07 +08:00
#ifdef LDAP_DEBUG
static void at_index_print( void );
#endif
1998-08-09 08:43:13 +08:00
void
attr_free( Attribute *a )
{
ber_bvecfree( a->a_vals );
free( a );
}
void
attrs_free( Attribute *a )
{
Attribute *next;
for( ; a != NULL ; a = next ) {
next = a->a_next;
attr_free( a );
}
}
Attribute *attr_dup( Attribute *a )
{
Attribute *tmp;
if( a == NULL) return NULL;
tmp = ch_malloc( sizeof(Attribute) );
if( a->a_vals != NULL ) {
int i;
for( i=0; a->a_vals[i] != NULL; i++ ) {
/* EMPTY */ ;
}
tmp->a_vals = ch_malloc((i+1) * sizeof(struct berval*));
for( i=0; a->a_vals[i] != NULL; i++ ) {
tmp->a_vals[i] = ber_bvdup( a->a_vals[i] );
1999-08-21 06:59:00 +08:00
if( tmp->a_vals[i] == NULL ) break;
}
tmp->a_vals[i] = NULL;
} else {
tmp->a_vals = NULL;
}
tmp->a_desc = a->a_desc;
tmp->a_next = NULL;
return tmp;
}
Attribute *attrs_dup( Attribute *a )
{
Attribute *tmp, **next;
if( a == NULL ) return NULL;
tmp = NULL;
next = &tmp;
for( ; a != NULL ; a = a->a_next ) {
*next = attr_dup( a );
next = &((*next)->a_next);
}
*next = NULL;
return tmp;
}
1998-08-09 08:43:13 +08:00
1998-08-09 08:43:13 +08:00
/*
* attr_merge - merge the given type and value with the list of
* attributes in attrs.
* returns 0 everything went ok
* -1 trouble
*/
int
attr_merge(
2000-06-16 06:53:18 +08:00
Entry *e,
AttributeDescription *desc,
2000-06-16 06:53:18 +08:00
struct berval **vals )
1998-08-09 08:43:13 +08:00
{
Attribute **a;
for ( a = &e->e_attrs; *a != NULL; a = &(*a)->a_next ) {
if ( ad_cmp( (*a)->a_desc, desc ) == 0 )
{
1998-08-09 08:43:13 +08:00
break;
}
}
if ( *a == NULL ) {
*a = (Attribute *) ch_malloc( sizeof(Attribute) );
(*a)->a_desc = desc;
(*a)->a_vals = NULL;
1998-08-09 08:43:13 +08:00
(*a)->a_next = NULL;
}
return( value_add( &(*a)->a_vals, vals ) );
}
/*
* attrs_find - find attribute(s) by AttributeDescription
* returns next attribute which is subtype of provided description.
*/
Attribute *
attrs_find(
Attribute *a,
AttributeDescription *desc
)
{
for ( ; a != NULL; a = a->a_next ) {
if ( is_ad_subtype( a->a_desc, desc ) ) {
return( a );
}
}
return( NULL );
}
1998-08-09 08:43:13 +08:00
/*
* attr_find - find attribute by type
1998-08-09 08:43:13 +08:00
*/
Attribute *
attr_find(
Attribute *a,
AttributeDescription *desc
1998-08-09 08:43:13 +08:00
)
{
for ( ; a != NULL; a = a->a_next ) {
if ( ad_cmp( a->a_desc, desc ) == 0 )
{
1998-08-09 08:43:13 +08:00
return( a );
}
}
return( NULL );
}
/*
* attr_delete - delete the attribute type in list pointed to by attrs
* return 0 deleted ok
* 1 not found in list a
* -1 something bad happened
*/
int
attr_delete(
Attribute **attrs,
AttributeDescription *desc
1998-08-09 08:43:13 +08:00
)
{
Attribute **a;
for ( a = attrs; *a != NULL; a = &(*a)->a_next ) {
if ( ad_cmp( (*a)->a_desc, desc ) == 0 )
{
Attribute *save = *a;
*a = (*a)->a_next;
attr_free( save );
1998-08-09 08:43:13 +08:00
return LDAP_SUCCESS;
}
1998-08-09 08:43:13 +08:00
}
return LDAP_NO_SUCH_ATTRIBUTE;
1998-08-09 08:43:13 +08:00
}