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