1 /**
2 * collectd - src/thermal.c
3 * Copyright (C) 2008 Michał Mirosław
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 * Michał Mirosław <mirq-linux at rere.qmqm.pl>
20 **/
22 #include "collectd.h"
23 #include "common.h"
24 #include "plugin.h"
25 #include "configfile.h"
26 #include "utils_ignorelist.h"
28 #if !KERNEL_LINUX
29 # error "This module is for Linux only."
30 #endif
32 const char *const dirname_sysfs = "/sys/class/thermal";
33 const char *const dirname_procfs = "/proc/acpi/thermal_zone";
35 static char force_procfs = 0;
36 static ignorelist_t *device_list;
37 static value_list_t vl_temp_template = VALUE_LIST_STATIC;
38 static value_list_t vl_state_template = VALUE_LIST_STATIC;
40 enum dev_type {
41 TEMP = 0,
42 COOLING_DEV
43 };
45 static void thermal_submit (const char *plugin_instance, enum dev_type dt,
46 gauge_t value)
47 {
48 value_list_t vl = (dt == TEMP) ? vl_temp_template : vl_state_template;
49 value_t vt;
51 vt.gauge = value;
53 vl.values = &vt;
54 vl.time = time (NULL);
55 sstrncpy (vl.plugin, "thermal", sizeof(vl.plugin));
56 sstrncpy (vl.plugin_instance, plugin_instance,
57 sizeof(vl.plugin_instance));
58 sstrncpy (vl.type, (dt == TEMP) ? "temperature" : "gauge",
59 sizeof (vl.type));
61 plugin_dispatch_values (&vl);
62 }
64 static int thermal_sysfs_device_read (const char *dir, const char *name,
65 void *user_data)
66 {
67 char filename[256];
68 char data[1024];
69 int len;
70 int ok = 0;
72 if (device_list && ignorelist_match (device_list, name))
73 return -1;
75 len = snprintf (filename, sizeof (filename), "%s/%s/temp", dirname_sysfs, name);
76 if ((len < 0) || ((unsigned int)len >= sizeof (filename)))
77 return -1;
79 len = read_file_contents (filename, data, sizeof(data));
80 if (len > 1 && data[--len] == '\n') {
81 char *endptr = NULL;
82 double temp;
84 data[len] = 0;
85 errno = 0;
86 temp = strtod (data, &endptr) / 1000.0;
88 if (endptr == data + len && errno == 0) {
89 thermal_submit(name, TEMP, temp);
90 ++ok;
91 }
92 }
94 len = snprintf (filename, sizeof (filename), "%s/%s/cur_state", dirname_sysfs, name);
95 if ((len < 0) || ((unsigned int)len >= sizeof (filename)))
96 return -1;
98 len = read_file_contents (filename, data, sizeof(data));
99 if (len > 1 && data[--len] == '\n') {
100 char *endptr = NULL;
101 double state;
103 data[len] = 0;
104 errno = 0;
105 state = strtod (data, &endptr);
107 if (endptr == data + len && errno == 0) {
108 thermal_submit(name, COOLING_DEV, state);
109 ++ok;
110 }
111 }
113 return ok ? 0 : -1;
114 }
116 static int thermal_procfs_device_read (const char *dir, const char *name,
117 void *user_data)
118 {
119 const char str_temp[] = "temperature:";
120 char filename[256];
121 char data[1024];
122 int len;
124 if (device_list && ignorelist_match (device_list, name))
125 return -1;
127 /**
128 * rechot ~ # cat /proc/acpi/thermal_zone/THRM/temperature
129 * temperature: 55 C
130 */
132 len = snprintf (filename, sizeof (filename), "%s/%s/temperature", dirname_procfs, name);
133 if ((len < 0) || ((unsigned int)len >= sizeof (filename)))
134 return -1;
136 len = read_file_contents (filename, data, sizeof(data));
137 if (len > sizeof(str_temp) && data[--len] == '\n' && !strncmp(data, str_temp, sizeof(str_temp)-1)) {
138 char *endptr = NULL;
139 double temp;
140 double celsius, add;
142 if (data[--len] == 'C') {
143 add = 0;
144 celsius = 1;
145 } else if (data[len] == 'F') {
146 add = -32;
147 celsius = 5/9;
148 } else if (data[len] == 'K') {
149 add = -273.15;
150 celsius = 1;
151 } else
152 return -1;
154 while (len > 0 && data[--len] == ' ')
155 ;
156 data[len + 1] = 0;
158 while (len > 0 && data[--len] != ' ')
159 ;
160 ++len;
162 errno = 0;
163 temp = (strtod (data + len, &endptr) + add) * celsius;
165 if (endptr != data + len && errno == 0) {
166 thermal_submit(name, TEMP, temp);
167 return 0;
168 }
169 }
171 return -1;
172 }
174 static const char *config_keys[] = {
175 "Device",
176 "IgnoreSelected",
177 "ForceUseProcfs"
178 };
180 static int thermal_config (const char *key, const char *value)
181 {
182 if (device_list == NULL)
183 device_list = ignorelist_create (1);
185 if (strcasecmp (key, "Device") == 0)
186 {
187 if (ignorelist_add (device_list, value))
188 {
189 ERROR ("thermal plugin: "
190 "Cannot add value to ignorelist.");
191 return 1;
192 }
193 }
194 else if (strcasecmp (key, "IgnoreSelected") == 0)
195 {
196 ignorelist_set_invert (device_list, 1);
197 if ((strcasecmp (value, "True") == 0)
198 || (strcasecmp (value, "Yes") == 0)
199 || (strcasecmp (value, "On") == 0))
200 ignorelist_set_invert (device_list, 0);
201 }
202 else if (strcasecmp (key, "ForceUseProcfs") == 0)
203 {
204 force_procfs = 0;
205 if ((strcasecmp (value, "True") == 0)
206 || (strcasecmp (value, "Yes") == 0)
207 || (strcasecmp (value, "On") == 0))
208 force_procfs = 1;
209 }
210 else
211 {
212 return -1;
213 }
215 return 0;
216 }
218 static int thermal_sysfs_read (void)
219 {
220 return walk_directory (dirname_sysfs, thermal_sysfs_device_read,
221 /* user_data = */ NULL);
222 }
224 static int thermal_procfs_read (void)
225 {
226 return walk_directory (dirname_procfs, thermal_procfs_device_read,
227 /* user_data = */ NULL);
228 }
230 static int thermal_init (void)
231 {
232 int ret = -1;
234 if (!force_procfs && access (dirname_sysfs, R_OK | X_OK) == 0) {
235 ret = plugin_register_read ("thermal", thermal_sysfs_read);
236 } else if (access (dirname_procfs, R_OK | X_OK) == 0) {
237 ret = plugin_register_read ("thermal", thermal_procfs_read);
238 }
240 if (!ret) {
241 vl_temp_template.values_len = 1;
242 vl_temp_template.interval = interval_g;
243 sstrncpy (vl_temp_template.host, hostname_g,
244 sizeof(vl_temp_template.host));
245 sstrncpy (vl_temp_template.plugin, "thermal",
246 sizeof(vl_temp_template.plugin));
247 sstrncpy (vl_temp_template.type_instance, "temperature",
248 sizeof(vl_temp_template.type_instance));
250 vl_state_template = vl_temp_template;
251 sstrncpy (vl_state_template.type_instance, "cooling_state",
252 sizeof(vl_state_template.type_instance));
253 }
255 return ret;
256 }
258 static int thermal_shutdown (void)
259 {
260 ignorelist_free (device_list);
262 return 0;
263 }
265 void module_register (void)
266 {
267 plugin_register_config ("thermal", thermal_config,
268 config_keys, STATIC_ARRAY_SIZE(config_keys));
269 plugin_register_init ("thermal", thermal_init);
270 plugin_register_shutdown ("thermal", thermal_shutdown);
271 }