Varnish plugin: Correctly dispatch gauge and derive data types.
[collectd.git] / src / varnish.c
1 /**
2  * collectd - src/varnish.c
3  * Copyright (C) 2010 Jerome Renard
4  *
5  * This program is free software; you can redistribute it and/or modify it
6  * under the terms of the GNU General Public License as published by the
7  * Free Software Foundation; only version 2 of the License is applicable.
8  *
9  * This program is distributed in the hope that it will be useful, but
10  * WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License along
15  * with this program; if not, write to the Free Software Foundation, Inc.,
16  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
17  *
18  * Authors:
19  *   Jerome Renard <jerome.renard@gmail.com>
20  **/
21
22 /**
23  * Current list of what is monitored and what is not monitored (yet)
24  * {{{
25  * Field name           Description                           Monitored
26  * ----------           -----------                           ---------
27  * uptime               Child uptime                              N
28  * client_conn          Client connections accepted               Y
29  * client_drop          Connection dropped, no sess               Y
30  * client_req           Client requests received                  Y
31  * cache_hit            Cache hits                                Y
32  * cache_hitpass        Cache hits for pass                       Y
33  * cache_miss           Cache misses                              Y
34  * backend_conn         Backend conn. success                     Y
35  * backend_unhealthy    Backend conn. not attempted               Y
36  * backend_busy         Backend conn. too many                    Y
37  * backend_fail         Backend conn. failures                    Y
38  * backend_reuse        Backend conn. reuses                      Y
39  * backend_toolate      Backend conn. was closed                  Y
40  * backend_recycle      Backend conn. recycles                    Y
41  * backend_unused       Backend conn. unused                      Y
42  * fetch_head           Fetch head                                Y
43  * fetch_length         Fetch with Length                         Y
44  * fetch_chunked        Fetch chunked                             Y
45  * fetch_eof            Fetch EOF                                 Y
46  * fetch_bad            Fetch had bad headers                     Y
47  * fetch_close          Fetch wanted close                        Y
48  * fetch_oldhttp        Fetch pre HTTP/1.1 closed                 Y
49  * fetch_zero           Fetch zero len                            Y
50  * fetch_failed         Fetch failed                              Y
51  * n_sess_mem           N struct sess_mem                         N
52  * n_sess               N struct sess                             N
53  * n_object             N struct object                           N
54  * n_vampireobject      N unresurrected objects                   N
55  * n_objectcore         N struct objectcore                       N
56  * n_objecthead         N struct objecthead                       N
57  * n_smf                N struct smf                              N
58  * n_smf_frag           N small free smf                          N
59  * n_smf_large          N large free smf                          N
60  * n_vbe_conn           N struct vbe_conn                         N
61  * n_wrk                N worker threads                          N
62  * n_wrk_create         N worker threads created                  N
63  * n_wrk_failed         N worker threads not created              N
64  * n_wrk_max            N worker threads limited                  N
65  * n_wrk_queue          N queued work requests                    N
66  * n_wrk_overflow       N overflowed work requests                N
67  * n_wrk_drop           N dropped work requests                   N
68  * n_backend            N backends                                N
69  * n_expired            N expired objects                         N
70  * n_lru_nuked          N LRU nuked objects                       N
71  * n_lru_saved          N LRU saved objects                       N
72  * n_lru_moved          N LRU moved objects                       N
73  * n_deathrow           N objects on deathrow                     N
74  * losthdr              HTTP header overflows                     N
75  * n_objsendfile        Objects sent with sendfile                N
76  * n_objwrite           Objects sent with write                   N
77  * n_objoverflow        Objects overflowing workspace             N
78  * s_sess               Total Sessions                            N
79  * s_req                Total Requests                            N
80  * s_pipe               Total pipe                                N
81  * s_pass               Total pass                                N
82  * s_fetch              Total fetch                               N
83  * s_hdrbytes           Total header bytes                        N
84  * s_bodybytes          Total body bytes                          N
85  * sess_closed          Session Closed                            N
86  * sess_pipeline        Session Pipeline                          N
87  * sess_readahead       Session Read Ahead                        N
88  * sess_linger          Session Linger                            N
89  * sess_herd            Session herd                              N
90  * shm_records          SHM records                               Y
91  * shm_writes           SHM writes                                Y
92  * shm_flushes          SHM flushes due to overflow               Y
93  * shm_cont             SHM MTX contention                        Y
94  * shm_cycles           SHM cycles through buffer                 Y
95  * sm_nreq              allocator requests                        Y
96  * sm_nobj              outstanding allocations                   Y
97  * sm_balloc            bytes allocated                           Y
98  * sm_bfree             bytes free                                Y
99  * sma_nreq             SMA allocator requests                    Y
100  * sma_nobj             SMA outstanding allocations               Y
101  * sma_nbytes           SMA outstanding bytes                     Y
102  * sma_balloc           SMA bytes allocated                       Y
103  * sma_bfree            SMA bytes free                            Y
104  * sms_nreq             SMS allocator requests                    Y
105  * sms_nobj             SMS outstanding allocations               Y
106  * sms_nbytes           SMS outstanding bytes                     Y
107  * sms_balloc           SMS bytes allocated                       Y
108  * sms_bfree            SMS bytes freed                           Y
109  * backend_req          Backend requests made                     N
110  * n_vcl                N vcl total                               N
111  * n_vcl_avail          N vcl available                           N
112  * n_vcl_discard        N vcl discarded                           N
113  * n_purge              N total active purges                     N
114  * n_purge_add          N new purges added                        N
115  * n_purge_retire       N old purges deleted                      N
116  * n_purge_obj_test     N objects tested                          N
117  * n_purge_re_test      N regexps tested against                  N
118  * n_purge_dups         N duplicate purges removed                N
119  * hcb_nolock           HCB Lookups without lock                  Y
120  * hcb_lock             HCB Lookups with lock                     Y
121  * hcb_insert           HCB Inserts                               Y
122  * esi_parse            Objects ESI parsed (unlock)               Y
123  * esi_errors           ESI parse errors (unlock)                 Y
124  * }}}
125  */
126 #include "collectd.h"
127 #include "common.h"
128 #include "plugin.h"
129 #include "configfile.h"
130
131 #include <varnish/varnishapi.h>
132
133 /* {{{ user_config_s */
134 struct user_config_s {
135         char *instance;
136
137         _Bool monitor_cache;
138         _Bool monitor_connections;
139         _Bool monitor_esi;
140         _Bool monitor_backend;
141         _Bool monitor_fetch;
142         _Bool monitor_hcb;
143         _Bool monitor_shm;
144         _Bool monitor_sma;
145         _Bool monitor_sms;
146         _Bool monitor_sm;
147 };
148 typedef struct user_config_s user_config_t; /* }}} */
149
150 static _Bool have_instance = 0;
151
152 static int varnish_submit (const char *plugin_instance, /* {{{ */
153                 const char *type, const char *type_instance, value_t value)
154 {
155         value_list_t vl = VALUE_LIST_INIT;
156
157         vl.values = &value;
158         vl.values_len = 1;
159
160         sstrncpy(vl.host, hostname_g, sizeof(vl.host));
161
162         sstrncpy(vl.plugin, "varnish", sizeof(vl.plugin));
163         if (plugin_instance != NULL)
164                 sstrncpy (vl.plugin_instance, plugin_instance,
165                                 sizeof (vl.plugin_instance));
166
167         sstrncpy(vl.type, type, sizeof(vl.type));
168         if (type_instance != NULL)
169                 sstrncpy(vl.type_instance, type_instance,
170                                 sizeof(vl.type_instance));
171
172         return (plugin_dispatch_values(&vl));
173 } /* }}} int varnish_submit */
174
175 static int varnish_submit_gauge (const char *plugin_instance, /* {{{ */
176                 const char *type, const char *type_instance,
177                 uint64_t gauge_value)
178 {
179         value_t value;
180
181         value.gauge = (gauge_t) gauge_value;
182
183         return (varnish_submit (plugin_instance, type, type_instance, value));
184 } /* }}} int varnish_submit_gauge */
185
186 static int varnish_submit_derive (const char *plugin_instance, /* {{{ */
187                 const char *type, const char *type_instance,
188                 uint64_t derive_value)
189 {
190         value_t value;
191
192         value.derive = (derive_t) derive_value;
193
194         return (varnish_submit (plugin_instance, type, type_instance, value));
195 } /* }}} int varnish_submit_derive */
196
197 static void varnish_monitor(const user_config_t *conf, struct varnish_stats *VSL_stats) /* {{{ */
198 {
199         if(conf->monitor_cache)
200         {
201                 varnish_submit_derive (conf->instance, "varnish_cache_ratio", "cache_hit"    , VSL_stats->cache_hit);     /* Cache hits          */
202                 varnish_submit_derive (conf->instance, "varnish_cache_ratio", "cache_miss"   , VSL_stats->cache_miss);    /* Cache misses        */
203                 varnish_submit_derive (conf->instance, "varnish_cache_ratio", "cache_hitpass", VSL_stats->cache_hitpass); /* Cache hits for pass */
204         }
205
206         if(conf->monitor_connections)
207         {
208                 varnish_submit_derive (conf->instance, "varnish_connections", "client_connections-accepted", VSL_stats->client_conn); /* Client connections accepted */
209                 varnish_submit_derive (conf->instance, "varnish_connections", "client_connections-dropped" , VSL_stats->client_drop); /* Connection dropped, no sess */
210                 varnish_submit_derive (conf->instance, "varnish_connections", "client_connections-received", VSL_stats->client_req);  /* Client requests received    */
211         }
212
213         if(conf->monitor_esi)
214         {
215                 varnish_submit_derive (conf->instance, "varnish_esi", "esi_parsed", VSL_stats->esi_parse);  /* Objects ESI parsed (unlock) */
216                 varnish_submit_derive (conf->instance, "varnish_esi", "esi_errors", VSL_stats->esi_errors); /* ESI parse errors (unlock)   */
217         }
218
219         if(conf->monitor_backend)
220         {
221                 varnish_submit_derive (conf->instance, "varnish_backend_connections", "backend_connections-success"      , VSL_stats->backend_conn);      /* Backend conn. success       */
222                 varnish_submit_derive (conf->instance, "varnish_backend_connections", "backend_connections-not-attempted", VSL_stats->backend_unhealthy); /* Backend conn. not attempted */
223                 varnish_submit_derive (conf->instance, "varnish_backend_connections", "backend_connections-too-many"     , VSL_stats->backend_busy);      /* Backend conn. too many      */
224                 varnish_submit_derive (conf->instance, "varnish_backend_connections", "backend_connections-failures"     , VSL_stats->backend_fail);      /* Backend conn. failures      */
225                 varnish_submit_derive (conf->instance, "varnish_backend_connections", "backend_connections-reuses"       , VSL_stats->backend_reuse);     /* Backend conn. reuses        */
226                 varnish_submit_derive (conf->instance, "varnish_backend_connections", "backend_connections-was-closed"   , VSL_stats->backend_toolate);   /* Backend conn. was closed    */
227                 varnish_submit_derive (conf->instance, "varnish_backend_connections", "backend_connections-recycles"     , VSL_stats->backend_recycle);   /* Backend conn. recycles      */
228                 varnish_submit_derive (conf->instance, "varnish_backend_connections", "backend_connections-unused"       , VSL_stats->backend_unused);    /* Backend conn. unused        */
229         }
230
231         if(conf->monitor_fetch)
232         {
233                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_head"       , VSL_stats->fetch_head);    /* Fetch head                */
234                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_length"     , VSL_stats->fetch_length);  /* Fetch with length         */
235                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_chunked"    , VSL_stats->fetch_chunked); /* Fetch chunked             */
236                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_eof"        , VSL_stats->fetch_eof);     /* Fetch EOF                 */
237                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_bad-headers", VSL_stats->fetch_bad);     /* Fetch bad headers         */
238                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_close"      , VSL_stats->fetch_close);   /* Fetch wanted close        */
239                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_oldhttp"    , VSL_stats->fetch_oldhttp); /* Fetch pre HTTP/1.1 closed */
240                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_zero"       , VSL_stats->fetch_zero);    /* Fetch zero len            */
241                 varnish_submit_derive (conf->instance, "varnish_fetch", "fetch_failed"     , VSL_stats->fetch_failed);  /* Fetch failed              */
242         }
243
244         if(conf->monitor_hcb)
245         {
246                 varnish_submit_derive (conf->instance, "varnish_hcb", "hcb_nolock", VSL_stats->hcb_nolock); /* HCB Lookups without lock */
247                 varnish_submit_derive (conf->instance, "varnish_hcb", "hcb_lock"  , VSL_stats->hcb_lock);   /* HCB Lookups with lock    */
248                 varnish_submit_derive (conf->instance, "varnish_hcb", "hcb_insert", VSL_stats->hcb_insert); /* HCB Inserts              */
249         }
250
251         if(conf->monitor_shm)
252         {
253                 varnish_submit_derive (conf->instance, "varnish_shm", "shm_records"   , VSL_stats->shm_records); /* SHM records                 */
254                 varnish_submit_derive (conf->instance, "varnish_shm", "shm_writes"    , VSL_stats->shm_writes);  /* SHM writes                  */
255                 varnish_submit_derive (conf->instance, "varnish_shm", "shm_flushes"   , VSL_stats->shm_flushes); /* SHM flushes due to overflow */
256                 varnish_submit_derive (conf->instance, "varnish_shm", "shm_contention", VSL_stats->shm_cont);    /* SHM MTX contention          */
257                 varnish_submit_derive (conf->instance, "varnish_shm", "shm_cycles"    , VSL_stats->shm_cycles);  /* SHM cycles through buffer   */
258         }
259
260         if(conf->monitor_sm)
261         {
262                 varnish_submit_derive (conf->instance, "varnish_sm", "sm_nreq"  , VSL_stats->sm_nreq);   /* allocator requests      */
263                 varnish_submit_gauge (conf->instance, "varnish_sm", "sm_nobj"  , VSL_stats->sm_nobj);   /* outstanding allocations */
264                 varnish_submit_gauge (conf->instance, "varnish_sm", "sm_balloc", VSL_stats->sm_balloc); /* bytes allocated         */
265                 varnish_submit_gauge (conf->instance, "varnish_sm", "sm_bfree" , VSL_stats->sm_bfree);  /* bytes free              */
266         }
267
268         if(conf->monitor_sma)
269         {
270                 varnish_submit_derive (conf->instance, "varnish_sma", "sma_req"   , VSL_stats->sma_nreq);   /* SMA allocator requests      */
271                 varnish_submit_gauge (conf->instance, "varnish_sma", "sma_nobj"  , VSL_stats->sma_nobj);   /* SMA outstanding allocations */
272                 varnish_submit_gauge (conf->instance, "varnish_sma", "sma_nbytes", VSL_stats->sma_nbytes); /* SMA outstanding bytes       */
273                 varnish_submit_gauge (conf->instance, "varnish_sma", "sma_balloc", VSL_stats->sma_balloc); /* SMA bytes allocated         */
274                 varnish_submit_gauge (conf->instance, "varnish_sma", "sma_bfree" , VSL_stats->sma_bfree);  /* SMA bytes free              */
275         }
276
277         if(conf->monitor_sms)
278         {
279                 varnish_submit_derive (conf->instance, "varnish_sms", "sms_nreq"  , VSL_stats->sms_nreq);   /* SMS allocator requests      */
280                 varnish_submit_gauge (conf->instance, "varnish_sms", "sms_nobj"  , VSL_stats->sms_nobj);   /* SMS outstanding allocations */
281                 varnish_submit_gauge (conf->instance, "varnish_sms", "sms_nbytes", VSL_stats->sms_nbytes); /* SMS outstanding bytes       */
282                 varnish_submit_gauge (conf->instance, "varnish_sms", "sms_balloc", VSL_stats->sms_balloc); /* SMS bytes allocated         */
283                 varnish_submit_gauge (conf->instance, "varnish_sms", "sms_bfree" , VSL_stats->sms_bfree);  /* SMS bytes freed             */
284         }
285 } /* }}} void varnish_monitor */
286
287 static int varnish_read(user_data_t *ud) /* {{{ */
288 {
289         struct varnish_stats *VSL_stats;
290         user_config_t *conf;
291
292         if ((ud == NULL) || (ud->data == NULL))
293                 return (EINVAL);
294
295         conf = ud->data;
296
297         VSL_stats = VSL_OpenStats(conf->instance);
298         if (VSL_stats == NULL)
299         {
300                 ERROR("Varnish plugin : unable to load statistics");
301
302                 return (-1);
303         }
304
305         varnish_monitor(conf, VSL_stats);
306
307     return (0);
308 } /* }}} */
309
310 static void varnish_config_free (void *ptr) /* {{{ */
311 {
312         user_config_t *conf = ptr;
313
314         if (conf == NULL)
315                 return;
316
317         sfree (conf->instance);
318         sfree (conf);
319 } /* }}} */
320
321 static int varnish_init (void) /* {{{ */
322 {
323         user_config_t *conf;
324         user_data_t ud;
325
326         if (have_instance)
327                 return (0);
328
329         conf = malloc (sizeof (*conf));
330         if (conf == NULL)
331                 return (ENOMEM);
332         memset (conf, 0, sizeof (*conf));
333
334         /* Default settings: */
335         conf->instance = NULL;
336         conf->monitor_cache = 1;
337         conf->monitor_backend = 1;
338         conf->monitor_connections = 1;
339         conf->monitor_shm = 1;
340
341         ud.data = conf;
342         ud.free_func = varnish_config_free;
343
344         plugin_register_complex_read (/* group = */ "varnish",
345                         /* name      = */ "varnish/localhost",
346                         /* callback  = */ varnish_read,
347                         /* interval  = */ NULL,
348                         /* user data = */ &ud);
349
350         return (0);
351 } /* }}} int varnish_init */
352
353 static int varnish_config_instance (const oconfig_item_t *ci) /* {{{ */
354 {
355         user_config_t *conf;
356         user_data_t ud;
357         char callback_name[DATA_MAX_NAME_LEN];
358         int i;
359
360         conf = malloc (sizeof (*conf));
361         if (conf == NULL)
362                 return (ENOMEM);
363         memset (conf, 0, sizeof (*conf));
364         conf->instance = NULL;
365
366         if (ci->values_num == 1)
367         {
368                 int status;
369
370                 status = cf_util_get_string (ci, &conf->instance);
371                 if (status != 0)
372                 {
373                         sfree (conf);
374                         return (status);
375                 }
376                 assert (conf->instance != NULL);
377
378                 if (strcmp ("localhost", conf->instance) == 0)
379                 {
380                         sfree (conf->instance);
381                         conf->instance = NULL;
382                 }
383         }
384         else if (ci->values_num > 1)
385         {
386                 WARNING ("Varnish plugin: \"Instance\" blocks accept only "
387                                 "one argument.");
388                 return (EINVAL);
389         }
390
391         for (i = 0; i < ci->children_num; i++)
392         {
393                 oconfig_item_t *child = ci->children + i;
394
395                 if (strcasecmp ("CollectCache", child->key) == 0)
396                         cf_util_get_boolean (child, &conf->monitor_cache);
397                 else if (strcasecmp ("CollectConnections", child->key) == 0)
398                         cf_util_get_boolean (child, &conf->monitor_connections);
399                 else if (strcasecmp ("CollectESI", child->key) == 0)
400                         cf_util_get_boolean (child, &conf->monitor_esi);
401                 else if (strcasecmp ("CollectBackend", child->key) == 0)
402                         cf_util_get_boolean (child, &conf->monitor_backend);
403                 else if (strcasecmp ("CollectFetch", child->key) == 0)
404                         cf_util_get_boolean (child, &conf->monitor_fetch);
405                 else if (strcasecmp ("CollectHCB", child->key) == 0)
406                         cf_util_get_boolean (child, &conf->monitor_hcb);
407                 else if (strcasecmp ("CollectSHM", child->key) == 0)
408                         cf_util_get_boolean (child, &conf->monitor_shm);
409                 else if (strcasecmp ("CollectSMA", child->key) == 0)
410                         cf_util_get_boolean (child, &conf->monitor_sma);
411                 else if (strcasecmp ("CollectSMS", child->key) == 0)
412                         cf_util_get_boolean (child, &conf->monitor_sms);
413                 else if (strcasecmp ("CollectSM", child->key) == 0)
414                         cf_util_get_boolean (child, &conf->monitor_sm);
415                 else
416                 {
417                         WARNING ("Varnish plugin: Ignoring unknown "
418                                         "configuration option: \"%s\"",
419                                         child->key);
420                 }
421         }
422
423         if (!conf->monitor_cache
424                         && !conf->monitor_connections
425                         && !conf->monitor_esi
426                         && !conf->monitor_backend
427                         && !conf->monitor_fetch
428                         && !conf->monitor_hcb
429                         && !conf->monitor_shm
430                         && !conf->monitor_sma
431                         && !conf->monitor_sms
432                         && !conf->monitor_sm)
433         {
434                 WARNING ("Varnish plugin: No metric has been configured for "
435                                 "instance \"%s\". Disabling this instance.",
436                                 (conf->instance == NULL) ? "localhost" : conf->instance);
437                 return (EINVAL);
438         }
439
440         ssnprintf (callback_name, sizeof (callback_name), "varnish/%s",
441                         (conf->instance == NULL) ? "localhost" : conf->instance);
442
443         ud.data = conf;
444         ud.free_func = varnish_config_free;
445
446         plugin_register_complex_read (/* group = */ "varnish",
447                         /* name      = */ callback_name,
448                         /* callback  = */ varnish_read,
449                         /* interval  = */ NULL,
450                         /* user data = */ &ud);
451
452         have_instance = 1;
453
454         return (0);
455 } /* }}} int varnish_config_instance */
456
457 static int varnish_config (oconfig_item_t *ci) /* {{{ */
458 {
459         int i;
460
461         for (i = 0; i < ci->children_num; i++)
462         {
463                 oconfig_item_t *child = ci->children + i;
464
465                 if (strcasecmp ("Instance", child->key) == 0)
466                         varnish_config_instance (child);
467                 else
468                 {
469                         WARNING ("Varnish plugin: Ignoring unknown "
470                                         "configuration option: \"%s\"",
471                                         child->key);
472                 }
473         }
474
475         return (0);
476 } /* }}} int varnish_config */
477
478 void module_register (void) /* {{{ */
479 {
480         plugin_register_complex_config("varnish", varnish_config);
481         plugin_register_init ("varnish", varnish_init);
482 } /* }}} */
483
484 /* vim: set sw=8 noet fdm=marker : */