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