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( Connection *conn, Operation *op )
  28 {
  29         Entry           *e;
  30         char            buf[BUFSIZ];
  31         struct berval   val;
  32         struct berval   *vals[2];
  33         int    nconns, nwritewaiters, nreadwaiters;
  34         struct tm       *ltm;
  35         char            *p;
  36     char       buf2[22];
  37     char       buf3[22];
  38         Connection *c;
  39         int                     connindex;
  40     time_t              currenttime;
  41
  42         vals[0] = &val;
  43         vals[1] = NULL;
  44
  45         e = (Entry *) ch_calloc( 1, sizeof(Entry) );
  46         /* initialize reader/writer lock */
  47         e->e_attrs = NULL;
  48         e->e_dn = ch_strdup( SLAPD_MONITOR_DN );
  49         e->e_ndn = ch_strdup(SLAPD_MONITOR_DN);
  50         (void) dn_normalize_case( e->e_ndn );
  51         e->e_private = NULL;
  52
  53         val.bv_val = (char *) Versionstr;
  54         if (( p = strchr( Versionstr, '\n' )) == NULL ) {
  55                 val.bv_len = strlen( Versionstr );
  56         } else {
  57                 val.bv_len = p - Versionstr;
  58         }
  59         attr_merge( e, "version", vals );
  60
  61         ldap_pvt_thread_mutex_lock( &active_threads_mutex );
  62         sprintf( buf, "%d", active_threads );
  63         ldap_pvt_thread_mutex_unlock( &active_threads_mutex );
  64         val.bv_val = buf;
  65         val.bv_len = strlen( buf );
  66         attr_merge( e, "threads", vals );
  67
  68         nconns = 0;
  69         nwritewaiters = 0;
  70         nreadwaiters = 0;
  71
  72         /* loop through the connections */
  73         for ( c = connection_first( &connindex );
  74                 c != NULL;
  75                 c = connection_next( c, &connindex ))
  76         {
  77                 nconns++;
  78                 if ( c->c_writewaiter ) {
  79                         nwritewaiters++;
  80                 }
  81                 if ( c->c_currentber != NULL ) {
  82                         nreadwaiters++;
  83                 }
  84
  85                 ldap_pvt_thread_mutex_lock( &gmtime_mutex );
  86 #ifndef LDAP_LOCALTIME
  87                 ltm = gmtime( &c->c_starttime );
  88                 strftime( buf2, sizeof(buf2), "%Y%m%d%H%M%SZ", ltm );
  89
  90                 ltm = gmtime( &c->c_activitytime );
  91                 strftime( buf3, sizeof(buf2), "%Y%m%d%H%M%SZ", ltm );
  92 #else
  93                 ltm = localtime( &c->.c_starttime );
  94                 strftime( buf2, sizeof(buf2), "%y%m%d%H%M%SZ", ltm );
  95
  96                 ltm = localtime( &c->c_activitytime );
  97                 strftime( buf3, sizeof(buf2), "%y%m%d%H%M%SZ", ltm );
  98 #endif
  99
 100                 ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
 101
 102                 sprintf( buf,
 103                         "%ld : %ld "
 104                         ": %ld/%ld/%ld/%ld "
 105                         ": %ld/%ld/%ld "
 106                         ": %s%s%s%s%s%s "
 107                         ": %s : %s : %s "
 108                         ": %s : %s : %s : %s ",
 109
 110                         c->c_connid,
 111                         (long) c->c_protocol,
 112
 113                         c->c_n_ops_received, c->c_n_ops_executing,
 114                         c->c_n_ops_pending, c->c_n_ops_completed,
 115
 116                         /* add low-level counters here */
 117                         c->c_n_get, c->c_n_read, c->c_n_write,
 118
 119                     c->c_currentber ? "r" : "",
 120                     c->c_writewaiter ? "w" : "",
 121                     c->c_ops != NULL ? "x" : "",
 122                     c->c_pending_ops != NULL ? "p" : "",
 123                         connection_state2str( c->c_conn_state ),
 124                         c->c_bind_in_progress ? "S" : "",
 125
 126                     c->c_cdn ? c->c_cdn : "<anonymous>",
 127
 128                         c->c_listener_url,
 129                     c->c_peer_domain,
 130                     c->c_peer_name,
 131                     c->c_sock_name,
 132
 133                     buf2,
 134                         buf3
 135                 );
 136
 137                 val.bv_val = buf;
 138                 val.bv_len = strlen( buf );
 139                 attr_merge( e, "connection", vals );
 140         }
 141         connection_done(c);
 142
 143         sprintf( buf, "%d", nconns );
 144         val.bv_val = buf;
 145         val.bv_len = strlen( buf );
 146         attr_merge( e, "currentConnections", vals );
 147
 148         sprintf( buf, "%ld", connections_nextid() );
 149         val.bv_val = buf;
 150         val.bv_len = strlen( buf );
 151         attr_merge( e, "totalConnections", vals );
 152
 153         sprintf( buf, "%ld", (long) dtblsize );
 154         val.bv_val = buf;
 155         val.bv_len = strlen( buf );
 156         attr_merge( e, "dTableSize", vals );
 157
 158         sprintf( buf, "%d", nwritewaiters );
 159         val.bv_val = buf;
 160         val.bv_len = strlen( buf );
 161         attr_merge( e, "writeWaiters", vals );
 162
 163         sprintf( buf, "%d", nreadwaiters );
 164         val.bv_val = buf;
 165         val.bv_len = strlen( buf );
 166         attr_merge( e, "readWaiters", vals );
 167
 168         ldap_pvt_thread_mutex_lock(&num_ops_mutex);
 169         sprintf( buf, "%ld", num_ops_initiated );
 170         ldap_pvt_thread_mutex_unlock(&num_ops_mutex);
 171         val.bv_val = buf;
 172         val.bv_len = strlen( buf );
 173         attr_merge( e, "opsInitiated", vals );
 174
 175         ldap_pvt_thread_mutex_lock(&num_ops_mutex);
 176         sprintf( buf, "%ld", num_ops_completed );
 177         ldap_pvt_thread_mutex_unlock(&num_ops_mutex);
 178         val.bv_val = buf;
 179         val.bv_len = strlen( buf );
 180         attr_merge( e, "opsCompleted", vals );
 181
 182         ldap_pvt_thread_mutex_lock(&num_sent_mutex);
 183         sprintf( buf, "%ld", num_entries_sent );
 184         ldap_pvt_thread_mutex_unlock(&num_sent_mutex);
 185         val.bv_val = buf;
 186         val.bv_len = strlen( buf );
 187         attr_merge( e, "entriesSent", vals );
 188
 189         ldap_pvt_thread_mutex_lock(&num_sent_mutex);
 190         sprintf( buf, "%ld", num_refs_sent );
 191         ldap_pvt_thread_mutex_unlock(&num_sent_mutex);
 192         val.bv_val = buf;
 193         val.bv_len = strlen( buf );
 194         attr_merge( e, "referencesSent", vals );
 195
 196         ldap_pvt_thread_mutex_lock(&num_sent_mutex);
 197         sprintf( buf, "%ld", num_pdu_sent );
 198         ldap_pvt_thread_mutex_unlock(&num_sent_mutex);
 199         val.bv_val = buf;
 200         val.bv_len = strlen( buf );
 201         attr_merge( e, "pduSent", vals );
 202
 203         ldap_pvt_thread_mutex_lock(&num_sent_mutex);
 204         sprintf( buf, "%ld", num_bytes_sent );
 205         ldap_pvt_thread_mutex_unlock(&num_sent_mutex);
 206         val.bv_val = buf;
 207         val.bv_len = strlen( buf );
 208         attr_merge( e, "bytesSent", vals );
 209
 210         currenttime = slap_get_time();
 211
 212         ldap_pvt_thread_mutex_lock( &gmtime_mutex );
 213 #ifndef LDAP_LOCALTIME
 214         ltm = gmtime( &currenttime );
 215         strftime( buf, sizeof(buf), "%Y%m%d%H%M%SZ", ltm );
 216 #else
 217         ltm = localtime( &currenttime );
 218         strftime( buf, sizeof(buf), "%y%m%d%H%M%SZ", ltm );
 219 #endif
 220         val.bv_val = buf;
 221         val.bv_len = strlen( buf );
 222         attr_merge( e, "currenttime", vals );
 223
 224 #ifndef LDAP_LOCALTIME
 225         ltm = gmtime( &starttime );
 226         strftime( buf, sizeof(buf), "%Y%m%d%H%M%SZ", ltm );
 227 #else
 228         ltm = localtime( &starttime );
 229         strftime( buf, sizeof(buf), "%y%m%d%H%M%SZ", ltm );
 230 #endif
 231         ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
 232
 233         val.bv_val = buf;
 234         val.bv_len = strlen( buf );
 235         attr_merge( e, "starttime", vals );
 236
 237         sprintf( buf, "%d", nbackends );
 238         val.bv_val = buf;
 239         val.bv_len = strlen( buf );
 240         attr_merge( e, "nbackends", vals );
 241
 242 #ifdef HAVE_THREAD_CONCURRENCY
 243         sprintf( buf, "%d", ldap_pvt_thread_get_concurrency() );
 244         val.bv_val = buf;
 245         val.bv_len = strlen( buf );
 246         attr_merge( e, "concurrency", vals );
 247 #endif
 248
 249         send_search_entry( &backends[0], conn, op, e,
 250                 NULL, 0, 1, NULL );
 251         send_search_result( conn, op, LDAP_SUCCESS,
 252                 NULL, NULL, NULL, NULL, 1 );
 253
 254         entry_free( e );
 255 }
 256
 257 #endif /* slapd_monitor_dn */