git.sur5r.net Git - openldap/blob - servers/slapd/back-monitor/operation.c

   1 /* operation.c - deal with operation subsystem */
   2 /*
   3  * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
   4  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   5  */
   6 /*
   7  * Copyright 2001, Pierangelo Masarati, All rights reserved. <ando@sys-net.it>
   8  *
   9  * This work has beed deveolped for the OpenLDAP Foundation
  10  * in the hope that it may be useful to the Open Source community,
  11  * but WITHOUT ANY WARRANTY.
  12  *
  13  * Permission is granted to anyone to use this software for any purpose
  14  * on any computer system, and to alter it and redistribute it, subject
  15  * to the following restrictions:
  16  *
  17  * 1. The author and SysNet s.n.c. are not responsible for the consequences
  18  *    of use of this software, no matter how awful, even if they arise from
  19  *    flaws in it.
  20  *
  21  * 2. The origin of this software must not be misrepresented, either by
  22  *    explicit claim or by omission.  Since few users ever read sources,
  23  *    credits should appear in the documentation.
  24  *
  25  * 3. Altered versions must be plainly marked as such, and must not be
  26  *    misrepresented as being the original software.  Since few users
  27  *    ever read sources, credits should appear in the documentation.
  28  *    SysNet s.n.c. cannot be responsible for the consequences of the
  29  *    alterations.
  30  *
  31  * 4. This notice may not be removed or altered.
  32  */
  33
  34 #include "portable.h"
  35
  36 #include <stdio.h>
  37 #include <ac/string.h>
  38
  39 #include "slap.h"
  40 #include "back-monitor.h"
  41 #include "lber_pvt.h"
  42
  43 static struct berval
  44         bv_op[] = {
  45                 BER_BVC( "Bind" ),
  46                 BER_BVC( "Unbind" ),
  47                 BER_BVC( "Add" ),
  48                 BER_BVC( "Delete" ),
  49                 BER_BVC( "Modrdn" ),
  50                 BER_BVC( "Modify" ),
  51                 BER_BVC( "Compare" ),
  52                 BER_BVC( "Search" ),
  53                 BER_BVC( "Abandon" ),
  54                 BER_BVC( "Extended" )
  55         };
  56
  57 int
  58 monitor_subsys_ops_init(
  59         BackendDB               *be
  60 )
  61 {
  62         struct monitorinfo      *mi;
  63
  64         Entry                   *e, *e_tmp, *e_op;
  65         struct monitorentrypriv *mp;
  66         char                    buf[ BACKMONITOR_BUFSIZE ];
  67         int                     i;
  68
  69         assert( be != NULL );
  70
  71         mi = ( struct monitorinfo * )be->be_private;
  72
  73         if ( monitor_cache_get( mi,
  74                         &monitor_subsys[SLAPD_MONITOR_OPS].mss_ndn, &e_op ) ) {
  75 #ifdef NEW_LOGGING
  76                 LDAP_LOG( OPERATION, CRIT,
  77                         "monitor_subsys_ops_init: "
  78                         "unable to get entry '%s'\n",
  79                         monitor_subsys[SLAPD_MONITOR_OPS].mss_ndn.bv_val, 0, 0 );
  80 #else
  81                 Debug( LDAP_DEBUG_ANY,
  82                         "monitor_subsys_ops_init: "
  83                         "unable to get entry '%s'\n%s%s",
  84                         monitor_subsys[SLAPD_MONITOR_OPS].mss_ndn.bv_val,
  85                         "", "" );
  86 #endif
  87                 return( -1 );
  88         }
  89
  90         e_tmp = NULL;
  91
  92         for ( i = SLAP_OP_LAST; i-- > 0; ) {
  93
  94                 /*
  95                  * Initiated ops
  96                  */
  97                 snprintf( buf, sizeof( buf ),
  98                                 "dn: cn=%s,%s\n"
  99                                 "objectClass: %s\n"
 100                                 "structuralObjectClass: %s\n"
 101                                 "cn: %s\n"
 102                                 "%s: 0\n"
 103                                 "%s: 0\n",
 104                                 bv_op[ i ].bv_val,
 105                                 monitor_subsys[SLAPD_MONITOR_OPS].mss_dn.bv_val,
 106                                 mi->oc_monitorOperation->soc_cname.bv_val,
 107                                 mi->oc_monitorOperation->soc_cname.bv_val,
 108                                 bv_op[ i ].bv_val,
 109                                 mi->ad_monitorOpInitiated->ad_cname.bv_val,
 110                                 mi->ad_monitorOpCompleted->ad_cname.bv_val );
 111
 112                 e = str2entry( buf );
 113                 if ( e == NULL ) {
 114 #ifdef NEW_LOGGING
 115                         LDAP_LOG( OPERATION, CRIT,
 116                                 "monitor_subsys_ops_init: "
 117                                 "unable to create entry 'cn=%s,%s'\n",
 118                                 bv_op[ i ].bv_val,
 119                                 monitor_subsys[SLAPD_MONITOR_OPS].mss_ndn.bv_val, 0 );
 120 #else
 121                         Debug( LDAP_DEBUG_ANY,
 122                                 "monitor_subsys_ops_init: "
 123                                 "unable to create entry 'cn=%s,%s'\n",
 124                                 bv_op[ i ].bv_val,
 125                                 monitor_subsys[SLAPD_MONITOR_OPS].mss_ndn.bv_val, 0 );
 126 #endif
 127                         return( -1 );
 128                 }
 129
 130                 mp = ( struct monitorentrypriv * )ch_calloc( sizeof( struct monitorentrypriv ), 1 );
 131                 e->e_private = ( void * )mp;
 132                 mp->mp_next = e_tmp;
 133                 mp->mp_children = NULL;
 134                 mp->mp_info = &monitor_subsys[SLAPD_MONITOR_OPS];
 135                 mp->mp_flags = monitor_subsys[SLAPD_MONITOR_OPS].mss_flags \
 136                         | MONITOR_F_SUB | MONITOR_F_PERSISTENT;
 137
 138                 if ( monitor_cache_add( mi, e ) ) {
 139 #ifdef NEW_LOGGING
 140                         LDAP_LOG( OPERATION, CRIT,
 141                                 "monitor_subsys_ops_init: "
 142                                 "unable to add entry 'cn=%s,%s'\n",
 143                                 bv_op[ i ].bv_val,
 144                                 monitor_subsys[SLAPD_MONITOR_OPS].mss_ndn.bv_val, 0 );
 145 #else
 146                         Debug( LDAP_DEBUG_ANY,
 147                                 "monitor_subsys_ops_init: "
 148                                 "unable to add entry 'cn=%s,%s'\n",
 149                                 bv_op[ i ].bv_val,
 150                                 monitor_subsys[SLAPD_MONITOR_OPS].mss_ndn.bv_val, 0 );
 151 #endif
 152                         return( -1 );
 153                 }
 154
 155                 e_tmp = e;
 156         }
 157
 158         mp = ( struct monitorentrypriv * )e_op->e_private;
 159         mp->mp_children = e_tmp;
 160
 161         monitor_cache_release( mi, e_op );
 162
 163         return( 0 );
 164 }
 165
 166 int
 167 monitor_subsys_ops_update(
 168         Operation               *op,
 169         Entry                   *e
 170 )
 171 {
 172         struct monitorinfo *mi = (struct monitorinfo *)op->o_bd->be_private;
 173         long            nInitiated = -1, nCompleted = -1;
 174         char            *rdnvalue;
 175         int             i;
 176         ber_len_t       len;
 177         Attribute       *a;
 178         char            buf[] = "+9223372036854775807L";
 179
 180         assert( mi );
 181         assert( e );
 182
 183         rdnvalue = e->e_dn + ( sizeof( "cn=" ) - 1 );
 184
 185         for (i = 0; i < SLAP_OP_LAST; i++ ) {
 186                 len = bv_op[ i ].bv_len;
 187
 188                 if ( strncmp( rdnvalue, bv_op[ i ].bv_val, len ) == 0 ) {
 189                         nInitiated = num_ops_initiated_[ i ];
 190                         nCompleted = num_ops_completed_[ i ];
 191                         break;
 192                 }
 193         }
 194
 195         if ( i == SLAP_OP_LAST ) {
 196                 return( 0 );
 197         }
 198
 199         a = attr_find( e->e_attrs, mi->ad_monitorOpInitiated );
 200         assert ( a != NULL );
 201         snprintf( buf, sizeof( buf ), "%ld", nInitiated );
 202         free( a->a_vals[ 0 ].bv_val );
 203         ber_str2bv( buf, 0, 1, &a->a_vals[ 0 ] );
 204
 205         a = attr_find( e->e_attrs, mi->ad_monitorOpCompleted );
 206         assert ( a != NULL );
 207         snprintf( buf, sizeof( buf ), "%ld", nCompleted );
 208         free( a->a_vals[ 0 ].bv_val );
 209         ber_str2bv( buf, 0, 1, &a->a_vals[ 0 ] );
 210
 211         return( 0 );
 212 }
 213