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

   1 /*
   2  * Copyright (c) 1995 Regents of the University of Michigan.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms are permitted
   6  * provided that this notice is preserved and that due credit is given
   7  * to the University of Michigan at Ann Arbor. The name of the University
   8  * may not be used to endorse or promote products derived from this
   9  * software without specific prior written permission. This software
  10  * is provided ``as is'' without express or implied warranty.
  11  */
  12
  13 #include "portable.h"
  14
  15 #include <stdio.h>
  16
  17 #include <ac/socket.h>
  18 #include <ac/string.h>
  19 #include <ac/time.h>
  20
  21 #include "ldap_defaults.h"
  22 #include "slap.h"
  23
  24 #if defined( SLAPD_MONITOR_DN )
  25
  26 void
  27 monitor_info(
  28         Connection *conn,
  29         Operation *op,
  30         char ** attrs,
  31         int attrsonly )
  32 {
  33         Entry           *e;
  34         char            buf[BUFSIZ];
  35         struct berval   val;
  36         struct berval   *vals[2];
  37         int    nconns, nwritewaiters, nreadwaiters;
  38         struct tm       *ltm;
  39         char            *p;
  40     char       buf2[22];
  41     char       buf3[22];
  42         Connection *c;
  43         int                     connindex;
  44     time_t              currenttime;
  45
  46         vals[0] = &val;
  47         vals[1] = NULL;
  48
  49         e = (Entry *) ch_calloc( 1, sizeof(Entry) );
  50         /* initialize reader/writer lock */
  51         e->e_attrs = NULL;
  52         e->e_dn = ch_strdup( SLAPD_MONITOR_DN );
  53         e->e_ndn = ch_strdup(SLAPD_MONITOR_DN);
  54         (void) dn_normalize_case( e->e_ndn );
  55         e->e_private = NULL;
  56
  57         {
  58                 char *rdn = ch_strdup( SLAPD_MONITOR_DN );
  59                 val.bv_val = strchr( rdn, '=' );
  60
  61                 if( val.bv_val != NULL ) {
  62                         *val.bv_val = '\0';
  63                         val.bv_len = strlen( ++val.bv_val );
  64
  65                         attr_merge( e, rdn, vals );
  66                 }
  67
  68                 free( rdn );
  69         }
  70
  71         val.bv_val = (char *) Versionstr;
  72         if (( p = strchr( Versionstr, '\n' )) == NULL ) {
  73                 val.bv_len = strlen( Versionstr );
  74         } else {
  75                 val.bv_len = p - Versionstr;
  76         }
  77         attr_merge( e, "version", vals );
  78
  79         ldap_pvt_thread_mutex_lock( &active_threads_mutex );
  80         sprintf( buf, "%d", active_threads );
  81         ldap_pvt_thread_mutex_unlock( &active_threads_mutex );
  82         val.bv_val = buf;
  83         val.bv_len = strlen( buf );
  84         attr_merge( e, "threads", vals );
  85
  86         nconns = 0;
  87         nwritewaiters = 0;
  88         nreadwaiters = 0;
  89
  90         /* loop through the connections */
  91         for ( c = connection_first( &connindex );
  92                 c != NULL;
  93                 c = connection_next( c, &connindex ))
  94         {
  95                 nconns++;
  96                 if ( c->c_writewaiter ) {
  97                         nwritewaiters++;
  98                 }
  99                 if ( c->c_currentber != NULL ) {
 100                         nreadwaiters++;
 101                 }
 102
 103                 ldap_pvt_thread_mutex_lock( &gmtime_mutex );
 104 #ifndef LDAP_LOCALTIME
 105                 ltm = gmtime( &c->c_starttime );
 106                 strftime( buf2, sizeof(buf2), "%Y%m%d%H%M%SZ", ltm );
 107
 108                 ltm = gmtime( &c->c_activitytime );
 109                 strftime( buf3, sizeof(buf2), "%Y%m%d%H%M%SZ", ltm );
 110 #else
 111                 ltm = localtime( &c->.c_starttime );
 112                 strftime( buf2, sizeof(buf2), "%y%m%d%H%M%SZ", ltm );
 113
 114                 ltm = localtime( &c->c_activitytime );
 115                 strftime( buf3, sizeof(buf2), "%y%m%d%H%M%SZ", ltm );
 116 #endif
 117
 118                 ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
 119
 120                 sprintf( buf,
 121                         "%ld : %ld "
 122                         ": %ld/%ld/%ld/%ld "
 123                         ": %ld/%ld/%ld "
 124                         ": %s%s%s%s%s%s "
 125                         ": %s : %s : %s "
 126                         ": %s : %s : %s : %s ",
 127
 128                         c->c_connid,
 129                         (long) c->c_protocol,
 130
 131                         c->c_n_ops_received, c->c_n_ops_executing,
 132                         c->c_n_ops_pending, c->c_n_ops_completed,
 133
 134                         /* add low-level counters here */
 135                         c->c_n_get, c->c_n_read, c->c_n_write,
 136
 137                     c->c_currentber ? "r" : "",
 138                     c->c_writewaiter ? "w" : "",
 139                     c->c_ops != NULL ? "x" : "",
 140                     c->c_pending_ops != NULL ? "p" : "",
 141                         connection_state2str( c->c_conn_state ),
 142                         c->c_bind_in_progress ? "S" : "",
 143
 144                     c->c_cdn ? c->c_cdn : "<anonymous>",
 145
 146                         c->c_listener_url,
 147                     c->c_peer_domain,
 148                     c->c_peer_name,
 149                     c->c_sock_name,
 150
 151                     buf2,
 152                         buf3
 153                 );
 154
 155                 val.bv_val = buf;
 156                 val.bv_len = strlen( buf );
 157                 attr_merge( e, "connection", vals );
 158         }
 159         connection_done(c);
 160
 161         sprintf( buf, "%d", nconns );
 162         val.bv_val = buf;
 163         val.bv_len = strlen( buf );
 164         attr_merge( e, "currentConnections", vals );
 165
 166         sprintf( buf, "%ld", connections_nextid() );
 167         val.bv_val = buf;
 168         val.bv_len = strlen( buf );
 169         attr_merge( e, "totalConnections", vals );
 170
 171         sprintf( buf, "%ld", (long) dtblsize );
 172         val.bv_val = buf;
 173         val.bv_len = strlen( buf );
 174         attr_merge( e, "dTableSize", vals );
 175
 176         sprintf( buf, "%d", nwritewaiters );
 177         val.bv_val = buf;
 178         val.bv_len = strlen( buf );
 179         attr_merge( e, "writeWaiters", vals );
 180
 181         sprintf( buf, "%d", nreadwaiters );
 182         val.bv_val = buf;
 183         val.bv_len = strlen( buf );
 184         attr_merge( e, "readWaiters", vals );
 185
 186         ldap_pvt_thread_mutex_lock(&num_ops_mutex);
 187         sprintf( buf, "%ld", num_ops_initiated );
 188         ldap_pvt_thread_mutex_unlock(&num_ops_mutex);
 189         val.bv_val = buf;
 190         val.bv_len = strlen( buf );
 191         attr_merge( e, "opsInitiated", vals );
 192
 193         ldap_pvt_thread_mutex_lock(&num_ops_mutex);
 194         sprintf( buf, "%ld", num_ops_completed );
 195         ldap_pvt_thread_mutex_unlock(&num_ops_mutex);
 196         val.bv_val = buf;
 197         val.bv_len = strlen( buf );
 198         attr_merge( e, "opsCompleted", vals );
 199
 200         ldap_pvt_thread_mutex_lock(&num_sent_mutex);
 201         sprintf( buf, "%ld", num_entries_sent );
 202         ldap_pvt_thread_mutex_unlock(&num_sent_mutex);
 203         val.bv_val = buf;
 204         val.bv_len = strlen( buf );
 205         attr_merge( e, "entriesSent", vals );
 206
 207         ldap_pvt_thread_mutex_lock(&num_sent_mutex);
 208         sprintf( buf, "%ld", num_refs_sent );
 209         ldap_pvt_thread_mutex_unlock(&num_sent_mutex);
 210         val.bv_val = buf;
 211         val.bv_len = strlen( buf );
 212         attr_merge( e, "referencesSent", vals );
 213
 214         ldap_pvt_thread_mutex_lock(&num_sent_mutex);
 215         sprintf( buf, "%ld", num_pdu_sent );
 216         ldap_pvt_thread_mutex_unlock(&num_sent_mutex);
 217         val.bv_val = buf;
 218         val.bv_len = strlen( buf );
 219         attr_merge( e, "pduSent", vals );
 220
 221         ldap_pvt_thread_mutex_lock(&num_sent_mutex);
 222         sprintf( buf, "%ld", num_bytes_sent );
 223         ldap_pvt_thread_mutex_unlock(&num_sent_mutex);
 224         val.bv_val = buf;
 225         val.bv_len = strlen( buf );
 226         attr_merge( e, "bytesSent", vals );
 227
 228         currenttime = slap_get_time();
 229
 230         ldap_pvt_thread_mutex_lock( &gmtime_mutex );
 231 #ifndef LDAP_LOCALTIME
 232         ltm = gmtime( &currenttime );
 233         strftime( buf, sizeof(buf), "%Y%m%d%H%M%SZ", ltm );
 234 #else
 235         ltm = localtime( &currenttime );
 236         strftime( buf, sizeof(buf), "%y%m%d%H%M%SZ", ltm );
 237 #endif
 238         val.bv_val = buf;
 239         val.bv_len = strlen( buf );
 240         attr_merge( e, "currenttime", vals );
 241
 242 #ifndef LDAP_LOCALTIME
 243         ltm = gmtime( &starttime );
 244         strftime( buf, sizeof(buf), "%Y%m%d%H%M%SZ", ltm );
 245 #else
 246         ltm = localtime( &starttime );
 247         strftime( buf, sizeof(buf), "%y%m%d%H%M%SZ", ltm );
 248 #endif
 249         ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
 250
 251         val.bv_val = buf;
 252         val.bv_len = strlen( buf );
 253         attr_merge( e, "starttime", vals );
 254
 255         sprintf( buf, "%d", nbackends );
 256         val.bv_val = buf;
 257         val.bv_len = strlen( buf );
 258         attr_merge( e, "nbackends", vals );
 259
 260 #ifdef HAVE_THREAD_CONCURRENCY
 261         sprintf( buf, "%d", ldap_pvt_thread_get_concurrency() );
 262         val.bv_val = buf;
 263         val.bv_len = strlen( buf );
 264         attr_merge( e, "concurrency", vals );
 265 #endif
 266
 267         val.bv_val = "top";
 268         val.bv_len = sizeof("top")-1;
 269         attr_merge( e, "objectClass", vals );
 270
 271         val.bv_val = "extensibleObject";
 272         val.bv_len = sizeof("extensibleObject")-1;
 273         attr_merge( e, "objectClass", vals );
 274
 275         send_search_entry( &backends[0], conn, op, e,
 276                 attrs, attrsonly, NULL );
 277         send_search_result( conn, op, LDAP_SUCCESS,
 278                 NULL, NULL, NULL, NULL, 1 );
 279
 280         entry_free( e );
 281 }
 282
 283 #endif /* slapd_monitor_dn */