1 /* lastmod.c - returns last modification info */
2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4 * Copyright 2004 The OpenLDAP Foundation.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted only as authorized by the OpenLDAP
11 * A copy of this license is available in the file LICENSE in the
12 * top-level directory of the distribution or, alternatively, at
13 * <http://www.OpenLDAP.org/license.html>.
16 * This work was initially developed by Pierangelo Masarati for inclusion in
22 #ifdef SLAPD_OVER_LASTMOD
26 #include <ac/string.h>
27 #include <ac/socket.h>
32 typedef struct lastmod_info_t {
33 struct berval lmi_rdnvalue;
35 ldap_pvt_thread_mutex_t lmi_entry_mutex;
39 struct lastmod_schema_t {
40 ObjectClass *lms_oc_lastmod;
41 AttributeDescription *lms_ad_lastmodDN;
42 AttributeDescription *lms_ad_lastmodType;
43 AttributeDescription *lms_ad_lastmodEnabled;
55 struct berval lastmodType[] = {
71 { "lastmod", "( 1.3.6.1.4.1.4203.666.3.13"
73 "DESC 'OpenLDAP per-database last modification monitoring' "
82 ") )", SLAP_OC_OPERATIONAL|SLAP_OC_HIDE,
83 offsetof( struct lastmod_schema_t, lms_oc_lastmod ) },
86 { "lastmodDN", "( 1.3.6.1.4.1.4203.666.1.28"
88 "DESC 'DN of last modification' "
89 "EQUALITY distinguishedNameMatch "
90 "SYNTAX 1.3.6.1.4.1.1466.115.121.1.12 "
91 "NO-USER-MODIFICATION "
92 "USAGE directoryOperation )", SLAP_AT_HIDE,
93 offsetof( struct lastmod_schema_t, lms_ad_lastmodDN ) },
94 { "lastmodType", "( 1.3.6.1.4.1.4203.666.1.29"
96 "DESC 'Type of last modification' "
97 "SYNTAX 1.3.6.1.4.1.1466.115.121.1.15 "
98 "EQUALITY caseIgnoreMatch "
100 "NO-USER-MODIFICATION "
101 "USAGE directoryOperation )", SLAP_AT_HIDE,
102 offsetof( struct lastmod_schema_t, lms_ad_lastmodType ) },
103 { "lastmodEnabled", "( 1.3.6.1.4.1.4203.666.1.30"
104 "NAME 'lastmodEnabled' "
105 "DESC 'Lastmod overlay state' "
106 "SYNTAX 1.3.6.1.4.1.1466.115.121.1.7 "
107 "EQUALITY booleanMatch "
109 offsetof( struct lastmod_schema_t, lms_ad_lastmodEnabled ) },
112 /* FIXME: what about UUID of last modified entry? */
116 lastmod_search( Operation *op, SlapReply *rs )
118 slap_overinst *on = (slap_overinst *)op->o_bd->bd_info;
119 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
122 /* if we get here, it must be a success */
123 rs->sr_err = LDAP_SUCCESS;
125 ldap_pvt_thread_mutex_lock( &lmi->lmi_entry_mutex );
127 rc = test_filter( op, lmi->lmi_e, op->oq_search.rs_filter );
128 if ( rc == LDAP_COMPARE_TRUE ) {
129 rs->sr_attrs = op->ors_attrs;
131 rs->sr_entry = lmi->lmi_e;
132 rs->sr_err = send_search_entry( op, rs );
138 ldap_pvt_thread_mutex_unlock( &lmi->lmi_entry_mutex );
140 send_ldap_result( op, rs );
146 lastmod_compare( Operation *op, SlapReply *rs )
148 slap_overinst *on = (slap_overinst *)op->o_bd->bd_info;
149 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
152 ldap_pvt_thread_mutex_lock( &lmi->lmi_entry_mutex );
154 if ( get_assert( op ) &&
155 ( test_filter( op, lmi->lmi_e, get_assertion( op ) ) != LDAP_COMPARE_TRUE ) )
157 rs->sr_err = LDAP_ASSERTION_FAILED;
161 rs->sr_err = access_allowed( op, lmi->lmi_e, op->oq_compare.rs_ava->aa_desc,
162 &op->oq_compare.rs_ava->aa_value, ACL_COMPARE, NULL );
163 if ( ! rs->sr_err ) {
164 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
168 rs->sr_err = LDAP_NO_SUCH_ATTRIBUTE;
170 for ( a = attr_find( lmi->lmi_e->e_attrs, op->oq_compare.rs_ava->aa_desc );
172 a = attr_find( a->a_next, op->oq_compare.rs_ava->aa_desc ) )
174 rs->sr_err = LDAP_COMPARE_FALSE;
176 if ( value_find_ex( op->oq_compare.rs_ava->aa_desc,
177 SLAP_MR_ATTRIBUTE_VALUE_NORMALIZED_MATCH |
178 SLAP_MR_ASSERTED_VALUE_NORMALIZED_MATCH,
179 a->a_nvals, &op->oq_compare.rs_ava->aa_value, op->o_tmpmemctx ) == 0 )
181 rs->sr_err = LDAP_COMPARE_TRUE;
188 ldap_pvt_thread_mutex_unlock( &lmi->lmi_entry_mutex );
190 send_ldap_result( op, rs );
192 if( rs->sr_err == LDAP_COMPARE_FALSE || rs->sr_err == LDAP_COMPARE_TRUE ) {
193 rs->sr_err = LDAP_SUCCESS;
200 lastmod_exop( Operation *op, SlapReply *rs )
202 slap_overinst *on = (slap_overinst *)op->o_bd->bd_info;
206 op->o_bd->bd_info = (BackendInfo *)on->on_info;
207 rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
208 rs->sr_text = "not allowed within namingContext";
209 send_ldap_result( op, rs );
216 lastmod_modify( Operation *op, SlapReply *rs )
218 slap_overinst *on = (slap_overinst *)op->o_bd->bd_info;
219 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
222 ldap_pvt_thread_mutex_lock( &lmi->lmi_entry_mutex );
224 if ( !acl_check_modlist( op, lmi->lmi_e, op->orm_modlist ) ) {
225 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
229 for ( ml = op->orm_modlist; ml; ml = ml->sml_next ) {
232 if ( ml->sml_desc != lastmod_schema.lms_ad_lastmodEnabled ) {
236 if ( ml->sml_op != LDAP_MOD_REPLACE ) {
237 rs->sr_text = "unsupported mod type";
238 rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
242 a = attr_find( lmi->lmi_e->e_attrs, ml->sml_desc );
245 rs->sr_text = "lastmod overlay internal error";
246 rs->sr_err = LDAP_OTHER;
250 ch_free( a->a_vals[ 0 ].bv_val );
251 ber_dupbv( &a->a_vals[ 0 ], &ml->sml_values[ 0 ] );
253 ch_free( a->a_nvals[ 0 ].bv_val );
254 if ( ml->sml_nvalues && !BER_BVISNULL( &ml->sml_nvalues[ 0 ] ) ) {
255 ber_dupbv( &a->a_nvals[ 0 ], &ml->sml_nvalues[ 0 ] );
257 ber_dupbv( &a->a_nvals[ 0 ], &ml->sml_values[ 0 ] );
261 if ( strcmp( ml->sml_values[ 0 ].bv_val, "TRUE" ) == 0 ) {
262 lmi->lmi_enabled = 1;
263 } else if ( strcmp( ml->sml_values[ 0 ].bv_val, "FALSE" ) == 0 ) {
264 lmi->lmi_enabled = 0;
270 rs->sr_err = LDAP_SUCCESS;
273 ldap_pvt_thread_mutex_unlock( &lmi->lmi_entry_mutex );
275 send_ldap_result( op, rs );
282 lastmod_op_func( Operation *op, SlapReply *rs )
284 slap_overinst *on = (slap_overinst *)op->o_bd->bd_info;
285 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
289 if ( dn_match( &op->o_req_ndn, &lmi->lmi_e->e_nname ) ) {
290 switch ( op->o_tag ) {
291 case LDAP_REQ_SEARCH:
292 if ( op->ors_scope != LDAP_SCOPE_BASE ) {
293 goto return_referral;
296 return lastmod_search( op, rs );
298 case LDAP_REQ_COMPARE:
299 return lastmod_compare( op, rs );
301 case LDAP_REQ_EXTENDED:
302 /* if write, reject; otherwise process */
303 if ( exop_is_write( op )) {
304 rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
305 rs->sr_text = "not allowed within namingContext";
308 return lastmod_exop( op, rs );
310 case LDAP_REQ_MODIFY:
311 /* if global overlay, modlist is not checked yet */
312 if ( op->orm_modlist->sml_desc == NULL ) {
313 char textbuf[SLAP_TEXT_BUFLEN];
314 size_t textlen = sizeof textbuf;
316 rs->sr_err = slap_mods_check( op->orm_modlist, 0, &rs->sr_text,
317 textbuf, textlen, NULL );
324 /* allow only changes to overlay status */
325 for ( ml = op->orm_modlist; ml; ml = ml->sml_next ) {
326 if ( ad_cmp( ml->sml_desc, slap_schema.si_ad_modifiersName ) != 0
327 && ad_cmp( ml->sml_desc, slap_schema.si_ad_modifyTimestamp ) != 0
328 && ad_cmp( ml->sml_desc, slap_schema.si_ad_entryCSN ) != 0
329 && ad_cmp( ml->sml_desc, lastmod_schema.lms_ad_lastmodEnabled ) != 0 )
331 rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
332 rs->sr_text = "not allowed within namingContext";
336 return lastmod_modify( op, rs );
339 rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
340 rs->sr_text = "not allowed within namingContext";
345 if ( dnIsSuffix( &op->o_req_ndn, &lmi->lmi_e->e_nname ) ) {
346 goto return_referral;
349 return SLAP_CB_CONTINUE;
352 op->o_bd->bd_info = (BackendInfo *)on->on_info;
353 rs->sr_ref = referral_rewrite( default_referral,
354 NULL, &op->o_req_dn, op->ors_scope );
357 rs->sr_ref = default_referral;
359 rs->sr_err = LDAP_REFERRAL;
360 send_ldap_result( op, rs );
362 if ( rs->sr_ref != default_referral ) {
363 ber_bvarray_free( rs->sr_ref );
370 op->o_bd->bd_info = (BackendInfo *)on->on_info;
371 send_ldap_result( op, rs );
378 best_guess( Operation *op,
379 struct berval *bv_entryCSN, struct berval *bv_nentryCSN,
380 struct berval *bv_modifyTimestamp, struct berval *bv_nmodifyTimestamp,
381 struct berval *bv_modifiersName, struct berval *bv_nmodifiersName )
384 char csnbuf[ LDAP_LUTIL_CSNSTR_BUFSIZE ];
385 struct berval entryCSN;
387 slap_get_csn( NULL, csnbuf, sizeof(csnbuf), &entryCSN, 0 );
389 ber_dupbv( bv_entryCSN, &entryCSN );
390 ber_dupbv( bv_nentryCSN, &entryCSN );
393 if ( bv_modifyTimestamp ) {
398 char tmbuf[ LDAP_LUTIL_GENTIME_BUFSIZE ];
403 currtime = slap_get_time();
405 /* maybe we better use the time the operation was initiated */
406 currtime = op->o_time;
408 #ifndef HAVE_GMTIME_R
409 ldap_pvt_thread_mutex_lock( &gmtime_mutex );
410 tm = gmtime( &currtime );
411 #else /* HAVE_GMTIME_R */
412 tm = gmtime_r( &currtime, &tm_buf );
413 #endif /* HAVE_GMTIME_R */
414 lutil_gentime( tmbuf, sizeof( tmbuf ), tm );
415 #ifndef HAVE_GMTIME_R
416 ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
419 ber_str2bv( tmbuf, 0, 1, bv_modifyTimestamp );
420 ber_dupbv( bv_nmodifyTimestamp, bv_modifyTimestamp );
423 if ( bv_modifiersName ) {
425 ber_dupbv( bv_modifiersName, &op->o_dn );
426 ber_dupbv( bv_nmodifiersName, &op->o_ndn );
433 lastmod_update( Operation *op, SlapReply *rs )
435 slap_overinst *on = (slap_overinst *)op->o_bd->bd_info;
436 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
438 Modifications *ml = NULL;
439 struct berval bv_entryCSN = BER_BVNULL,
440 bv_nentryCSN = BER_BVNULL,
441 bv_modifyTimestamp = BER_BVNULL,
442 bv_nmodifyTimestamp = BER_BVNULL,
443 bv_modifiersName = BER_BVNULL,
444 bv_nmodifiersName = BER_BVNULL,
445 bv_name = BER_BVNULL,
446 bv_nname = BER_BVNULL;
447 enum lastmodType_e lmt = LASTMOD_UNKNOWN;
451 /* FIXME: timestamp? modifier? */
452 switch ( op->o_tag ) {
456 a = attr_find( e->e_attrs, slap_schema.si_ad_entryCSN );
458 ber_dupbv( &bv_entryCSN, &a->a_vals[0] );
459 if ( a->a_nvals && !BER_BVISNULL( &a->a_nvals[0] ) ) {
460 ber_dupbv( &bv_nentryCSN, &a->a_nvals[0] );
462 ber_dupbv( &bv_nentryCSN, &a->a_vals[0] );
465 a = attr_find( e->e_attrs, slap_schema.si_ad_modifyTimestamp );
467 ber_dupbv( &bv_modifyTimestamp, &a->a_vals[0] );
468 if ( a->a_nvals && !BER_BVISNULL( &a->a_nvals[0] ) ) {
469 ber_dupbv( &bv_nmodifyTimestamp, &a->a_nvals[0] );
471 ber_dupbv( &bv_nmodifyTimestamp, &a->a_vals[0] );
474 a = attr_find( e->e_attrs, slap_schema.si_ad_modifiersName );
476 ber_dupbv( &bv_modifiersName, &a->a_vals[0] );
477 ber_dupbv( &bv_nmodifiersName, &a->a_nvals[0] );
479 ber_dupbv( &bv_name, &e->e_name );
480 ber_dupbv( &bv_nname, &e->e_nname );
483 case LDAP_REQ_DELETE:
484 lmt = LASTMOD_DELETE;
486 best_guess( op, &bv_entryCSN, &bv_nentryCSN,
487 &bv_modifyTimestamp, &bv_nmodifyTimestamp,
488 &bv_modifiersName, &bv_nmodifiersName );
490 ber_dupbv( &bv_name, &op->o_req_dn );
491 ber_dupbv( &bv_nname, &op->o_req_ndn );
494 case LDAP_REQ_EXTENDED:
497 /* actually, password change is wrapped around a backend
498 * call to modify, so it never shows up as an exop... */
499 best_guess( op, &bv_entryCSN, &bv_nentryCSN,
500 &bv_modifyTimestamp, &bv_nmodifyTimestamp,
501 &bv_modifiersName, &bv_nmodifiersName );
503 ber_dupbv( &bv_name, &op->o_req_dn );
504 ber_dupbv( &bv_nname, &op->o_req_ndn );
507 case LDAP_REQ_MODIFY:
508 lmt = LASTMOD_MODIFY;
511 for ( ml = op->orm_modlist; ml; ml = ml->sml_next ) {
512 if ( ad_cmp( ml->sml_desc , slap_schema.si_ad_modifiersName ) == 0 ) {
513 ber_dupbv( &bv_modifiersName, &ml->sml_values[0] );
514 ber_dupbv( &bv_nmodifiersName, &ml->sml_nvalues[0] );
521 } else if ( ad_cmp( ml->sml_desc, slap_schema.si_ad_entryCSN ) == 0 ) {
522 ber_dupbv( &bv_entryCSN, &ml->sml_values[0] );
523 if ( ml->sml_nvalues && !BER_BVISNULL( &ml->sml_nvalues[0] ) ) {
524 ber_dupbv( &bv_nentryCSN, &ml->sml_nvalues[0] );
526 ber_dupbv( &bv_nentryCSN, &ml->sml_values[0] );
534 } else if ( ad_cmp( ml->sml_desc, slap_schema.si_ad_modifyTimestamp ) == 0 ) {
535 ber_dupbv( &bv_modifyTimestamp, &ml->sml_values[0] );
536 if ( ml->sml_nvalues && !BER_BVISNULL( &ml->sml_nvalues[0] ) ) {
537 ber_dupbv( &bv_nmodifyTimestamp, &ml->sml_nvalues[0] );
539 ber_dupbv( &bv_nmodifyTimestamp, &ml->sml_values[0] );
549 /* if rooted at global overlay, opattrs are not yet in place */
550 if ( BER_BVISNULL( &bv_modifiersName ) ) {
551 best_guess( op, NULL, NULL, NULL, NULL, &bv_modifiersName, &bv_nmodifiersName );
554 if ( BER_BVISNULL( &bv_entryCSN ) ) {
555 best_guess( op, &bv_entryCSN, &bv_nentryCSN, NULL, NULL, NULL, NULL );
558 if ( BER_BVISNULL( &bv_modifyTimestamp ) ) {
559 best_guess( op, NULL, NULL, &bv_modifyTimestamp, &bv_nmodifyTimestamp, NULL, NULL );
562 ber_dupbv( &bv_name, &op->o_req_dn );
563 ber_dupbv( &bv_nname, &op->o_req_ndn );
566 case LDAP_REQ_MODRDN:
567 lmt = LASTMOD_MODRDN;
570 if ( op->orr_newSup && !BER_BVISNULL( op->orr_newSup ) ) {
571 build_new_dn( &bv_name, op->orr_newSup, &op->orr_newrdn, NULL );
572 build_new_dn( &bv_nname, op->orr_nnewSup, &op->orr_nnewrdn, NULL );
577 dnParent( &op->o_req_dn, &pdn );
578 build_new_dn( &bv_name, &pdn, &op->orr_newrdn, NULL );
580 dnParent( &op->o_req_ndn, &pdn );
581 build_new_dn( &bv_nname, &pdn, &op->orr_nnewrdn, NULL );
584 if ( on->on_info->oi_orig->bi_entry_get_rw ) {
585 BackendInfo *bi = op->o_bd->bd_info;
588 op->o_bd->bd_info = (BackendInfo *)on->on_info->oi_orig;
589 rc = (*op->o_bd->bd_info->bi_entry_get_rw)( op, &bv_name, NULL, NULL, 0, &e );
590 if ( rc == LDAP_SUCCESS ) {
591 a = attr_find( e->e_attrs, slap_schema.si_ad_modifiersName );
593 ber_dupbv( &bv_modifiersName, &a->a_vals[0] );
594 ber_dupbv( &bv_nmodifiersName, &a->a_nvals[0] );
596 a = attr_find( e->e_attrs, slap_schema.si_ad_entryCSN );
598 ber_dupbv( &bv_entryCSN, &a->a_vals[0] );
599 if ( a->a_nvals && !BER_BVISNULL( &a->a_nvals[0] ) ) {
600 ber_dupbv( &bv_nentryCSN, &a->a_nvals[0] );
602 ber_dupbv( &bv_nentryCSN, &a->a_vals[0] );
605 a = attr_find( e->e_attrs, slap_schema.si_ad_modifyTimestamp );
607 ber_dupbv( &bv_modifyTimestamp, &a->a_vals[0] );
608 if ( a->a_nvals && !BER_BVISNULL( &a->a_nvals[0] ) ) {
609 ber_dupbv( &bv_nmodifyTimestamp, &a->a_nvals[0] );
611 ber_dupbv( &bv_nmodifyTimestamp, &a->a_vals[0] );
615 assert( dn_match( &bv_name, &e->e_name ) );
616 assert( dn_match( &bv_nname, &e->e_nname ) );
618 (*op->o_bd->bd_info->bi_entry_release_rw)( op, e, 0 );
621 op->o_bd->bd_info = bi;
625 /* if !bi_entry_get_rw || bi_entry_get_rw failed for any reason... */
627 best_guess( op, &bv_entryCSN, &bv_nentryCSN,
628 &bv_modifyTimestamp, &bv_nmodifyTimestamp,
629 &bv_modifiersName, &bv_nmodifiersName );
638 ldap_pvt_thread_mutex_lock( &lmi->lmi_entry_mutex );
641 fprintf( stderr, "### lastmodDN: %s %s\n", bv_name.bv_val, bv_nname.bv_val );
644 a = attr_find( lmi->lmi_e->e_attrs, lastmod_schema.lms_ad_lastmodDN );
648 ch_free( a->a_vals[0].bv_val );
649 a->a_vals[0] = bv_name;
650 ch_free( a->a_nvals[0].bv_val );
651 a->a_nvals[0] = bv_nname;
654 fprintf( stderr, "### lastmodType: %s %s\n", lastmodType[ lmt ].bv_val, lastmodType[ lmt ].bv_val );
657 a = attr_find( lmi->lmi_e->e_attrs, lastmod_schema.lms_ad_lastmodType );
661 ch_free( a->a_vals[0].bv_val );
662 ber_dupbv( &a->a_vals[0], &lastmodType[ lmt ] );
663 ch_free( a->a_nvals[0].bv_val );
664 ber_dupbv( &a->a_nvals[0], &lastmodType[ lmt ] );
667 fprintf( stderr, "### modifiersName: %s %s\n", bv_modifiersName.bv_val, bv_nmodifiersName.bv_val );
670 a = attr_find( lmi->lmi_e->e_attrs, slap_schema.si_ad_modifiersName );
674 ch_free( a->a_vals[0].bv_val );
675 a->a_vals[0] = bv_modifiersName;
676 ch_free( a->a_nvals[0].bv_val );
677 a->a_nvals[0] = bv_nmodifiersName;
680 fprintf( stderr, "### modifyTimestamp: %s %s\n", bv_nmodifyTimestamp.bv_val, bv_modifyTimestamp.bv_val );
683 a = attr_find( lmi->lmi_e->e_attrs, slap_schema.si_ad_modifyTimestamp );
687 ch_free( a->a_vals[0].bv_val );
688 a->a_vals[0] = bv_modifyTimestamp;
689 ch_free( a->a_nvals[0].bv_val );
690 a->a_nvals[0] = bv_nmodifyTimestamp;
693 fprintf( stderr, "### entryCSN: %s %s\n", bv_nentryCSN.bv_val, bv_entryCSN.bv_val );
696 a = attr_find( lmi->lmi_e->e_attrs, slap_schema.si_ad_entryCSN );
700 ch_free( a->a_vals[0].bv_val );
701 a->a_vals[0] = bv_entryCSN;
702 ch_free( a->a_nvals[0].bv_val );
703 a->a_nvals[0] = bv_nentryCSN;
708 ldap_pvt_thread_mutex_unlock( &lmi->lmi_entry_mutex );
714 lastmod_response( Operation *op, SlapReply *rs )
716 slap_overinst *on = (slap_overinst *)op->o_bd->bd_info;
717 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
720 /* don't record failed operations */
721 switch ( rs->sr_err ) {
723 /* FIXME: other cases? */
727 return SLAP_CB_CONTINUE;
730 /* record only write operations */
731 switch ( op->o_tag ) {
733 case LDAP_REQ_MODIFY:
734 case LDAP_REQ_MODRDN:
735 case LDAP_REQ_DELETE:
738 case LDAP_REQ_EXTENDED:
739 /* if write, process */
740 if ( exop_is_write( op ))
745 return SLAP_CB_CONTINUE;
748 /* skip if disabled */
749 ldap_pvt_thread_mutex_lock( &lmi->lmi_entry_mutex );
750 if ( !lmi->lmi_enabled ) {
751 ldap_pvt_thread_mutex_unlock( &lmi->lmi_entry_mutex );
752 return SLAP_CB_CONTINUE;
754 ldap_pvt_thread_mutex_unlock( &lmi->lmi_entry_mutex );
757 (void)lastmod_update( op, rs );
759 return SLAP_CB_CONTINUE;
767 slap_overinst *on = (slap_overinst *)be->bd_info;
770 if ( lastmod_schema.lms_oc_lastmod == NULL ) {
774 /* schema integration */
775 for ( i = 0; mat[i].name; i++ ) {
776 LDAPAttributeType *at;
779 AttributeDescription **ad;
781 at = ldap_str2attributetype( mat[i].schema, &code,
782 &err, LDAP_SCHEMA_ALLOW_ALL );
784 Debug( LDAP_DEBUG_ANY, "lastmod_init: "
785 "in AttributeType '%s' %s before %s\n",
786 mat[i].name, ldap_scherr2str(code), err );
790 if ( at->at_oid == NULL ) {
791 Debug( LDAP_DEBUG_ANY, "lastmod_init: "
792 "null OID for attributeType '%s'\n",
797 code = at_add(at, &err);
799 Debug( LDAP_DEBUG_ANY, "lastmod_init: "
800 "%s in attributeType '%s'\n",
801 scherr2str(code), mat[i].name, 0 );
806 ad = ((AttributeDescription **)&(((char *)&lastmod_schema)[mat[i].offset]));
808 if ( slap_str2ad( mat[i].name, ad, &text ) ) {
809 Debug( LDAP_DEBUG_ANY,
810 "lastmod_init: %s\n", text, 0, 0 );
814 (*ad)->ad_type->sat_flags |= mat[i].flags;
817 for ( i = 0; moc[i].name; i++ ) {
823 oc = ldap_str2objectclass(moc[i].schema, &code, &err,
824 LDAP_SCHEMA_ALLOW_ALL );
826 Debug( LDAP_DEBUG_ANY,
827 "unable to parse lastmod objectClass '%s': "
828 "%s before %s\n" , moc[i].name,
829 ldap_scherr2str(code), err );
833 if ( oc->oc_oid == NULL ) {
834 Debug( LDAP_DEBUG_ANY,
835 "objectClass '%s' has no OID\n" ,
840 code = oc_add(oc, 0, &err);
842 Debug( LDAP_DEBUG_ANY,
843 "objectClass '%s': %s \"%s\"\n" ,
844 moc[i].name, scherr2str(code), err );
850 Oc = oc_find( moc[i].name );
852 Debug( LDAP_DEBUG_ANY, "lastmod_init: "
853 "unable to find objectClass %s "
854 "(just added)\n", moc[i].name, 0, 0 );
858 Oc->soc_flags |= moc[i].flags;
860 ((ObjectClass **)&(((char *)&lastmod_schema)[moc[i].offset]))[0] = Oc;
864 lmi = (lastmod_info_t *)ch_malloc( sizeof( lastmod_info_t ) );
866 memset( lmi, 0, sizeof( lastmod_info_t ) );
867 lmi->lmi_enabled = 1;
869 on->on_bi.bi_private = lmi;
883 slap_overinst *on = (slap_overinst *)be->bd_info;
884 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
886 if ( strcasecmp( argv[ 0 ], "lastmod-rdnvalue" ) == 0 ) {
887 if ( lmi->lmi_rdnvalue.bv_val ) {
888 /* already defined! */
889 ch_free( lmi->lmi_rdnvalue.bv_val );
892 ber_str2bv( argv[ 1 ], 0, 1, &lmi->lmi_rdnvalue );
894 } else if ( strcasecmp( argv[ 0 ], "lastmod-enabled" ) == 0 ) {
895 if ( strcasecmp( argv[ 1 ], "yes" ) == 0 ) {
896 lmi->lmi_enabled = 1;
898 } else if ( strcasecmp( argv[ 1 ], "no" ) == 0 ) {
899 lmi->lmi_enabled = 0;
906 return SLAP_CONF_UNKNOWN;
917 slap_overinst *on = (slap_overinst *) be->bd_info;
918 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
924 static char tmbuf[ LDAP_LUTIL_GENTIME_BUFSIZE ];
926 char csnbuf[ LDAP_LUTIL_CSNSTR_BUFSIZE ];
927 struct berval entryCSN;
929 if ( !SLAP_LASTMOD( be ) ) {
930 fprintf( stderr, "set \"lastmod on\" to make this overlay effective\n" );
937 #ifndef HAVE_GMTIME_R
938 ldap_pvt_thread_mutex_lock( &gmtime_mutex );
939 tms = gmtime( &starttime );
940 #else /* HAVE_GMTIME_R */
941 tms = gmtime_r( &starttime, &tm_buf );
942 #endif /* HAVE_GMTIME_R */
943 lutil_gentime( tmbuf, sizeof(tmbuf), tms );
944 #ifndef HAVE_GMTIME_R
945 ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
948 slap_get_csn( NULL, csnbuf, sizeof(csnbuf), &entryCSN, 0 );
950 if ( BER_BVISNULL( &lmi->lmi_rdnvalue ) ) {
951 ber_str2bv( "Lastmod", 0, 1, &lmi->lmi_rdnvalue );
954 snprintf( buf, sizeof( buf ),
957 "structuralObjectClass: %s\n"
959 "description: This object contains the last modification to this database\n"
963 "createTimestamp: %s\n"
966 "modifyTimestamp: %s\n"
967 "modifiersName: %s\n"
968 "hasSubordinates: FALSE\n",
969 lmi->lmi_rdnvalue.bv_val, BER_BVISEMPTY( &be->be_suffix[ 0 ] ) ? "" : ",", be->be_suffix[ 0 ].bv_val,
970 lastmod_schema.lms_oc_lastmod->soc_cname.bv_val,
971 lastmod_schema.lms_oc_lastmod->soc_cname.bv_val,
972 lmi->lmi_rdnvalue.bv_val,
973 lastmod_schema.lms_ad_lastmodDN->ad_cname.bv_val,
974 lmi->lmi_rdnvalue.bv_val, BER_BVISEMPTY( &be->be_suffix[ 0 ] ) ? "" : ",", be->be_suffix[ 0 ].bv_val,
975 lastmod_schema.lms_ad_lastmodType->ad_cname.bv_val, lastmodType[ LASTMOD_ADD ].bv_val,
976 lastmod_schema.lms_ad_lastmodEnabled->ad_cname.bv_val, lmi->lmi_enabled ? "TRUE" : "FALSE",
978 BER_BVISNULL( &be->be_rootdn ) ? SLAPD_ANONYMOUS : be->be_rootdn.bv_val,
981 BER_BVISNULL( &be->be_rootdn ) ? SLAPD_ANONYMOUS : be->be_rootdn.bv_val );
984 fprintf( stderr, "# entry:\n%s\n", buf );
987 lmi->lmi_e = str2entry( buf );
988 if ( lmi->lmi_e == NULL ) {
992 ldap_pvt_thread_mutex_init( &lmi->lmi_entry_mutex );
1002 slap_overinst *on = (slap_overinst *)be->bd_info;
1003 lastmod_info_t *lmi = (lastmod_info_t *)on->on_bi.bi_private;
1006 if ( !BER_BVISNULL( &lmi->lmi_rdnvalue ) ) {
1007 ch_free( lmi->lmi_rdnvalue.bv_val );
1011 entry_free( lmi->lmi_e );
1013 ldap_pvt_thread_mutex_destroy( &lmi->lmi_entry_mutex );
1022 /* This overlay is set up for dynamic loading via moduleload. For static
1023 * configuration, you'll need to arrange for the slap_overinst to be
1024 * initialized and registered by some other function inside slapd.
1027 static slap_overinst lastmod;
1032 lastmod.on_bi.bi_type = "lastmod";
1033 lastmod.on_bi.bi_db_init = lastmod_db_init;
1034 lastmod.on_bi.bi_db_config = lastmod_db_config;
1035 lastmod.on_bi.bi_db_destroy = lastmod_db_destroy;
1036 lastmod.on_bi.bi_db_open = lastmod_db_open;
1038 lastmod.on_bi.bi_op_add = lastmod_op_func;
1039 lastmod.on_bi.bi_op_compare = lastmod_op_func;
1040 lastmod.on_bi.bi_op_delete = lastmod_op_func;
1041 lastmod.on_bi.bi_op_modify = lastmod_op_func;
1042 lastmod.on_bi.bi_op_modrdn = lastmod_op_func;
1043 lastmod.on_bi.bi_op_search = lastmod_op_func;
1044 lastmod.on_bi.bi_extended = lastmod_op_func;
1046 lastmod.on_response = lastmod_response;
1048 return overlay_register( &lastmod );
1051 #if SLAPD_OVER_LASTMOD == SLAPD_MOD_DYNAMIC
1053 init_module( int argc, char *argv[] )
1055 return lastmod_init();
1057 #endif /* SLAPD_OVER_LASTMOD == SLAPD_MOD_DYNAMIC */
1059 #endif /* defined(SLAPD_OVER_LASTMOD) */