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 /* Revision history
  14  *
  15  * 5-Jun-96     jeff.hodges@stanford.edu
  16  *      Added locking of new_conn_mutex when traversing the c[] array.
  17  *      Added locking of currenttime_mutex to protect call(s) to localtime().
  18  */
  19
  20 #include "portable.h"
  21
  22 #include <stdio.h>
  23
  24 #include <ac/socket.h>
  25 #include <ac/string.h>
  26 #include <ac/time.h>
  27
  28 #include "slap.h"
  29 #include "ldapconfig.h"
  30
  31 #if defined( SLAPD_MONITOR_DN )
  32
  33 extern int              nbackends;
  34 extern Backend          *backends;
  35 extern int              active_threads;
  36 extern int              dtblsize;
  37 extern Connection       *c;
  38 extern long             ops_initiated;
  39 extern long             ops_completed;
  40 extern long             num_entries_sent;
  41 extern long             num_bytes_sent;
  42 extern time_t           currenttime;
  43 extern time_t           starttime;
  44 extern int              num_conns;
  45
  46 extern pthread_mutex_t  new_conn_mutex;
  47 extern pthread_mutex_t  currenttime_mutex;
  48
  49 extern char Versionstr[];
  50
  51 void
  52 monitor_info( Connection *conn, Operation *op )
  53 {
  54         Entry           *e;
  55         char            buf[BUFSIZ], buf2[22];
  56         struct berval   val;
  57         struct berval   *vals[2];
  58         int             i, nconns, nwritewaiters, nreadwaiters;
  59         struct tm       *ltm;
  60         char            *p, *tmpdn;
  61
  62         vals[0] = &val;
  63         vals[1] = NULL;
  64
  65         e = (Entry *) ch_calloc( 1, sizeof(Entry) );
  66         /* initialize reader/writer lock */
  67         entry_rdwr_init(e);
  68         e->e_attrs = NULL;
  69         e->e_dn = strdup( SLAPD_MONITOR_DN );
  70
  71         val.bv_val = 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         sprintf( buf, "%d", active_threads );
  80         val.bv_val = buf;
  81         val.bv_len = strlen( buf );
  82         attr_merge( e, "threads", vals );
  83
  84         nconns = 0;
  85         nwritewaiters = 0;
  86         nreadwaiters = 0;
  87
  88         pthread_mutex_lock( &new_conn_mutex );
  89         for ( i = 0; i < dtblsize; i++ ) {
  90                 if ( c[i].c_sb.sb_sd != -1 ) {
  91                         nconns++;
  92                         if ( c[i].c_writewaiter ) {
  93                                 nwritewaiters++;
  94                         }
  95                         if ( c[i].c_gettingber ) {
  96                                 nreadwaiters++;
  97                         }
  98                         pthread_mutex_lock( &currenttime_mutex );
  99 #ifndef LDAP_LOCALTIME
 100                         ltm = gmtime( &c[i].c_starttime );
 101                         strftime( buf2, sizeof(buf2), "%Y%m%d%H%M%SZ", ltm );
 102 #else
 103                         ltm = localtime( &c[i].c_starttime );
 104                         strftime( buf2, sizeof(buf2), "%y%m%d%H%M%SZ", ltm );
 105 #endif
 106                         pthread_mutex_unlock( &currenttime_mutex );
 107
 108                         pthread_mutex_lock( &c[i].c_dnmutex );
 109                         sprintf( buf, "%d : %s : %ld : %ld : %s : %s%s", i,
 110                             buf2, c[i].c_opsinitiated, c[i].c_opscompleted,
 111                             c[i].c_dn ? c[i].c_dn : "NULLDN",
 112                             c[i].c_gettingber ? "r" : "",
 113                             c[i].c_writewaiter ? "w" : "" );
 114                         pthread_mutex_unlock( &c[i].c_dnmutex );
 115                         val.bv_val = buf;
 116                         val.bv_len = strlen( buf );
 117                         attr_merge( e, "connection", vals );
 118                 }
 119         }
 120         pthread_mutex_unlock( &new_conn_mutex );
 121
 122         sprintf( buf, "%d", nconns );
 123         val.bv_val = buf;
 124         val.bv_len = strlen( buf );
 125         attr_merge( e, "currentconnections", vals );
 126
 127         sprintf( buf, "%d", num_conns );
 128         val.bv_val = buf;
 129         val.bv_len = strlen( buf );
 130         attr_merge( e, "totalconnections", vals );
 131
 132         sprintf( buf, "%d", dtblsize );
 133         val.bv_val = buf;
 134         val.bv_len = strlen( buf );
 135         attr_merge( e, "dtablesize", vals );
 136
 137         sprintf( buf, "%d", nwritewaiters );
 138         val.bv_val = buf;
 139         val.bv_len = strlen( buf );
 140         attr_merge( e, "writewaiters", vals );
 141
 142         sprintf( buf, "%d", nreadwaiters );
 143         val.bv_val = buf;
 144         val.bv_len = strlen( buf );
 145         attr_merge( e, "readwaiters", vals );
 146
 147         sprintf( buf, "%ld", ops_initiated );
 148         val.bv_val = buf;
 149         val.bv_len = strlen( buf );
 150         attr_merge( e, "opsinitiated", vals );
 151
 152         sprintf( buf, "%ld", ops_completed );
 153         val.bv_val = buf;
 154         val.bv_len = strlen( buf );
 155         attr_merge( e, "opscompleted", vals );
 156
 157         sprintf( buf, "%ld", num_entries_sent );
 158         val.bv_val = buf;
 159         val.bv_len = strlen( buf );
 160         attr_merge( e, "entriessent", vals );
 161
 162         sprintf( buf, "%ld", num_bytes_sent );
 163         val.bv_val = buf;
 164         val.bv_len = strlen( buf );
 165         attr_merge( e, "bytessent", vals );
 166
 167         pthread_mutex_lock( &currenttime_mutex );
 168 #ifndef LDAP_LOCALTIME
 169         ltm = gmtime( &currenttime );
 170         strftime( buf, sizeof(buf), "%Y%m%d%H%M%SZ", ltm );
 171 #else
 172         ltm = localtime( &currenttime );
 173         strftime( buf, sizeof(buf), "%y%m%d%H%M%SZ", ltm );
 174 #endif
 175         pthread_mutex_unlock( &currenttime_mutex );
 176         val.bv_val = buf;
 177         val.bv_len = strlen( buf );
 178         attr_merge( e, "currenttime", vals );
 179
 180         pthread_mutex_lock( &currenttime_mutex );
 181 #ifndef LDAP_LOCALTIME
 182         ltm = gmtime( &starttime );
 183         strftime( buf, sizeof(buf), "%Y%m%d%H%M%SZ", ltm );
 184 #else
 185         ltm = localtime( &starttime );
 186         strftime( buf, sizeof(buf), "%y%m%d%H%M%SZ", ltm );
 187 #endif
 188         pthread_mutex_unlock( &currenttime_mutex );
 189         val.bv_val = buf;
 190         val.bv_len = strlen( buf );
 191         attr_merge( e, "starttime", vals );
 192
 193         sprintf( buf, "%d", nbackends );
 194         val.bv_val = buf;
 195         val.bv_len = strlen( buf );
 196         attr_merge( e, "nbackends", vals );
 197
 198 #ifdef HAVE_LWP_THR
 199         sprintf( buf, "%d", thr_getconcurrency() );
 200         val.bv_val = buf;
 201         val.bv_len = strlen( buf );
 202         attr_merge( e, "concurrency", vals );
 203 #endif
 204
 205         send_search_entry( &backends[0], conn, op, e, NULL, 0 );
 206         send_ldap_search_result( conn, op, LDAP_SUCCESS, NULL, NULL, 1 );
 207
 208         entry_free( e );
 209 }
 210
 211 #endif /* slapd_monitor_dn */