1 /**
2 * collectd - src/zone.c
3 * Copyright (C) 2011 Mathijs Mohlmann
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 * Mathijs Mohlmann
20 * Dagobert Michelsen (forward-porting)
21 **/
23 #if HAVE_CONFIG_H
24 # include "config.h"
25 # undef HAVE_CONFIG_H
26 #endif
27 /* avoid procfs.h error "Cannot use procfs in the large file compilation environment" */
28 #if !defined(_LP64) && _FILE_OFFSET_BITS == 64
29 # undef _FILE_OFFSET_BITS
30 # undef _LARGEFILE64_SOURCE
31 #endif
33 #include "collectd.h"
35 #include "common.h"
36 #include "plugin.h"
38 #include <procfs.h>
39 #include <zone.h>
41 #include "utils_avltree.h"
43 #define MAX_PROCFS_PATH 40
44 #define FRC2PCT(pp)(((float)(pp))/0x8000*100)
46 typedef struct zone_stats {
47 ushort_t pctcpu;
48 ushort_t pctmem;
49 } zone_stats_t;
51 static int
52 zone_compare(const void *a, const void *b)
53 {
54 if (*(const zoneid_t *)a == *(const zoneid_t *)b)
55 return(0);
56 if (*(const zoneid_t *)a < *(const zoneid_t *)b)
57 return(-1);
58 return(1);
59 }
61 static int
62 zone_read_procfile(char const *pidstr, char const *name, void *buf, size_t bufsize)
63 {
64 int fd;
66 char procfile[MAX_PROCFS_PATH];
67 (void)snprintf(procfile, sizeof(procfile), "/proc/%s/%s", pidstr, name);
68 if ((fd = open(procfile, O_RDONLY)) == -1) {
69 return (1);
70 }
72 if (sread(fd, buf, bufsize) != 0) {
73 char errbuf[1024];
74 ERROR ("zone plugin: Reading \"%s\" failed: %s", procfile,
75 sstrerror (errno, errbuf, sizeof (errbuf)));
76 close(fd);
77 return (1);
78 }
80 close(fd);
81 return (0);
82 }
84 static int
85 zone_submit_value(char *zone, gauge_t value)
86 {
87 value_list_t vl = VALUE_LIST_INIT;
88 value_t values[1];
90 values[0].gauge = value;
92 vl.values = values;
93 vl.values_len = 1; /*STATIC_ARRAY_SIZE (values);*/
94 sstrncpy (vl.plugin, "zone", sizeof (vl.plugin));
95 sstrncpy (vl.type, "percent", sizeof (vl.type));
96 sstrncpy (vl.type_instance, zone, sizeof (vl.type_instance));
98 return(plugin_dispatch_values (&vl));
99 }
101 static zone_stats_t *
102 zone_find_stats(c_avl_tree_t *tree, zoneid_t zoneid)
103 {
104 zone_stats_t *ret = NULL;
105 zoneid_t *key = NULL;
107 if (c_avl_get(tree, (void **)&zoneid, (void **)&ret)) {
108 if (!(ret = malloc(sizeof(*ret)))) {
109 WARNING("zone plugin: no memory");
110 return(NULL);
111 }
112 if (!(key = malloc(sizeof(*key)))) {
113 WARNING("zone plugin: no memory");
114 free(ret);
115 return(NULL);
116 }
117 *key = zoneid;
118 if (c_avl_insert(tree, key, ret)) {
119 WARNING("zone plugin: error inserting into tree");
120 return(NULL);
121 }
122 }
123 return(ret);
124 }
126 static void
127 zone_submit_values(c_avl_tree_t *tree)
128 {
129 char zonename[ZONENAME_MAX];
130 zoneid_t *zoneid = NULL;
131 zone_stats_t *stats = NULL;
133 while (c_avl_pick (tree, (void **)&zoneid, (void **)&stats) == 0)
134 {
135 if (getzonenamebyid(*zoneid, zonename, sizeof( zonename )) == -1) {
136 WARNING("zone plugin: error retrieving zonename");
137 } else {
138 zone_submit_value(zonename, (gauge_t)FRC2PCT(stats->pctcpu));
139 }
140 free(stats);
141 free(zoneid);
142 }
143 c_avl_destroy(tree);
144 }
146 static c_avl_tree_t *
147 zone_scandir(DIR *procdir)
148 {
149 pid_t pid;
150 dirent_t *direntp;
151 psinfo_t psinfo;
152 c_avl_tree_t *tree;
153 zone_stats_t *stats;
155 if (!(tree=c_avl_create(zone_compare))) {
156 WARNING("zone plugin: Failed to create tree");
157 return(NULL);
158 }
160 rewinddir(procdir);
161 while ((direntp = readdir(procdir))) {
162 char const *pidstr = direntp->d_name;
163 if (pidstr[0] == '.') /* skip "." and ".." */
164 continue;
166 pid = atoi(pidstr);
167 if (pid == 0 || pid == 2 || pid == 3)
168 continue; /* skip sched, pageout and fsflush */
170 if (zone_read_procfile(pidstr, "psinfo", &psinfo, sizeof(psinfo_t)) != 0)
171 continue;
173 stats = zone_find_stats(tree, psinfo.pr_zoneid);
174 if( stats ) {
175 stats->pctcpu += psinfo.pr_pctcpu;
176 stats->pctmem += psinfo.pr_pctmem;
177 }
178 }
179 return(tree);
180 }
182 static int zone_read (void)
183 {
184 DIR *procdir;
185 c_avl_tree_t *tree;
187 if ((procdir = opendir("/proc")) == NULL) {
188 ERROR("zone plugin: cannot open /proc directory\n");
189 return (-1);
190 }
192 tree=zone_scandir(procdir);
193 closedir(procdir);
194 if (tree == NULL) {
195 return (-1);
196 }
197 zone_submit_values(tree); /* this also frees tree */
198 return (0);
199 }
201 void module_register (void)
202 {
203 plugin_register_read ("zone", zone_read);
204 } /* void module_register */