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

   1 /* conn.c - deal with connection subsystem */
   2 /*
   3  * Copyright 1998-2002 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
  38 #include "slap.h"
  39 #include "back-monitor.h"
  40
  41 #define CONN_CN_PREFIX  "Connection"
  42
  43 int
  44 monitor_subsys_conn_init(
  45         BackendDB               *be
  46 )
  47 {
  48         struct monitorinfo      *mi;
  49
  50         Entry                   *e, *e_tmp, *e_conn;
  51         struct monitorentrypriv *mp;
  52         char                    buf[1024];
  53         struct berval           bv[2];
  54
  55         assert( be != NULL );
  56
  57         mi = ( struct monitorinfo * )be->be_private;
  58
  59         if ( monitor_cache_get( mi,
  60                         &monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn, &e_conn ) ) {
  61 #ifdef NEW_LOGGING
  62                 LDAP_LOG(( "operation", LDAP_LEVEL_CRIT,
  63                         "monitor_subsys_conn_init: "
  64                         "unable to get entry '%s'\n",
  65                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val ));
  66 #else
  67                 Debug( LDAP_DEBUG_ANY,
  68                         "monitor_subsys_conn_init: "
  69                         "unable to get entry '%s'\n%s%s",
  70                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val,
  71                         "", "" );
  72 #endif
  73                 return( -1 );
  74         }
  75
  76         e_tmp = NULL;
  77
  78         /*
  79          * Total conns
  80          */
  81         snprintf( buf, sizeof( buf ),
  82                 "dn: cn=Total,%s\n"
  83                 SLAPD_MONITOR_OBJECTCLASSES
  84                 "cn: Total\n",
  85                 monitor_subsys[SLAPD_MONITOR_CONN].mss_dn.bv_val );
  86
  87         e = str2entry( buf );
  88         if ( e == NULL ) {
  89 #ifdef NEW_LOGGING
  90                 LDAP_LOG(( "operation", LDAP_LEVEL_CRIT,
  91                         "monitor_subsys_conn_init: "
  92                         "unable to create entry 'cn=Total,%s'\n",
  93                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val ));
  94 #else
  95                 Debug( LDAP_DEBUG_ANY,
  96                         "monitor_subsys_conn_init: "
  97                         "unable to create entry 'cn=Total,%s'\n%s%s",
  98                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val,
  99                         "", "" );
 100 #endif
 101                 return( -1 );
 102         }
 103
 104         bv[1].bv_val = NULL;
 105         bv[0].bv_val = "0";
 106         bv[0].bv_len = 1;
 107         attr_merge( e, monitor_ad_desc, bv );
 108
 109         mp = ( struct monitorentrypriv * )ch_calloc( sizeof( struct monitorentrypriv ), 1 );
 110         e->e_private = ( void * )mp;
 111         mp->mp_next = e_tmp;
 112         mp->mp_children = NULL;
 113         mp->mp_info = &monitor_subsys[SLAPD_MONITOR_CONN];
 114         mp->mp_flags = monitor_subsys[SLAPD_MONITOR_CONN].mss_flags \
 115                 | MONITOR_F_SUB | MONITOR_F_PERSISTENT;
 116         mp->mp_flags &= ~MONITOR_F_VOLATILE_CH;
 117
 118         if ( monitor_cache_add( mi, e ) ) {
 119 #ifdef NEW_LOGGING
 120                 LDAP_LOG(( "operation", LDAP_LEVEL_CRIT,
 121                         "monitor_subsys_conn_init: "
 122                         "unable to add entry 'cn=Total,%s'\n",
 123                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val ));
 124 #else
 125                 Debug( LDAP_DEBUG_ANY,
 126                         "monitor_subsys_conn_init: "
 127                         "unable to add entry 'cn=Total,%s'\n%s%s",
 128                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val,
 129                         "", "" );
 130 #endif
 131                 return( -1 );
 132         }
 133
 134         e_tmp = e;
 135
 136         /*
 137          * Current conns
 138          */
 139         snprintf( buf, sizeof( buf ),
 140                 "dn: cn=Current,%s\n"
 141                 SLAPD_MONITOR_OBJECTCLASSES
 142                 "cn: Current\n",
 143                 monitor_subsys[SLAPD_MONITOR_CONN].mss_dn.bv_val );
 144
 145         e = str2entry( buf );
 146         if ( e == NULL ) {
 147 #ifdef NEW_LOGGING
 148                 LDAP_LOG(( "operation", LDAP_LEVEL_CRIT,
 149                         "monitor_subsys_conn_init: "
 150                         "unable to create entry 'cn=Current,%s'\n",
 151                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val ));
 152 #else
 153                 Debug( LDAP_DEBUG_ANY,
 154                         "monitor_subsys_conn_init: "
 155                         "unable to create entry 'cn=Current,%s'\n%s%s",
 156                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val,
 157                         "", "" );
 158 #endif
 159                 return( -1 );
 160         }
 161
 162         mp = ( struct monitorentrypriv * )ch_calloc( sizeof( struct monitorentrypriv ), 1 );
 163         e->e_private = ( void * )mp;
 164         mp->mp_next = e_tmp;
 165         mp->mp_children = NULL;
 166         mp->mp_info = &monitor_subsys[SLAPD_MONITOR_CONN];
 167         mp->mp_flags = monitor_subsys[SLAPD_MONITOR_CONN].mss_flags \
 168                 | MONITOR_F_SUB | MONITOR_F_PERSISTENT;
 169         mp->mp_flags &= ~MONITOR_F_VOLATILE_CH;
 170
 171         if ( monitor_cache_add( mi, e ) ) {
 172 #ifdef NEW_LOGGING
 173                 LDAP_LOG(( "operation", LDAP_LEVEL_CRIT,
 174                         "monitor_subsys_conn_init: "
 175                         "unable to add entry 'cn=Current,%s'\n",
 176                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val ));
 177 #else
 178                 Debug( LDAP_DEBUG_ANY,
 179                         "monitor_subsys_conn_init: "
 180                         "unable to add entry 'cn=Current,%s'\n%s%s",
 181                         monitor_subsys[SLAPD_MONITOR_CONN].mss_ndn.bv_val,
 182                         "", "" );
 183 #endif
 184                 return( -1 );
 185         }
 186
 187         e_tmp = e;
 188
 189         mp = ( struct monitorentrypriv * )e_conn->e_private;
 190         mp->mp_children = e_tmp;
 191
 192         monitor_cache_release( mi, e_conn );
 193
 194         return( 0 );
 195 }
 196
 197 int
 198 monitor_subsys_conn_update(
 199         struct monitorinfo      *mi,
 200         Entry                   *e
 201 )
 202 {
 203         long            n = -1;
 204
 205         assert( mi );
 206         assert( e );
 207
 208         if ( strncasecmp( e->e_ndn, "CN=TOTAL",
 209                                 sizeof("CN=TOTAL")-1 ) == 0 ) {
 210                 n = connections_nextid();
 211
 212         } else if ( strncasecmp( e->e_ndn, "CN=CURRENT",
 213                                 sizeof("CN=CURRENT")-1 ) == 0 ) {
 214                 Connection      *c;
 215                 int             connindex;
 216
 217                 for ( n = 0, c = connection_first( &connindex );
 218                                 c != NULL;
 219                                 n++, c = connection_next( c, &connindex ) ) {
 220                         /* No Op */ ;
 221                 }
 222                 connection_done(c);
 223         }
 224
 225         if ( n != -1 ) {
 226                 Attribute       *a;
 227                 char            buf[16];
 228
 229                 a = attr_find( e->e_attrs, monitor_ad_desc );
 230                 if ( a == NULL ) {
 231                         return( -1 );
 232                 }
 233
 234                 snprintf( buf, sizeof( buf ), "%ld", n );
 235                 free( a->a_vals[ 0 ].bv_val );
 236                 ber_str2bv( buf, 0, 1, a->a_vals );
 237         }
 238
 239         return( 0 );
 240 }
 241
 242 static int
 243 conn_create(
 244         Connection              *c,
 245         Entry                   **ep
 246 )
 247 {
 248         struct monitorentrypriv *mp;
 249         struct tm               *ltm;
 250         char                    buf[1024];
 251         char                    buf2[22];
 252         char                    buf3[22];
 253
 254         struct berval           bv[2];
 255
 256         Entry                   *e;
 257
 258         assert( c != NULL );
 259         assert( ep != NULL );
 260
 261         snprintf( buf, sizeof( buf ),
 262                 "dn: cn=" CONN_CN_PREFIX " %ld,%s\n"
 263                 SLAPD_MONITOR_OBJECTCLASSES
 264                 "cn: " CONN_CN_PREFIX " %ld\n",
 265                 c->c_connid, monitor_subsys[SLAPD_MONITOR_CONN].mss_dn.bv_val,
 266                 c->c_connid );
 267         e = str2entry( buf );
 268
 269         if ( e == NULL) {
 270 #ifdef NEW_LOGGING
 271                 LDAP_LOG(( "operation", LDAP_LEVEL_CRIT,
 272                         "monitor_subsys_conn_create: "
 273                         "unable to create entry "
 274                         "'cn=" CONN_CN_PREFIX " %ld,%s' entry\n",
 275                         c->c_connid,
 276                         monitor_subsys[SLAPD_MONITOR_CONN].mss_dn.bv_val ));
 277 #else
 278                 Debug( LDAP_DEBUG_ANY,
 279                         "monitor_subsys_conn_create: "
 280                         "unable to create entry "
 281                         "'cn=" CONN_CN_PREFIX " %ld,%s' entry\n",
 282                         c->c_connid,
 283                         monitor_subsys[SLAPD_MONITOR_CONN].mss_dn.bv_val, 0 );
 284 #endif
 285                 return( -1 );
 286         }
 287
 288         ldap_pvt_thread_mutex_lock( &gmtime_mutex );
 289
 290         ltm = gmtime( &c->c_starttime );
 291         strftime( buf2, sizeof(buf2), "%Y%m%d%H%M%SZ", ltm );
 292
 293         ltm = gmtime( &c->c_activitytime );
 294         strftime( buf3, sizeof(buf2), "%Y%m%d%H%M%SZ", ltm );
 295
 296         ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
 297
 298         sprintf( buf,
 299                 "%ld : %ld "
 300                 ": %ld/%ld/%ld/%ld "
 301                 ": %ld/%ld/%ld "
 302                 ": %s%s%s%s%s%s "
 303                 ": %s : %s : %s "
 304                 ": %s : %s : %s : %s",
 305                 c->c_connid,
 306                 (long) c->c_protocol,
 307                 c->c_n_ops_received, c->c_n_ops_executing,
 308                 c->c_n_ops_pending, c->c_n_ops_completed,
 309
 310                 /* add low-level counters here */
 311                 c->c_n_get, c->c_n_read, c->c_n_write,
 312
 313                 c->c_currentber ? "r" : "",
 314                 c->c_writewaiter ? "w" : "",
 315                 LDAP_STAILQ_EMPTY( &c->c_ops ) ? "" : "x",
 316                 LDAP_STAILQ_EMPTY( &c->c_pending_ops ) ? "" : "p",
 317                 connection_state2str( c->c_conn_state ),
 318                 c->c_sasl_bind_in_progress ? "S" : "",
 319
 320                 c->c_cdn.bv_len ? c->c_cdn.bv_val : SLAPD_ANONYMOUS,
 321
 322                 c->c_listener_url.bv_val,
 323                 c->c_peer_domain.bv_val,
 324                 c->c_peer_name.bv_val,
 325                 c->c_sock_name.bv_val,
 326
 327                 buf2,
 328                 buf3
 329                 );
 330
 331         bv[1].bv_val = NULL;
 332         bv[0].bv_val = buf;
 333         bv[0].bv_len = strlen( buf );
 334         attr_merge( e, monitor_ad_desc, bv );
 335
 336         mp = ( struct monitorentrypriv * )ch_calloc( sizeof( struct monitorentrypriv ), 1 );
 337         e->e_private = ( void * )mp;
 338         mp->mp_info = &monitor_subsys[ SLAPD_MONITOR_CONN ];
 339         mp->mp_children = NULL;
 340         mp->mp_flags = MONITOR_F_SUB | MONITOR_F_VOLATILE;
 341
 342         *ep = e;
 343
 344         return( 0 );
 345 }
 346
 347 int
 348 monitor_subsys_conn_create(
 349         struct monitorinfo      *mi,
 350         struct berval           *ndn,
 351         Entry                   *e_parent,
 352         Entry                   **ep
 353 )
 354 {
 355         Connection              *c;
 356         int                     connindex;
 357         struct monitorentrypriv *mp;
 358
 359         assert( mi != NULL );
 360         assert( e_parent != NULL );
 361         assert( ep != NULL );
 362
 363         *ep = NULL;
 364
 365         if ( ndn == NULL ) {
 366                 Entry *e, *e_tmp = NULL;
 367
 368                 /* create all the children of e_parent */
 369                 for ( c = connection_first( &connindex );
 370                                 c != NULL;
 371                                 c = connection_next( c, &connindex )) {
 372                         if ( conn_create( c, &e ) || e == NULL ) {
 373                                 connection_done(c);
 374                                 for ( ; e_tmp != NULL; ) {
 375                                         mp = ( struct monitorentrypriv * )e_tmp->e_private;
 376                                         e = mp->mp_next;
 377
 378                                         ch_free( mp );
 379                                         e_tmp->e_private = NULL;
 380                                         entry_free( e_tmp );
 381
 382                                         e_tmp = e;
 383                                 }
 384                                 return( -1 );
 385                         }
 386                         mp = ( struct monitorentrypriv * )e->e_private;
 387                         mp->mp_next = e_tmp;
 388                         e_tmp = e;
 389                 }
 390                 connection_done(c);
 391
 392                 *ep = e;
 393
 394         } else {
 395                 LDAPRDN         *values = NULL;
 396                 const char      *text = NULL;
 397                 unsigned long   connid;
 398
 399                 /* create exactly the required entry */
 400
 401                 if ( ldap_bv2rdn( ndn, &values, (char **)&text,
 402                         LDAP_DN_FORMAT_LDAP ) )
 403                 {
 404                         return( -1 );
 405                 }
 406
 407                 assert( values );
 408                 assert( values[ 0 ][ 0 ] );
 409
 410                 connid = atol( values[ 0 ][ 0 ]->la_value.bv_val
 411                                 + sizeof( CONN_CN_PREFIX ) );
 412
 413                 ldap_rdnfree( values );
 414
 415                 for ( c = connection_first( &connindex );
 416                                 c != NULL;
 417                                 c = connection_next( c, &connindex )) {
 418                         if ( c->c_connid == connid ) {
 419                                 if ( conn_create( c, ep ) || *ep == NULL ) {
 420                                         connection_done(c);
 421                                         return( -1 );
 422                                 }
 423
 424                                 break;
 425                         }
 426                 }
 427
 428                 connection_done(c);
 429
 430         }
 431
 432         return( 0 );
 433 }
 434