]> git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/monitor.c
ITS#6242
[openldap] / servers / slapd / back-bdb / monitor.c
1 /* monitor.c - monitor bdb backend */
2 /* $OpenLDAP$ */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4  *
5  * Copyright 2000-2009 The OpenLDAP Foundation.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted only as authorized by the OpenLDAP
10  * Public License.
11  *
12  * A copy of this license is available in the file LICENSE in the
13  * top-level directory of the distribution or, alternatively, at
14  * <http://www.OpenLDAP.org/license.html>.
15  */
16
17 #include "portable.h"
18
19 #include <stdio.h>
20 #include <ac/string.h>
21 #include <ac/unistd.h>
22 #include <ac/stdlib.h>
23 #include <ac/errno.h>
24 #include <sys/stat.h>
25 #include "lutil.h"
26 #include "back-bdb.h"
27
28 #include "../back-monitor/back-monitor.h"
29
30 #include "config.h"
31
32 static ObjectClass              *oc_olmBDBDatabase;
33
34 static AttributeDescription     *ad_olmBDBEntryCache,
35         *ad_olmBDBDNCache, *ad_olmBDBIDLCache,
36         *ad_olmDbDirectory;
37
38 #ifdef BDB_MONITOR_IDX
39 static int
40 bdb_monitor_idx_entry_add(
41         struct bdb_info *bdb,
42         Entry           *e );
43
44 static AttributeDescription     *ad_olmBDBNotIndexed;
45 #endif /* BDB_MONITOR_IDX */
46
47 /*
48  * NOTE: there's some confusion in monitor OID arc;
49  * by now, let's consider:
50  * 
51  * Subsystems monitor attributes        1.3.6.1.4.1.4203.666.1.55.0
52  * Databases monitor attributes         1.3.6.1.4.1.4203.666.1.55.0.1
53  * BDB database monitor attributes      1.3.6.1.4.1.4203.666.1.55.0.1.1
54  *
55  * Subsystems monitor objectclasses     1.3.6.1.4.1.4203.666.3.16.0
56  * Databases monitor objectclasses      1.3.6.1.4.1.4203.666.3.16.0.1
57  * BDB database monitor objectclasses   1.3.6.1.4.1.4203.666.3.16.0.1.1
58  */
59
60 static struct {
61         char                    *name;
62         char                    *oid;
63 }               s_oid[] = {
64         { "olmBDBAttributes",                   "olmDatabaseAttributes:1" },
65         { "olmBDBObjectClasses",                "olmDatabaseObjectClasses:1" },
66
67         { NULL }
68 };
69
70 static struct {
71         char                    *desc;
72         AttributeDescription    **ad;
73 }               s_at[] = {
74         { "( olmBDBAttributes:1 "
75                 "NAME ( 'olmBDBEntryCache' ) "
76                 "DESC 'Number of items in Entry Cache' "
77                 "SUP monitorCounter "
78                 "NO-USER-MODIFICATION "
79                 "USAGE dSAOperation )",
80                 &ad_olmBDBEntryCache },
81
82         { "( olmBDBAttributes:2 "
83                 "NAME ( 'olmBDBDNCache' ) "
84                 "DESC 'Number of items in DN Cache' "
85                 "SUP monitorCounter "
86                 "NO-USER-MODIFICATION "
87                 "USAGE dSAOperation )",
88                 &ad_olmBDBDNCache },
89
90         { "( olmBDBAttributes:3 "
91                 "NAME ( 'olmBDBIDLCache' ) "
92                 "DESC 'Number of items in IDL Cache' "
93                 "SUP monitorCounter "
94                 "NO-USER-MODIFICATION "
95                 "USAGE dSAOperation )",
96                 &ad_olmBDBIDLCache },
97
98         { "( olmBDBAttributes:4 "
99                 "NAME ( 'olmDbDirectory' ) "
100                 "DESC 'Path name of the directory "
101                         "where the database environment resides' "
102                 "SUP monitoredInfo "
103                 "NO-USER-MODIFICATION "
104                 "USAGE dSAOperation )",
105                 &ad_olmDbDirectory },
106
107 #ifdef BDB_MONITOR_IDX
108         { "( olmBDBAttributes:5 "
109                 "NAME ( 'olmBDBNotIndexed' ) "
110                 "DESC 'Missing indexes resulting from candidate selection' "
111                 "SUP monitoredInfo "
112                 "NO-USER-MODIFICATION "
113                 "USAGE dSAOperation )",
114                 &ad_olmBDBNotIndexed },
115 #endif /* BDB_MONITOR_IDX */
116
117         { NULL }
118 };
119
120 static struct {
121         char            *desc;
122         ObjectClass     **oc;
123 }               s_oc[] = {
124         /* augments an existing object, so it must be AUXILIARY
125          * FIXME: derive from some ABSTRACT "monitoredEntity"? */
126         { "( olmBDBObjectClasses:1 "
127                 "NAME ( 'olmBDBDatabase' ) "
128                 "SUP top AUXILIARY "
129                 "MAY ( "
130                         "olmBDBEntryCache "
131                         "$ olmBDBDNCache "
132                         "$ olmBDBIDLCache "
133                         "$ olmDbDirectory "
134 #ifdef BDB_MONITOR_IDX
135                         "$ olmBDBNotIndexed "
136 #endif /* BDB_MONITOR_IDX */
137                         ") )",
138                 &oc_olmBDBDatabase },
139
140         { NULL }
141 };
142
143 static int
144 bdb_monitor_update(
145         Operation       *op,
146         SlapReply       *rs,
147         Entry           *e,
148         void            *priv )
149 {
150         struct bdb_info         *bdb = (struct bdb_info *) priv;
151         Attribute               *a;
152
153         char                    buf[ BUFSIZ ];
154         struct berval           bv;
155
156         assert( ad_olmBDBEntryCache != NULL );
157
158         a = attr_find( e->e_attrs, ad_olmBDBEntryCache );
159         assert( a != NULL );
160         bv.bv_val = buf;
161         bv.bv_len = snprintf( buf, sizeof( buf ), "%lu", bdb->bi_cache.c_cursize );
162         ber_bvreplace( &a->a_vals[ 0 ], &bv );
163
164         a = attr_find( e->e_attrs, ad_olmBDBDNCache );
165         assert( a != NULL );
166         bv.bv_len = snprintf( buf, sizeof( buf ), "%lu", bdb->bi_cache.c_eiused );
167         ber_bvreplace( &a->a_vals[ 0 ], &bv );
168
169         a = attr_find( e->e_attrs, ad_olmBDBIDLCache );
170         assert( a != NULL );
171         bv.bv_len = snprintf( buf, sizeof( buf ), "%lu", bdb->bi_idl_cache_size );
172         ber_bvreplace( &a->a_vals[ 0 ], &bv );
173         
174 #ifdef BDB_MONITOR_IDX
175         bdb_monitor_idx_entry_add( bdb, e );
176 #endif /* BDB_MONITOR_IDX */
177
178         return SLAP_CB_CONTINUE;
179 }
180
181 #if 0   /* uncomment if required */
182 static int
183 bdb_monitor_modify(
184         Operation       *op,
185         SlapReply       *rs,
186         Entry           *e,
187         void            *priv )
188 {
189         return SLAP_CB_CONTINUE;
190 }
191 #endif
192
193 static int
194 bdb_monitor_free(
195         Entry           *e,
196         void            **priv )
197 {
198         struct berval   values[ 2 ];
199         Modification    mod = { 0 };
200
201         const char      *text;
202         char            textbuf[ SLAP_TEXT_BUFLEN ];
203
204         int             i, rc;
205
206         /* NOTE: if slap_shutdown != 0, priv might have already been freed */
207         *priv = NULL;
208
209         /* Remove objectClass */
210         mod.sm_op = LDAP_MOD_DELETE;
211         mod.sm_desc = slap_schema.si_ad_objectClass;
212         mod.sm_values = values;
213         mod.sm_numvals = 1;
214         values[ 0 ] = oc_olmBDBDatabase->soc_cname;
215         BER_BVZERO( &values[ 1 ] );
216
217         rc = modify_delete_values( e, &mod, 1, &text,
218                 textbuf, sizeof( textbuf ) );
219         /* don't care too much about return code... */
220
221         /* remove attrs */
222         mod.sm_values = NULL;
223         mod.sm_numvals = 0;
224         for ( i = 0; s_at[ i ].desc != NULL; i++ ) {
225                 mod.sm_desc = *s_at[ i ].ad;
226                 rc = modify_delete_values( e, &mod, 1, &text,
227                         textbuf, sizeof( textbuf ) );
228                 /* don't care too much about return code... */
229         }
230         
231         return SLAP_CB_CONTINUE;
232 }
233
234 #define bdb_monitor_initialize  BDB_SYMBOL(monitor_initialize)
235
236 /*
237  * call from within bdb_initialize()
238  */
239 static int
240 bdb_monitor_initialize( void )
241 {
242         int             i, code;
243         ConfigArgs c;
244         char    *argv[ 3 ];
245
246         static int      bdb_monitor_initialized = 0;
247
248         if ( backend_info( "monitor" ) == NULL ) {
249                 return -1;
250         }
251
252         if ( bdb_monitor_initialized++ ) {
253                 return 0;
254         }
255
256         /* register schema here */
257
258         argv[ 0 ] = "back-bdb/back-hdb monitor";
259         c.argv = argv;
260         c.argc = 3;
261         c.fname = argv[0];
262
263         for ( i = 0; s_oid[ i ].name; i++ ) {
264                 c.lineno = i;
265                 argv[ 1 ] = s_oid[ i ].name;
266                 argv[ 2 ] = s_oid[ i ].oid;
267
268                 if ( parse_oidm( &c, 0, NULL ) != 0 ) {
269                         Debug( LDAP_DEBUG_ANY, LDAP_XSTRING(bdb_monitor_initialize)
270                                 ": unable to add "
271                                 "objectIdentifier \"%s=%s\"\n",
272                                 s_oid[ i ].name, s_oid[ i ].oid, 0 );
273                         return 1;
274                 }
275         }
276
277         for ( i = 0; s_at[ i ].desc != NULL; i++ ) {
278                 code = register_at( s_at[ i ].desc, s_at[ i ].ad, 1 );
279                 if ( code != LDAP_SUCCESS ) {
280                         Debug( LDAP_DEBUG_ANY, LDAP_XSTRING(bdb_monitor_initialize)
281                                 ": register_at failed\n",
282                                 0, 0, 0 );
283                 }
284                 (*s_at[ i ].ad)->ad_type->sat_flags |= SLAP_AT_HIDE;
285         }
286
287         for ( i = 0; s_oc[ i ].desc != NULL; i++ ) {
288                 code = register_oc( s_oc[ i ].desc, s_oc[ i ].oc, 1 );
289                 if ( code != LDAP_SUCCESS ) {
290                         Debug( LDAP_DEBUG_ANY, LDAP_XSTRING(bdb_monitor_initialize)
291                                 ": register_oc failed\n",
292                                 0, 0, 0 );
293                 }
294                 (*s_oc[ i ].oc)->soc_flags |= SLAP_OC_HIDE;
295         }
296
297         return 0;
298 }
299
300 /*
301  * call from within bdb_db_init()
302  */
303 int
304 bdb_monitor_db_init( BackendDB *be )
305 {
306         struct bdb_info         *bdb = (struct bdb_info *) be->be_private;
307
308         if ( bdb_monitor_initialize() == LDAP_SUCCESS ) {
309                 /* monitoring in back-bdb is on by default */
310                 SLAP_DBFLAGS( be ) |= SLAP_DBFLAG_MONITORING;
311         }
312
313 #ifdef BDB_MONITOR_IDX
314         bdb->bi_idx = NULL;
315         ldap_pvt_thread_mutex_init( &bdb->bi_idx_mutex );
316 #endif /* BDB_MONITOR_IDX */
317
318         return 0;
319 }
320
321 /*
322  * call from within bdb_db_open()
323  */
324 int
325 bdb_monitor_db_open( BackendDB *be )
326 {
327         struct bdb_info         *bdb = (struct bdb_info *) be->be_private;
328         Attribute               *a, *next;
329         monitor_callback_t      *cb = NULL;
330         int                     rc = 0;
331         BackendInfo             *mi;
332         monitor_extra_t         *mbe;
333         struct berval dummy = BER_BVC("");
334
335         if ( !SLAP_DBMONITORING( be ) ) {
336                 return 0;
337         }
338
339         mi = backend_info( "monitor" );
340         if ( !mi || !mi->bi_extra ) {
341                 SLAP_DBFLAGS( be ) ^= SLAP_DBFLAG_MONITORING;
342                 return 0;
343         }
344         mbe = mi->bi_extra;
345
346         /* don't bother if monitor is not configured */
347         if ( !mbe->is_configured() ) {
348                 static int warning = 0;
349
350                 if ( warning++ == 0 ) {
351                         Debug( LDAP_DEBUG_ANY, LDAP_XSTRING(bdb_monitor_db_open)
352                                 ": monitoring disabled; "
353                                 "configure monitor database to enable\n",
354                                 0, 0, 0 );
355                 }
356
357                 return 0;
358         }
359
360         /* alloc as many as required (plus 1 for objectClass) */
361         a = attrs_alloc( 1 + 4 );
362         if ( a == NULL ) {
363                 rc = 1;
364                 goto cleanup;
365         }
366
367         a->a_desc = slap_schema.si_ad_objectClass;
368         attr_valadd( a, &oc_olmBDBDatabase->soc_cname, NULL, 1 );
369         next = a->a_next;
370
371         {
372                 struct berval   bv = BER_BVC( "0" );
373
374                 next->a_desc = ad_olmBDBEntryCache;
375                 attr_valadd( next, &bv, NULL, 1 );
376                 next = next->a_next;
377
378                 next->a_desc = ad_olmBDBDNCache;
379                 attr_valadd( next, &bv, NULL, 1 );
380                 next = next->a_next;
381
382                 next->a_desc = ad_olmBDBIDLCache;
383                 attr_valadd( next, &bv, NULL, 1 );
384                 next = next->a_next;
385         }
386
387         {
388                 struct berval   bv, nbv;
389                 ber_len_t       pathlen = 0, len = 0;
390                 char            path[ MAXPATHLEN ] = { '\0' };
391                 char            *fname = bdb->bi_dbenv_home,
392                                 *ptr;
393
394                 len = strlen( fname );
395                 if ( fname[ 0 ] != '/' ) {
396                         /* get full path name */
397                         getcwd( path, sizeof( path ) );
398                         pathlen = strlen( path );
399
400                         if ( fname[ 0 ] == '.' && fname[ 1 ] == '/' ) {
401                                 fname += 2;
402                                 len -= 2;
403                         }
404                 }
405
406                 bv.bv_len = pathlen + STRLENOF( "/" ) + len;
407                 ptr = bv.bv_val = ch_malloc( bv.bv_len + STRLENOF( "/" ) + 1 );
408                 if ( pathlen ) {
409                         ptr = lutil_strncopy( ptr, path, pathlen );
410                         ptr[ 0 ] = '/';
411                         ptr++;
412                 }
413                 ptr = lutil_strncopy( ptr, fname, len );
414                 if ( ptr[ -1 ] != '/' ) {
415                         ptr[ 0 ] = '/';
416                         ptr++;
417                 }
418                 ptr[ 0 ] = '\0';
419                 
420                 attr_normalize_one( ad_olmDbDirectory, &bv, &nbv, NULL );
421
422                 next->a_desc = ad_olmDbDirectory;
423                 next->a_vals = ch_calloc( sizeof( struct berval ), 2 );
424                 next->a_vals[ 0 ] = bv;
425                 next->a_numvals = 1;
426
427                 if ( BER_BVISNULL( &nbv ) ) {
428                         next->a_nvals = next->a_vals;
429
430                 } else {
431                         next->a_nvals = ch_calloc( sizeof( struct berval ), 2 );
432                         next->a_nvals[ 0 ] = nbv;
433                 }
434
435                 next = next->a_next;
436         }
437
438         cb = ch_calloc( sizeof( monitor_callback_t ), 1 );
439         cb->mc_update = bdb_monitor_update;
440 #if 0   /* uncomment if required */
441         cb->mc_modify = bdb_monitor_modify;
442 #endif
443         cb->mc_free = bdb_monitor_free;
444         cb->mc_private = (void *)bdb;
445
446         /* make sure the database is registered; then add monitor attributes */
447         rc = mbe->register_database( be, &bdb->bi_monitor.bdm_ndn );
448         if ( rc == 0 ) {
449                 rc = mbe->register_entry_attrs( &bdb->bi_monitor.bdm_ndn, a, cb,
450                         &dummy, 0, &dummy );
451         }
452
453 cleanup:;
454         if ( rc != 0 ) {
455                 if ( cb != NULL ) {
456                         ch_free( cb );
457                         cb = NULL;
458                 }
459
460                 if ( a != NULL ) {
461                         attrs_free( a );
462                         a = NULL;
463                 }
464         }
465
466         /* store for cleanup */
467         bdb->bi_monitor.bdm_cb = (void *)cb;
468
469         /* we don't need to keep track of the attributes, because
470          * bdb_monitor_free() takes care of everything */
471         if ( a != NULL ) {
472                 attrs_free( a );
473         }
474
475         return rc;
476 }
477
478 /*
479  * call from within bdb_db_close()
480  */
481 int
482 bdb_monitor_db_close( BackendDB *be )
483 {
484         struct bdb_info         *bdb = (struct bdb_info *) be->be_private;
485
486         if ( !BER_BVISNULL( &bdb->bi_monitor.bdm_ndn ) ) {
487                 BackendInfo             *mi = backend_info( "monitor" );
488                 monitor_extra_t         *mbe;
489
490                 if ( mi && &mi->bi_extra ) {
491                         mbe = mi->bi_extra;
492                         mbe->unregister_entry_callback( &bdb->bi_monitor.bdm_ndn,
493                                 (monitor_callback_t *)bdb->bi_monitor.bdm_cb,
494                                 NULL, 0, NULL );
495                 }
496
497                 memset( &bdb->bi_monitor, 0, sizeof( bdb->bi_monitor ) );
498         }
499
500         return 0;
501 }
502
503 /*
504  * call from within bdb_db_destroy()
505  */
506 int
507 bdb_monitor_db_destroy( BackendDB *be )
508 {
509 #ifdef BDB_MONITOR_IDX
510         struct bdb_info         *bdb = (struct bdb_info *) be->be_private;
511
512         /* TODO: free tree */
513         ldap_pvt_thread_mutex_destroy( &bdb->bi_idx_mutex );
514         avl_free( bdb->bi_idx, ch_free );
515 #endif /* BDB_MONITOR_IDX */
516
517         return 0;
518 }
519
520 #ifdef BDB_MONITOR_IDX
521
522 #define BDB_MONITOR_IDX_TYPES   (4)
523
524 typedef struct monitor_idx_t monitor_idx_t;
525
526 struct monitor_idx_t {
527         AttributeDescription    *idx_ad;
528         unsigned long           idx_count[BDB_MONITOR_IDX_TYPES];
529 };
530
531 static int
532 bdb_monitor_bitmask2key( slap_mask_t bitmask )
533 {
534         int     key;
535
536         for ( key = 0; key < 8 * (int)sizeof(slap_mask_t) && !( bitmask & 0x1U );
537                         key++ )
538                 bitmask >>= 1;
539
540         return key;
541 }
542
543 static struct berval idxbv[] = {
544         BER_BVC( "present=" ),
545         BER_BVC( "equality=" ),
546         BER_BVC( "approx=" ),
547         BER_BVC( "substr=" ),
548         BER_BVNULL
549 };
550
551 static ber_len_t
552 bdb_monitor_idx2len( monitor_idx_t *idx )
553 {
554         int             i;
555         ber_len_t       len = 0;
556
557         for ( i = 0; i < BDB_MONITOR_IDX_TYPES; i++ ) {
558                 if ( idx->idx_count[ i ] != 0 ) {
559                         len += idxbv[i].bv_len;
560                 }
561         }
562
563         return len;
564 }
565
566 static int
567 monitor_idx_cmp( const void *p1, const void *p2 )
568 {
569         const monitor_idx_t     *idx1 = (const monitor_idx_t *)p1;
570         const monitor_idx_t     *idx2 = (const monitor_idx_t *)p2;
571
572         return SLAP_PTRCMP( idx1->idx_ad, idx2->idx_ad );
573 }
574
575 static int
576 monitor_idx_dup( void *p1, void *p2 )
577 {
578         monitor_idx_t   *idx1 = (monitor_idx_t *)p1;
579         monitor_idx_t   *idx2 = (monitor_idx_t *)p2;
580
581         return SLAP_PTRCMP( idx1->idx_ad, idx2->idx_ad ) == 0 ? -1 : 0;
582 }
583
584 int
585 bdb_monitor_idx_add(
586         struct bdb_info         *bdb,
587         AttributeDescription    *desc,
588         slap_mask_t             type )
589 {
590         monitor_idx_t           idx_dummy = { 0 },
591                                 *idx;
592         int                     rc = 0, key;
593
594         idx_dummy.idx_ad = desc;
595         key = bdb_monitor_bitmask2key( type ) - 1;
596         if ( key >= BDB_MONITOR_IDX_TYPES ) {
597                 /* invalid index type */
598                 return -1;
599         }
600
601         ldap_pvt_thread_mutex_lock( &bdb->bi_idx_mutex );
602
603         idx = (monitor_idx_t *)avl_find( bdb->bi_idx,
604                 (caddr_t)&idx_dummy, monitor_idx_cmp );
605         if ( idx == NULL ) {
606                 idx = (monitor_idx_t *)ch_calloc( sizeof( monitor_idx_t ), 1 );
607                 idx->idx_ad = desc;
608                 idx->idx_count[ key ] = 1;
609
610                 switch ( avl_insert( &bdb->bi_idx, (caddr_t)idx, 
611                         monitor_idx_cmp, monitor_idx_dup ) )
612                 {
613                 case 0:
614                         break;
615
616                 default:
617                         ch_free( idx );
618                         rc = -1;
619                 }
620
621         } else {
622                 idx->idx_count[ key ]++;
623         }
624
625         ldap_pvt_thread_mutex_unlock( &bdb->bi_idx_mutex );
626
627         return rc;
628 }
629
630 static int
631 bdb_monitor_idx_apply( void *v_idx, void *v_valp )
632 {
633         monitor_idx_t   *idx = (monitor_idx_t *)v_idx;
634         BerVarray       *valp = (BerVarray *)v_valp;
635
636         struct berval   bv;
637         char            *ptr;
638         char            count_buf[ BDB_MONITOR_IDX_TYPES ][ SLAP_TEXT_BUFLEN ];
639         ber_len_t       count_len[ BDB_MONITOR_IDX_TYPES ],
640                         idx_len;
641         int             i, num = 0;
642
643         idx_len = bdb_monitor_idx2len( idx );
644
645         bv.bv_len = 0;
646         for ( i = 0; i < BDB_MONITOR_IDX_TYPES; i++ ) {
647                 if ( idx->idx_count[ i ] == 0 ) {
648                         continue;
649                 }
650
651                 count_len[ i ] = snprintf( count_buf[ i ],
652                         sizeof( count_buf[ i ] ), "%lu", idx->idx_count[ i ] );
653                 bv.bv_len += count_len[ i ];
654                 num++;
655         }
656
657         bv.bv_len += idx->idx_ad->ad_cname.bv_len
658                 + num
659                 + idx_len;
660         ptr = bv.bv_val = ch_malloc( bv.bv_len + 1 );
661         ptr = lutil_strcopy( ptr, idx->idx_ad->ad_cname.bv_val );
662         for ( i = 0; i < BDB_MONITOR_IDX_TYPES; i++ ) {
663                 if ( idx->idx_count[ i ] == 0 ) {
664                         continue;
665                 }
666
667                 ptr[ 0 ] = '#';
668                 ++ptr;
669                 ptr = lutil_strcopy( ptr, idxbv[ i ].bv_val );
670                 ptr = lutil_strcopy( ptr, count_buf[ i ] );
671         }
672
673         ber_bvarray_add( valp, &bv );
674
675         return 0;
676 }
677
678 static int
679 bdb_monitor_idx_entry_add(
680         struct bdb_info *bdb,
681         Entry           *e )
682 {
683         BerVarray       vals = NULL;
684         Attribute       *a;
685
686         a = attr_find( e->e_attrs, ad_olmBDBNotIndexed );
687
688         ldap_pvt_thread_mutex_lock( &bdb->bi_idx_mutex );
689
690         avl_apply( bdb->bi_idx, bdb_monitor_idx_apply,
691                 &vals, -1, AVL_INORDER );
692
693         ldap_pvt_thread_mutex_unlock( &bdb->bi_idx_mutex );
694
695         if ( vals != NULL ) {
696                 if ( a != NULL ) {
697                         assert( a->a_nvals == a->a_vals );
698
699                         ber_bvarray_free( a->a_vals );
700
701                 } else {
702                         Attribute       **ap;
703
704                         for ( ap = &e->e_attrs; *ap != NULL; ap = &(*ap)->a_next )
705                                 ;
706                         *ap = attr_alloc( ad_olmBDBNotIndexed );
707                         a = *ap;
708                 }
709                 a->a_vals = vals;
710                 a->a_nvals = a->a_vals;
711         }
712
713         return 0;
714 }
715
716 #endif /* BDB_MONITOR_IDX */