f33afe804deb1ef0480a3effe1f149ce18c95e08
[monky] / src / core.c
1 /* -*- mode: c; c-basic-offset: 4; tab-width: 4; indent-tabs-mode: t -*-
2  * vim: ts=4 sw=4 noet ai cindent syntax=c
3  *
4  * Conky, a system monitor, based on torsmo
5  *
6  * Any original torsmo code is licensed under the BSD license
7  *
8  * All code written since the fork of torsmo is licensed under the GPL
9  *
10  * Please see COPYING for details
11  *
12  * Copyright (c) 2004, Hannu Saransaari and Lauri Hakkarainen
13  * Copyright (c) 2005-2009 Brenden Matthews, Philip Kovacs, et. al.
14  *      (see AUTHORS)
15  * All rights reserved.
16  *
17  * This program is free software: you can redistribute it and/or modify
18  * it under the terms of the GNU General Public License as published by
19  * the Free Software Foundation, either version 3 of the License, or
20  * (at your option) any later version.
21  *
22  * This program is distributed in the hope that it will be useful,
23  * but WITHOUT ANY WARRANTY; without even the implied warranty of
24  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
25  * GNU General Public License for more details.
26  * You should have received a copy of the GNU General Public License
27  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
28  *
29  */
30
31 /* local headers */
32 #include "core.h"
33 #include "text_object.h"
34 #include "algebra.h"
35 #include "build.h"
36 #include "colours.h"
37 #include "combine.h"
38 #include "diskio.h"
39 #include "entropy.h"
40 #include "exec.h"
41 #include "proc.h"
42 #ifdef X11
43 #include "fonts.h"
44 #endif
45 #include "fs.h"
46 #ifdef HAVE_ICONV
47 #include "iconv_tools.h"
48 #endif
49 #include "logging.h"
50 #include "mixer.h"
51 #include "mail.h"
52 #include "mboxscan.h"
53 #include "net_stat.h"
54 #ifdef NVIDIA
55 #include "nvidia.h"
56 #endif
57 #include "read_tcp.h"
58 #include "scroll.h"
59 #include "specials.h"
60 #include "temphelper.h"
61 #include "template.h"
62 #include "tailhead.h"
63 #include "timeinfo.h"
64 #include "top.h"
65
66 #ifdef NCURSES
67 #include <ncurses.h>
68 #endif
69
70 /* check for OS and include appropriate headers */
71 #if defined(__linux__)
72 #include "linux.h"
73 #elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
74 #include "freebsd.h"
75 #elif defined(__OpenBSD__)
76 #include "openbsd.h"
77 #endif
78
79 #include <string.h>
80 #include <ctype.h>
81
82 /* strip a leading /dev/ if any, following symlinks first
83  *
84  * BEWARE: this function returns a pointer to static content
85  *         which gets overwritten in consecutive calls. I.e.:
86  *         this function is NOT reentrant.
87  */
88 const char *dev_name(const char *path)
89 {
90         static char buf[255];   /* should be enough for pathnames */
91         ssize_t buflen;
92
93         if (!path)
94                 return NULL;
95
96 #define DEV_NAME(x) \
97   x != NULL && strlen(x) > 5 && strncmp(x, "/dev/", 5) == 0 ? x + 5 : x
98         if ((buflen = readlink(path, buf, 254)) == -1)
99                 return DEV_NAME(path);
100         buf[buflen] = '\0';
101         return DEV_NAME(buf);
102 #undef DEV_NAME
103 }
104
105 static struct text_object *new_text_object_internal(void)
106 {
107         struct text_object *obj = malloc(sizeof(struct text_object));
108         memset(obj, 0, sizeof(struct text_object));
109         return obj;
110 }
111
112 static struct text_object *create_plain_text(const char *s)
113 {
114         struct text_object *obj;
115
116         if (s == NULL || *s == '\0') {
117                 return NULL;
118         }
119
120         obj = new_text_object_internal();
121
122         obj->type = OBJ_text;
123         obj->data.s = strndup(s, text_buffer_size);
124         return obj;
125 }
126
127 /* construct_text_object() creates a new text_object */
128 struct text_object *construct_text_object(const char *s, const char *arg, long
129                 line, void **ifblock_opaque, void *free_at_crash)
130 {
131         // struct text_object *obj = new_text_object();
132         struct text_object *obj = new_text_object_internal();
133
134         obj->line = line;
135
136 /* helper defines for internal use only */
137 #define __OBJ_HEAD(a, n) if (!strcmp(s, #a)) { \
138         obj->type = OBJ_##a; add_update_callback(n);
139 #define __OBJ_IF obj_be_ifblock_if(ifblock_opaque, obj)
140 #define __OBJ_ARG(...) if (!arg) { CRIT_ERR(obj, free_at_crash, __VA_ARGS__); }
141
142 /* defines to be used below */
143 #define OBJ(a, n) __OBJ_HEAD(a, n) {
144 #define OBJ_ARG(a, n, ...) __OBJ_HEAD(a, n) __OBJ_ARG(__VA_ARGS__) {
145 #define OBJ_IF(a, n) __OBJ_HEAD(a, n) __OBJ_IF; {
146 #define OBJ_IF_ARG(a, n, ...) __OBJ_HEAD(a, n) __OBJ_ARG(__VA_ARGS__) __OBJ_IF; {
147 #define END } } else
148
149 #ifdef X11
150         if (s[0] == '#') {
151                 obj->type = OBJ_color;
152                 obj->data.l = get_x11_color(s);
153         } else
154 #endif /* X11 */
155 #ifdef __OpenBSD__
156         OBJ(freq, 0)
157 #else
158         OBJ(acpitemp, 0)
159                 obj->data.i = open_acpi_temperature(arg);
160         END OBJ(acpiacadapter, 0)
161         END OBJ(freq, 0)
162 #endif /* !__OpenBSD__ */
163                 get_cpu_count();
164                 if (!arg || !isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) == 0
165                                 || atoi(&arg[0]) > info.cpu_count) {
166                         obj->data.i = 1;
167                         /* NORM_ERR("freq: Invalid CPU number or you don't have that many CPUs! "
168                                 "Displaying the clock for CPU 1."); */
169                 } else {
170                         obj->data.i = atoi(&arg[0]);
171                 }
172         END OBJ(freq_g, 0)
173                 get_cpu_count();
174                 if (!arg || !isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) == 0
175                                 || atoi(&arg[0]) > info.cpu_count) {
176                         obj->data.i = 1;
177                         /* NORM_ERR("freq_g: Invalid CPU number or you don't have that many "
178                                 "CPUs! Displaying the clock for CPU 1."); */
179                 } else {
180                         obj->data.i = atoi(&arg[0]);
181                 }
182         END OBJ_ARG(read_tcp, 0, "read_tcp: Needs \"(host) port\" as argument(s)")
183                 parse_read_tcp_arg(obj, arg, free_at_crash);
184 #if defined(__linux__)
185         END OBJ(voltage_mv, 0)
186                 get_cpu_count();
187                 if (!arg || !isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) == 0
188                                 || atoi(&arg[0]) > info.cpu_count) {
189                         obj->data.i = 1;
190                         /* NORM_ERR("voltage_mv: Invalid CPU number or you don't have that many "
191                                 "CPUs! Displaying voltage for CPU 1."); */
192                 } else {
193                         obj->data.i = atoi(&arg[0]);
194                 }
195         END OBJ(voltage_v, 0)
196                 get_cpu_count();
197                 if (!arg || !isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) == 0
198                                 || atoi(&arg[0]) > info.cpu_count) {
199                         obj->data.i = 1;
200                         /* NORM_ERR("voltage_v: Invalid CPU number or you don't have that many "
201                                 "CPUs! Displaying voltage for CPU 1."); */
202                 } else {
203                         obj->data.i = atoi(&arg[0]);
204                 }
205
206 #ifdef HAVE_IWLIB
207         END OBJ(wireless_essid, &update_net_stats)
208                 parse_net_stat_arg(obj, arg, free_at_crash);
209         END OBJ(wireless_mode, &update_net_stats)
210                 parse_net_stat_arg(obj, arg, free_at_crash);
211         END OBJ(wireless_bitrate, &update_net_stats)
212                 parse_net_stat_arg(obj, arg, free_at_crash);
213         END OBJ(wireless_ap, &update_net_stats)
214                 parse_net_stat_arg(obj, arg, free_at_crash);
215         END OBJ(wireless_link_qual, &update_net_stats)
216                 parse_net_stat_arg(obj, arg, free_at_crash);
217         END OBJ(wireless_link_qual_max, &update_net_stats)
218                 parse_net_stat_arg(obj, arg, free_at_crash);
219         END OBJ(wireless_link_qual_perc, &update_net_stats)
220                 parse_net_stat_arg(obj, arg, free_at_crash);
221         END OBJ(wireless_link_bar, &update_net_stats)
222                 parse_net_stat_bar_arg(obj, arg, free_at_crash);
223 #endif /* HAVE_IWLIB */
224
225 #endif /* __linux__ */
226
227 #ifndef __OpenBSD__
228         END OBJ(acpifan, 0)
229         END OBJ(battery, 0)
230                 char bat[64];
231
232                 if (arg) {
233                         sscanf(arg, "%63s", bat);
234                 } else {
235                         strcpy(bat, "BAT0");
236                 }
237                 obj->data.s = strndup(bat, text_buffer_size);
238         END OBJ(battery_short, 0)
239                 char bat[64];
240
241                 if (arg) {
242                         sscanf(arg, "%63s", bat);
243                 } else {
244                         strcpy(bat, "BAT0");
245                 }
246                 obj->data.s = strndup(bat, text_buffer_size);
247         END OBJ(battery_time, 0)
248                 char bat[64];
249
250                 if (arg) {
251                         sscanf(arg, "%63s", bat);
252                 } else {
253                         strcpy(bat, "BAT0");
254                 }
255                 obj->data.s = strndup(bat, text_buffer_size);
256         END OBJ(battery_percent, 0)
257                 char bat[64];
258
259                 if (arg) {
260                         sscanf(arg, "%63s", bat);
261                 } else {
262                         strcpy(bat, "BAT0");
263                 }
264                 obj->data.s = strndup(bat, text_buffer_size);
265         END OBJ(battery_bar, 0)
266                 char bat[64];
267                 if (arg) {
268                         arg = scan_bar(obj, arg);
269                         sscanf(arg, "%63s", bat);
270                 } else {
271                         strcpy(bat, "BAT0");
272                 }
273                 obj->data.s = strndup(bat, text_buffer_size);
274 #endif /* !__OpenBSD__ */
275
276 #if defined(__linux__)
277         END OBJ_ARG(disk_protect, 0, "disk_protect needs an argument")
278                 obj->data.s = strndup(dev_name(arg), text_buffer_size);
279         END OBJ(i8k_version, &update_i8k)
280         END OBJ(i8k_bios, &update_i8k)
281         END OBJ(i8k_serial, &update_i8k)
282         END OBJ(i8k_cpu_temp, &update_i8k)
283         END OBJ(i8k_left_fan_status, &update_i8k)
284         END OBJ(i8k_right_fan_status, &update_i8k)
285         END OBJ(i8k_left_fan_rpm, &update_i8k)
286         END OBJ(i8k_right_fan_rpm, &update_i8k)
287         END OBJ(i8k_ac_status, &update_i8k)
288         END OBJ(i8k_buttons_status, &update_i8k)
289 #if defined(IBM)
290         END OBJ(ibm_fan, 0)
291         END OBJ_ARG(ibm_temps, &get_ibm_acpi_temps, "ibm_temps: needs an argument")
292                 parse_ibm_temps_arg(obj, arg);
293         END OBJ(ibm_volume, 0)
294         END OBJ(ibm_brightness, 0)
295 #endif
296         /* information from sony_laptop kernel module
297          * /sys/devices/platform/sony-laptop */
298         END OBJ(sony_fanspeed, 0)
299         END OBJ_IF(if_gw, &update_gateway_info)
300         END OBJ_ARG(ioscheduler, 0, "get_ioscheduler needs an argument (e.g. hda)")
301                 obj->data.s = strndup(dev_name(arg), text_buffer_size);
302         END OBJ(laptop_mode, 0)
303         END OBJ_ARG(pb_battery, 0, "pb_battery: needs one argument: status, percent or time")
304                 if (strcmp(arg, "status") == EQUAL) {
305                         obj->data.i = PB_BATT_STATUS;
306                 } else if (strcmp(arg, "percent") == EQUAL) {
307                         obj->data.i = PB_BATT_PERCENT;
308                 } else if (strcmp(arg, "time") == EQUAL) {
309                         obj->data.i = PB_BATT_TIME;
310                 } else {
311                         NORM_ERR("pb_battery: illegal argument '%s', defaulting to status", arg);
312                         obj->data.i = PB_BATT_STATUS;
313                 }
314 #endif /* __linux__ */
315 #if (defined(__FreeBSD__) || defined(__linux__))
316         END OBJ_IF_ARG(if_up, 0, "if_up needs an argument")
317                 parse_if_up_arg(obj, arg);
318 #endif
319 #if defined(__OpenBSD__)
320         END OBJ_ARG(obsd_sensors_temp, 0, "obsd_sensors_temp: needs an argument")
321                 parse_obsd_sensor(obj, arg);
322         END OBJ_ARG(obsd_sensors_fan, 0, "obsd_sensors_fan: needs 2 arguments (device and sensor number)")
323                 parse_obsd_sensor(obj, arg);
324         END OBJ_ARG(obsd_sensors_volt, 0, "obsd_sensors_volt: needs 2 arguments (device and sensor number)")
325                 parse_obsd_sensor(obj, arg);
326         END OBJ(obsd_vendor, 0)
327         END OBJ(obsd_product, 0)
328 #endif /* __OpenBSD__ */
329         END OBJ(buffers, &update_meminfo)
330         END OBJ(cached, &update_meminfo)
331 #define SCAN_CPU(__arg, __var) { \
332         int __offset = 0; \
333         if (__arg && sscanf(__arg, " cpu%d %n", &__var, &__offset) > 0) \
334                 __arg += __offset; \
335         else \
336                 __var = 0; \
337 }
338         END OBJ(cpu, &update_cpu_usage)
339                 SCAN_CPU(arg, obj->data.i);
340                 DBGP2("Adding $cpu for CPU %d", obj->data.i);
341 #ifdef X11
342         END OBJ(cpugauge, &update_cpu_usage)
343                 SCAN_CPU(arg, obj->data.i);
344                 scan_gauge(obj, arg);
345                 DBGP2("Adding $cpugauge for CPU %d", obj->data.i);
346 #endif /* X11 */
347         END OBJ(cpubar, &update_cpu_usage)
348                 SCAN_CPU(arg, obj->data.i);
349                 scan_bar(obj, arg);
350                 DBGP2("Adding $cpubar for CPU %d", obj->data.i);
351 #ifdef X11
352         END OBJ(cpugraph, &update_cpu_usage)
353                 char *buf = 0;
354                 SCAN_CPU(arg, obj->data.i);
355                 buf = scan_graph(obj, arg, 100);
356                 DBGP2("Adding $cpugraph for CPU %d", obj->data.i);
357                 if (buf) free(buf);
358         END OBJ(loadgraph, &update_load_average)
359                 scan_loadgraph_arg(obj, arg);
360 #endif /* X11 */
361         END OBJ(diskio, &update_diskio)
362                 parse_diskio_arg(obj, arg);
363         END OBJ(diskio_read, &update_diskio)
364                 parse_diskio_arg(obj, arg);
365         END OBJ(diskio_write, &update_diskio)
366                 parse_diskio_arg(obj, arg);
367 #ifdef X11
368         END OBJ(diskiograph, &update_diskio)
369                 parse_diskiograph_arg(obj, arg);
370         END OBJ(diskiograph_read, &update_diskio)
371                 parse_diskiograph_arg(obj, arg);
372         END OBJ(diskiograph_write, &update_diskio)
373                 parse_diskiograph_arg(obj, arg);
374 #endif /* X11 */
375         END OBJ(color, 0)
376 #ifdef X11
377                 if (output_methods & TO_X) {
378                         obj->data.l = arg ? get_x11_color(arg) : default_fg_color;
379                         set_current_text_color(obj->data.l);
380                 }
381 #endif /* X11 */
382 #ifdef NCURSES
383                 if (output_methods & TO_NCURSES) {
384                         obj->data.l = COLOR_WHITE;
385                         if(arg) {
386                                 if(strcasecmp(arg, "red") == 0) {
387                                         obj->data.l = COLOR_RED;
388                                 }else if(strcasecmp(arg, "green") == 0) {
389                                         obj->data.l = COLOR_GREEN;
390                                 }else if(strcasecmp(arg, "yellow") == 0) {
391                                         obj->data.l = COLOR_YELLOW;
392                                 }else if(strcasecmp(arg, "blue") == 0) {
393                                         obj->data.l = COLOR_BLUE;
394                                 }else if(strcasecmp(arg, "magenta") == 0) {
395                                         obj->data.l = COLOR_MAGENTA;
396                                 }else if(strcasecmp(arg, "cyan") == 0) {
397                                         obj->data.l = COLOR_CYAN;
398                                 }else if(strcasecmp(arg, "black") == 0) {
399                                         obj->data.l = COLOR_BLACK;
400                                 }
401                         }
402                         set_current_text_color(obj->data.l);
403                         init_pair(obj->data.l, obj->data.l, COLOR_BLACK);
404                 }
405 #endif /* NCURSES */
406         END OBJ(color0, 0)
407                 obj->data.l = color0;
408                 set_current_text_color(obj->data.l);
409         END OBJ(color1, 0)
410                 obj->data.l = color1;
411                 set_current_text_color(obj->data.l);
412         END OBJ(color2, 0)
413                 obj->data.l = color2;
414                 set_current_text_color(obj->data.l);
415         END OBJ(color3, 0)
416                 obj->data.l = color3;
417                 set_current_text_color(obj->data.l);
418         END OBJ(color4, 0)
419                 obj->data.l = color4;
420                 set_current_text_color(obj->data.l);
421         END OBJ(color5, 0)
422                 obj->data.l = color5;
423                 set_current_text_color(obj->data.l);
424         END OBJ(color6, 0)
425                 obj->data.l = color6;
426                 set_current_text_color(obj->data.l);
427         END OBJ(color7, 0)
428                 obj->data.l = color7;
429                 set_current_text_color(obj->data.l);
430         END OBJ(color8, 0)
431                 obj->data.l = color8;
432                 set_current_text_color(obj->data.l);
433         END OBJ(color9, 0)
434                 obj->data.l = color9;
435                 set_current_text_color(obj->data.l);
436 #ifdef X11
437         END OBJ(font, 0)
438                 obj->data.s = scan_font(arg);
439 #endif /* X11 */
440         END OBJ(conky_version, 0)
441         END OBJ(conky_build_date, 0)
442         END OBJ(conky_build_arch, 0)
443         END OBJ(downspeed, &update_net_stats)
444                 parse_net_stat_arg(obj, arg, free_at_crash);
445         END OBJ(downspeedf, &update_net_stats)
446                 parse_net_stat_arg(obj, arg, free_at_crash);
447 #ifdef X11
448         END OBJ(downspeedgraph, &update_net_stats)
449                 parse_net_stat_graph_arg(obj, arg, free_at_crash);
450 #endif /* X11 */
451         END OBJ(else, 0)
452                 obj_be_ifblock_else(ifblock_opaque, obj);
453         END OBJ(endif, 0)
454                 obj_be_ifblock_endif(ifblock_opaque, obj);
455         END OBJ(eval, 0)
456                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
457 #if defined(IMLIB2) && defined(X11)
458         END OBJ(image, 0)
459                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
460 #endif /* IMLIB2 */
461         END OBJ(exec, 0)
462                 scan_exec_arg(obj, arg);
463         END OBJ(execp, 0)
464                 scan_exec_arg(obj, arg);
465         END OBJ(execbar, 0)
466                 scan_exec_arg(obj, arg);
467 #ifdef X11
468         END OBJ(execgauge, 0)
469                 scan_exec_arg(obj, arg);
470         END OBJ(execgraph, 0)
471                 scan_execgraph_arg(obj, arg);
472 #endif /* X11 */
473         END OBJ_ARG(execibar, 0, "execibar needs arguments")
474                 scan_execi_arg(obj, arg);
475 #ifdef X11
476         END OBJ_ARG(execigraph, 0, "execigraph needs arguments")
477                 scan_execgraph_arg(obj, arg);
478         END OBJ_ARG(execigauge, 0, "execigauge needs arguments")
479                 scan_execi_arg(obj, arg);
480 #endif /* X11 */
481         END OBJ_ARG(execi, 0, "execi needs arguments")
482                 scan_execi_arg(obj, arg);
483         END OBJ_ARG(execpi, 0, "execpi needs arguments")
484                 scan_execi_arg(obj, arg);
485         END OBJ_ARG(texeci, 0, "texeci needs arguments")
486                 scan_execi_arg(obj, arg);
487         END OBJ(pre_exec, 0)
488                 scan_pre_exec_arg(obj, arg);
489         END OBJ(fs_bar, &update_fs_stats)
490                 init_fs_bar(obj, arg);
491         END OBJ(fs_bar_free, &update_fs_stats)
492                 init_fs_bar(obj, arg);
493         END OBJ(fs_free, &update_fs_stats)
494                 init_fs(obj, arg);
495         END OBJ(fs_used_perc, &update_fs_stats)
496                 init_fs(obj, arg);
497         END OBJ(fs_free_perc, &update_fs_stats)
498                 init_fs(obj, arg);
499         END OBJ(fs_size, &update_fs_stats)
500                 init_fs(obj, arg);
501         END OBJ(fs_type, &update_fs_stats)
502                 init_fs(obj, arg);
503         END OBJ(fs_used, &update_fs_stats)
504                 init_fs(obj, arg);
505         END OBJ(hr, 0)
506                 obj->data.i = arg ? atoi(arg) : 1;
507         END OBJ(nameserver, &update_dns_data)
508                 parse_nameserver_arg(obj, arg);
509         END OBJ(offset, 0)
510                 obj->data.i = arg ? atoi(arg) : 1;
511         END OBJ(voffset, 0)
512                 obj->data.i = arg ? atoi(arg) : 1;
513         END OBJ_ARG(goto, 0, "goto needs arguments")
514                 obj->data.i = atoi(arg);
515 #ifdef X11
516         END OBJ(tab, 0)
517                 scan_tab(obj, arg);
518 #endif /* X11 */
519 #ifdef __linux__
520         END OBJ_ARG(i2c, 0, "i2c needs arguments")
521                 parse_i2c_sensor(obj, arg);
522         END OBJ_ARG(platform, 0, "platform needs arguments")
523                 parse_platform_sensor(obj, arg);
524         END OBJ_ARG(hwmon, 0, "hwmon needs argumanets")
525                 parse_hwmon_sensor(obj, arg);
526         END
527         /* we have four different types of top (top, top_mem, top_time and top_io). To
528          * avoid having almost-same code four times, we have this special
529          * handler. */
530         if (strncmp(s, "top", 3) == EQUAL) {
531                 add_update_callback(&update_meminfo);
532                 add_update_callback(&update_top);
533                 if (!parse_top_args(s, arg, obj)) {
534                         return NULL;
535                 }
536         } else OBJ(addr, &update_net_stats)
537                 parse_net_stat_arg(obj, arg, free_at_crash);
538         END OBJ(addrs, &update_net_stats)
539                 parse_net_stat_arg(obj, arg, free_at_crash);
540 #endif /* __linux__ */
541         END OBJ_ARG(tail, 0, "tail needs arguments")
542                 init_tailhead("tail", arg, obj, free_at_crash);
543         END OBJ_ARG(head, 0, "head needs arguments")
544                 init_tailhead("head", arg, obj, free_at_crash);
545         END OBJ_ARG(lines, 0, "lines needs an argument")
546                 obj->data.s = strndup(arg, text_buffer_size);
547         END OBJ_ARG(words, 0, "words needs a argument")
548                 obj->data.s = strndup(arg, text_buffer_size);
549         END OBJ(loadavg, &update_load_average)
550                 scan_loadavg_arg(obj, arg);
551         END OBJ_IF_ARG(if_empty, 0, "if_empty needs an argument")
552                 obj->sub = malloc(sizeof(struct text_object));
553                 extract_variable_text_internal(obj->sub, arg);
554         END OBJ_IF_ARG(if_match, 0, "if_match needs arguments")
555                 obj->sub = malloc(sizeof(struct text_object));
556                 extract_variable_text_internal(obj->sub, arg);
557         END OBJ_IF_ARG(if_existing, 0, "if_existing needs an argument or two")
558                 obj->data.s = strndup(arg, text_buffer_size);
559         END OBJ_IF_ARG(if_mounted, 0, "if_mounted needs an argument")
560                 obj->data.s = strndup(arg, text_buffer_size);
561 #ifdef __linux__
562         END OBJ_IF_ARG(if_running, &update_top, "if_running needs an argument")
563                 top_running = 1;
564                 obj->data.s = strndup(arg, text_buffer_size);
565 #else
566         END OBJ_IF_ARG(if_running, 0, "if_running needs an argument")
567                 char buf[256];
568
569                 snprintf(buf, 256, "pidof %s >/dev/null", arg);
570                 obj->data.s = strndup(buf, text_buffer_size);
571 #endif
572         END OBJ(kernel, 0)
573         END OBJ(machine, 0)
574         END OBJ(mails, 0)
575                 parse_local_mail_args(obj, arg);
576         END OBJ(new_mails, 0)
577                 parse_local_mail_args(obj, arg);
578         END OBJ(seen_mails, 0)
579                 parse_local_mail_args(obj, arg);
580         END OBJ(unseen_mails, 0)
581                 parse_local_mail_args(obj, arg);
582         END OBJ(flagged_mails, 0)
583                 parse_local_mail_args(obj, arg);
584         END OBJ(unflagged_mails, 0)
585                 parse_local_mail_args(obj, arg);
586         END OBJ(forwarded_mails, 0)
587                 parse_local_mail_args(obj, arg);
588         END OBJ(unforwarded_mails, 0)
589                 parse_local_mail_args(obj, arg);
590         END OBJ(replied_mails, 0)
591                 parse_local_mail_args(obj, arg);
592         END OBJ(unreplied_mails, 0)
593                 parse_local_mail_args(obj, arg);
594         END OBJ(draft_mails, 0)
595                 parse_local_mail_args(obj, arg);
596         END OBJ(trashed_mails, 0)
597                 parse_local_mail_args(obj, arg);
598         END OBJ(mboxscan, 0)
599                 parse_mboxscan_arg(obj, arg);
600         END OBJ(mem, &update_meminfo)
601         END OBJ(memeasyfree, &update_meminfo)
602         END OBJ(memfree, &update_meminfo)
603         END OBJ(memmax, &update_meminfo)
604         END OBJ(memperc, &update_meminfo)
605 #ifdef X11
606         END OBJ(memgauge, &update_meminfo)
607                 scan_gauge(obj, arg);
608 #endif /* X11*/
609         END OBJ(membar, &update_meminfo)
610                 scan_bar(obj, arg);
611 #ifdef X11
612         END OBJ(memgraph, &update_meminfo)
613                 char *buf = 0;
614                 buf = scan_graph(obj, arg, 100);
615
616                 if (buf) free(buf);
617 #endif /* X11*/
618         END OBJ(mixer, 0)
619                 parse_mixer_arg(obj, arg);
620         END OBJ(mixerl, 0)
621                 parse_mixer_arg(obj, arg);
622         END OBJ(mixerr, 0)
623                 parse_mixer_arg(obj, arg);
624 #ifdef X11
625         END OBJ(mixerbar, 0)
626                 scan_mixer_bar(obj, arg);
627         END OBJ(mixerlbar, 0)
628                 scan_mixer_bar(obj, arg);
629         END OBJ(mixerrbar, 0)
630                 scan_mixer_bar(obj, arg);
631 #endif
632         END OBJ_IF(if_mixer_mute, 0)
633                 parse_mixer_arg(obj, arg);
634 #ifdef X11
635         END OBJ(monitor, &update_x11info)
636         END OBJ(monitor_number, &update_x11info)
637         END OBJ(desktop, &update_x11info)
638         END OBJ(desktop_number, &update_x11info)
639         END OBJ(desktop_name, &update_x11info)
640 #endif
641         END OBJ(nodename, 0)
642         END OBJ_ARG(cmdline_to_pid, 0, "cmdline_to_pid needs a command line as argument")
643                 scan_cmdline_to_pid_arg(obj, arg, free_at_crash);
644         END OBJ_ARG(pid_chroot, 0, "pid_chroot needs a pid as argument")
645                 obj->sub = malloc(sizeof(struct text_object));
646                 extract_variable_text_internal(obj->sub, arg);
647         END OBJ_ARG(pid_cmdline, 0, "pid_cmdline needs a pid as argument")
648                 obj->sub = malloc(sizeof(struct text_object));
649                 extract_variable_text_internal(obj->sub, arg);
650         END OBJ_ARG(pid_cwd, 0, "pid_cwd needs a pid as argument")
651                 obj->sub = malloc(sizeof(struct text_object));
652                 extract_variable_text_internal(obj->sub, arg);
653         END OBJ_ARG(pid_environ, 0, "pid_environ needs arguments")
654                 obj->sub = malloc(sizeof(struct text_object));
655                 extract_variable_text_internal(obj->sub, arg);
656         END OBJ_ARG(pid_environ_list, 0, "pid_environ_list needs a pid as argument")
657                 obj->sub = malloc(sizeof(struct text_object));
658                 extract_variable_text_internal(obj->sub, arg);
659         END OBJ_ARG(pid_exe, 0, "pid_exe needs a pid as argument")
660                 obj->sub = malloc(sizeof(struct text_object));
661                 extract_variable_text_internal(obj->sub, arg);
662         END OBJ_ARG(pid_openfiles, 0, "pid_openfiles needs a pid as argument")
663                 obj->sub = malloc(sizeof(struct text_object));
664                 extract_variable_text_internal(obj->sub, arg);
665         END OBJ_ARG(pid_parent, 0, "pid_parent needs a pid as argument")
666                 obj->sub = malloc(sizeof(struct text_object));
667                 extract_variable_text_internal(obj->sub, arg);
668         END OBJ_ARG(pid_state, 0, "pid_state needs a pid as argument")
669                 obj->sub = malloc(sizeof(struct text_object));
670                 extract_variable_text_internal(obj->sub, arg);
671         END OBJ_ARG(pid_state_short, 0, "pid_state_short needs a pid as argument")
672                 obj->sub = malloc(sizeof(struct text_object));
673                 extract_variable_text_internal(obj->sub, arg);
674         END OBJ_ARG(pid_stderr, 0, "pid_stderr needs a pid as argument")
675                 obj->sub = malloc(sizeof(struct text_object));
676                 extract_variable_text_internal(obj->sub, arg);
677         END OBJ_ARG(pid_stdin, 0, "pid_stdin needs a pid as argument")
678                 obj->sub = malloc(sizeof(struct text_object));
679                 extract_variable_text_internal(obj->sub, arg);
680         END OBJ_ARG(pid_stdout, 0, "pid_stdout needs a pid as argument")
681                 obj->sub = malloc(sizeof(struct text_object));
682                 extract_variable_text_internal(obj->sub, arg);
683         END OBJ_ARG(pid_uid, 0, "pid_uid needs a pid as argument")
684                 obj->sub = malloc(sizeof(struct text_object));
685                 extract_variable_text_internal(obj->sub, arg);
686         END OBJ_ARG(pid_euid, 0, "pid_euid needs a pid as argument")
687                 obj->sub = malloc(sizeof(struct text_object));
688                 extract_variable_text_internal(obj->sub, arg);
689         END OBJ_ARG(pid_suid, 0, "pid_suid needs a pid as argument")
690                 obj->sub = malloc(sizeof(struct text_object));
691                 extract_variable_text_internal(obj->sub, arg);
692         END OBJ_ARG(pid_fsuid, 0, "pid_fsuid needs a pid as argument")
693                 obj->sub = malloc(sizeof(struct text_object));
694                 extract_variable_text_internal(obj->sub, arg);
695         END OBJ_ARG(pid_gid, 0, "pid_gid needs a pid as argument")
696                 obj->sub = malloc(sizeof(struct text_object));
697                 extract_variable_text_internal(obj->sub, arg);
698         END OBJ_ARG(pid_egid, 0, "pid_egid needs a pid as argument")
699                 obj->sub = malloc(sizeof(struct text_object));
700                 extract_variable_text_internal(obj->sub, arg);
701         END OBJ_ARG(pid_sgid, 0, "pid_sgid needs a pid as argument")
702                 obj->sub = malloc(sizeof(struct text_object));
703                 extract_variable_text_internal(obj->sub, arg);
704         END OBJ_ARG(pid_fsgid, 0, "pid_fsgid needs a pid as argument")
705                 obj->sub = malloc(sizeof(struct text_object));
706                 extract_variable_text_internal(obj->sub, arg);
707         END OBJ(processes, &update_total_processes)
708         END OBJ(running_processes, &update_running_processes)
709 #ifdef __linux__
710         END OBJ(threads, &update_threads)
711 #endif
712         END OBJ(shadecolor, 0)
713 #ifdef X11
714                 obj->data.l = arg ? get_x11_color(arg) : default_bg_color;
715 #endif /* X11 */
716         END OBJ(outlinecolor, 0)
717 #ifdef X11
718                 obj->data.l = arg ? get_x11_color(arg) : default_out_color;
719 #endif /* X11 */
720         END OBJ(stippled_hr, 0)
721 #ifdef X11
722                 scan_stippled_hr(obj, arg);
723 #endif /* X11 */
724         END OBJ(swap, &update_meminfo)
725         END OBJ(swapfree, &update_meminfo)
726         END OBJ(swapmax, &update_meminfo)
727         END OBJ(swapperc, &update_meminfo)
728         END OBJ(swapbar, &update_meminfo)
729                 scan_bar(obj, arg);
730         END OBJ(sysname, 0)
731         END OBJ(time, 0)
732                 scan_time(obj, arg);
733         END OBJ(utime, 0)
734                 scan_time(obj, arg);
735         END OBJ(tztime, 0)
736                 scan_tztime(obj, arg);
737 #ifdef HAVE_ICONV
738         END OBJ_ARG(iconv_start, 0, "Iconv requires arguments")
739                 init_iconv_start(obj, free_at_crash, arg);
740         END OBJ(iconv_stop, 0)
741                 init_iconv_stop();
742 #endif
743         END OBJ(totaldown, &update_net_stats)
744                 parse_net_stat_arg(obj, arg, free_at_crash);
745         END OBJ(totalup, &update_net_stats)
746                 parse_net_stat_arg(obj, arg, free_at_crash);
747         END OBJ(updates, 0)
748         END OBJ_IF(if_updatenr, 0)
749                 obj->data.i = arg ? atoi(arg) : 0;
750                 if(obj->data.i == 0) CRIT_ERR(obj, free_at_crash, "if_updatenr needs a number above 0 as argument");
751                 set_updatereset(obj->data.i > get_updatereset() ? obj->data.i : get_updatereset());
752         END OBJ(alignr, 0)
753                 obj->data.i = arg ? atoi(arg) : 0;
754         END OBJ(alignc, 0)
755                 obj->data.i = arg ? atoi(arg) : 0;
756         END OBJ(upspeed, &update_net_stats)
757                 parse_net_stat_arg(obj, arg, free_at_crash);
758         END OBJ(upspeedf, &update_net_stats)
759                 parse_net_stat_arg(obj, arg, free_at_crash);
760 #ifdef X11
761         END OBJ(upspeedgraph, &update_net_stats)
762                 parse_net_stat_graph_arg(obj, arg, free_at_crash);
763 #endif
764         END OBJ(uptime_short, &update_uptime)
765         END OBJ(uptime, &update_uptime)
766 #if defined(__linux__)
767         END OBJ(user_names, &update_users)
768         END OBJ(user_times, &update_users)
769         END OBJ_ARG(user_time, 0, "user time needs a console name as argument")
770                 obj->data.s = strndup(arg, text_buffer_size);
771         END OBJ(user_terms, &update_users)
772         END OBJ(user_number, &update_users)
773         END OBJ(gw_iface, &update_gateway_info)
774         END OBJ(gw_ip, &update_gateway_info)
775 #endif /* !__linux__ */
776 #if (defined(__FreeBSD__) || defined(__FreeBSD_kernel__) \
777                 || defined(__OpenBSD__)) && (defined(i386) || defined(__i386__))
778         END OBJ(apm_adapter, 0)
779         END OBJ(apm_battery_life, 0)
780         END OBJ(apm_battery_time, 0)
781 #endif /* __FreeBSD__ */
782         END OBJ(imap_unseen, 0)
783                 parse_imap_mail_args(obj, arg);
784         END OBJ(imap_messages, 0)
785                 parse_imap_mail_args(obj, arg);
786         END OBJ(pop3_unseen, 0)
787                 parse_pop3_mail_args(obj, arg);
788         END OBJ(pop3_used, 0)
789                 parse_pop3_mail_args(obj, arg);
790 #ifdef IBM
791         END OBJ_ARG(smapi, 0, "smapi needs an argument")
792                 obj->data.s = strndup(arg, text_buffer_size);
793         END OBJ_IF_ARG(if_smapi_bat_installed, 0, "if_smapi_bat_installed needs an argument")
794                 obj->data.s = strndup(arg, text_buffer_size);
795         END OBJ_ARG(smapi_bat_perc, 0, "smapi_bat_perc needs an argument")
796                 obj->data.s = strndup(arg, text_buffer_size);
797         END OBJ_ARG(smapi_bat_temp, 0, "smapi_bat_temp needs an argument")
798                 obj->data.s = strndup(arg, text_buffer_size);
799         END OBJ_ARG(smapi_bat_power, 0, "smapi_bat_power needs an argument")
800                 obj->data.s = strndup(arg, text_buffer_size);
801 #ifdef X11
802         END OBJ_ARG(smapi_bat_bar, 0, "smapi_bat_bar needs an argument")
803                 int cnt;
804                 if(sscanf(arg, "%i %n", &obj->data.i, &cnt) <= 0) {
805                         NORM_ERR("first argument to smapi_bat_bar must be an integer value");
806                         obj->data.i = -1;
807                 } else
808                         arg = scan_bar(obj, arg + cnt);
809 #endif /* X11 */
810 #endif /* IBM */
811 #ifdef MPD
812 #define mpd_set_maxlen(name) \
813                 if (arg) { \
814                         int i; \
815                         sscanf(arg, "%d", &i); \
816                         if (i > 0) \
817                                 obj->data.i = i + 1; \
818                         else \
819                                 NORM_ERR(#name ": invalid length argument"); \
820                 }
821         END OBJ(mpd_artist, &update_mpd)
822                 mpd_set_maxlen(mpd_artist);
823                 init_mpd();
824         END OBJ(mpd_title, &update_mpd)
825                 mpd_set_maxlen(mpd_title);
826                 init_mpd();
827         END OBJ(mpd_random, &update_mpd) init_mpd();
828         END OBJ(mpd_repeat, &update_mpd) init_mpd();
829         END OBJ(mpd_elapsed, &update_mpd) init_mpd();
830         END OBJ(mpd_length, &update_mpd) init_mpd();
831         END OBJ(mpd_track, &update_mpd)
832                 mpd_set_maxlen(mpd_track);
833                 init_mpd();
834         END OBJ(mpd_name, &update_mpd)
835                 mpd_set_maxlen(mpd_name);
836                 init_mpd();
837         END OBJ(mpd_file, &update_mpd)
838                 mpd_set_maxlen(mpd_file);
839                 init_mpd();
840         END OBJ(mpd_percent, &update_mpd) init_mpd();
841         END OBJ(mpd_album, &update_mpd)
842                 mpd_set_maxlen(mpd_album);
843                 init_mpd();
844         END OBJ(mpd_vol, &update_mpd) init_mpd();
845         END OBJ(mpd_bitrate, &update_mpd) init_mpd();
846         END OBJ(mpd_status, &update_mpd) init_mpd();
847         END OBJ(mpd_bar, &update_mpd)
848                 scan_bar(obj, arg);
849                 init_mpd();
850         END OBJ(mpd_smart, &update_mpd)
851                 mpd_set_maxlen(mpd_smart);
852                 init_mpd();
853         END OBJ_IF(if_mpd_playing, &update_mpd)
854                 init_mpd();
855 #undef mpd_set_maxlen
856 #endif /* MPD */
857 #ifdef MOC
858         END OBJ(moc_state, &update_moc)
859         END OBJ(moc_file, &update_moc)
860         END OBJ(moc_title, &update_moc)
861         END OBJ(moc_artist, &update_moc)
862         END OBJ(moc_song, &update_moc)
863         END OBJ(moc_album, &update_moc)
864         END OBJ(moc_totaltime, &update_moc)
865         END OBJ(moc_timeleft, &update_moc)
866         END OBJ(moc_curtime, &update_moc)
867         END OBJ(moc_bitrate, &update_moc)
868         END OBJ(moc_rate, &update_moc)
869 #endif /* MOC */
870 #ifdef XMMS2
871         END OBJ(xmms2_artist, &update_xmms2)
872         END OBJ(xmms2_album, &update_xmms2)
873         END OBJ(xmms2_title, &update_xmms2)
874         END OBJ(xmms2_genre, &update_xmms2)
875         END OBJ(xmms2_comment, &update_xmms2)
876         END OBJ(xmms2_url, &update_xmms2)
877         END OBJ(xmms2_tracknr, &update_xmms2)
878         END OBJ(xmms2_bitrate, &update_xmms2)
879         END OBJ(xmms2_date, &update_xmms2)
880         END OBJ(xmms2_id, &update_xmms2)
881         END OBJ(xmms2_duration, &update_xmms2)
882         END OBJ(xmms2_elapsed, &update_xmms2)
883         END OBJ(xmms2_size, &update_xmms2)
884         END OBJ(xmms2_status, &update_xmms2)
885         END OBJ(xmms2_percent, &update_xmms2)
886 #ifdef X11
887         END OBJ(xmms2_bar, &update_xmms2)
888                 scan_bar(obj, arg);
889 #endif /* X11 */
890         END OBJ(xmms2_smart, &update_xmms2)
891         END OBJ(xmms2_playlist, &update_xmms2)
892         END OBJ(xmms2_timesplayed, &update_xmms2)
893         END OBJ_IF(if_xmms2_connected, &update_xmms2)
894 #endif
895 #ifdef AUDACIOUS
896         END OBJ(audacious_status, &update_audacious)
897         END OBJ_ARG(audacious_title, &update_audacious, "audacious_title needs an argument")
898                 sscanf(arg, "%d", &info.audacious.max_title_len);
899                 if (info.audacious.max_title_len > 0) {
900                         info.audacious.max_title_len++;
901                 } else {
902                         CRIT_ERR(obj, free_at_crash, "audacious_title: invalid length argument");
903                 }
904         END OBJ(audacious_length, &update_audacious)
905         END OBJ(audacious_length_seconds, &update_audacious)
906         END OBJ(audacious_position, &update_audacious)
907         END OBJ(audacious_position_seconds, &update_audacious)
908         END OBJ(audacious_bitrate, &update_audacious)
909         END OBJ(audacious_frequency, &update_audacious)
910         END OBJ(audacious_channels, &update_audacious)
911         END OBJ(audacious_filename, &update_audacious)
912         END OBJ(audacious_playlist_length, &update_audacious)
913         END OBJ(audacious_playlist_position, &update_audacious)
914         END OBJ(audacious_main_volume, &update_audacious)
915 #ifdef X11
916         END OBJ(audacious_bar, &update_audacious)
917                 scan_bar(obj, arg);
918 #endif /* X11 */
919 #endif
920 #ifdef BMPX
921         END OBJ(bmpx_title, &update_bmpx)
922                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
923         END OBJ(bmpx_artist, &update_bmpx)
924                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
925         END OBJ(bmpx_album, &update_bmpx)
926                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
927         END OBJ(bmpx_track, &update_bmpx)
928                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
929         END OBJ(bmpx_uri, &update_bmpx)
930                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
931         END OBJ(bmpx_bitrate, &update_bmpx)
932                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
933 #endif
934 #ifdef EVE
935         END OBJ_ARG(eve, 0, "eve needs arguments: <userid> <apikey> <characterid>")
936                 scan_eve(obj, arg);
937 #endif
938 #ifdef HAVE_CURL
939         END OBJ_ARG(curl, 0, "curl needs arguments: <uri> <interval in minutes>")
940                 curl_parse_arg(obj, arg);
941 #endif
942 #ifdef RSS
943         END OBJ_ARG(rss, 0, "rss needs arguments: <uri> <interval in minutes> <action> [act_par] [spaces in front]")
944                 rss_scan_arg(obj, arg);
945 #endif
946 #ifdef WEATHER
947         END OBJ_ARG(weather, 0, "weather needs arguments: <uri> <locID> <data_type> [interval in minutes]")
948                 scan_weather_arg(obj, arg, free_at_crash);
949 #endif
950 #ifdef XOAP
951         END OBJ_ARG(weather_forecast, 0, "weather_forecast needs arguments: <uri> <locID> <day> <data_type> [interval in minutes]")
952                 scan_weather_forecast_arg(obj, arg, free_at_crash);
953 #endif
954 #ifdef HAVE_LUA
955         END OBJ_ARG(lua, 0, "lua needs arguments: <function name> [function parameters]")
956                 obj->data.s = strndup(arg, text_buffer_size);
957         END OBJ_ARG(lua_parse, 0, "lua_parse needs arguments: <function name> [function parameters]")
958                 obj->data.s = strndup(arg, text_buffer_size);
959         END OBJ_ARG(lua_bar, 0, "lua_bar needs arguments: <height>,<width> <function name> [function parameters]")
960                 arg = scan_bar(obj, arg);
961                 if(arg) {
962                         obj->data.s = strndup(arg, text_buffer_size);
963                 } else {
964                         CRIT_ERR(obj, free_at_crash, "lua_bar needs arguments: <height>,<width> <function name> [function parameters]");
965                 }
966 #ifdef X11
967         END OBJ_ARG(lua_graph, 0, "lua_graph needs arguments: <function name> [height],[width] [gradient colour 1] [gradient colour 2] [scale] [-t] [-l]")
968                 char *buf = 0;
969                 buf = scan_graph(obj, arg, 0);
970                 if (buf) {
971                         obj->data.s = buf;
972                 } else {
973                         CRIT_ERR(obj, free_at_crash, "lua_graph needs arguments: <function name> [height],[width] [gradient colour 1] [gradient colour 2] [scale] [-t] [-l]");
974                 }
975         END OBJ_ARG(lua_gauge, 0, "lua_gauge needs arguments: <height>,<width> <function name> [function parameters]")
976                 arg = scan_gauge(obj, arg);
977                 if (arg) {
978                         obj->data.s = strndup(arg, text_buffer_size);
979                 } else {
980                         CRIT_ERR(obj, free_at_crash, "lua_gauge needs arguments: <height>,<width> <function name> [function parameters]");
981                 }
982 #endif /* X11 */
983 #endif /* HAVE_LUA */
984 #ifdef HDDTEMP
985         END OBJ(hddtemp, &update_hddtemp)
986                 if (arg)
987                         obj->data.s = strndup(arg, text_buffer_size);
988 #endif /* HDDTEMP */
989 #ifdef TCP_PORT_MONITOR
990         END OBJ_ARG(tcp_portmon, &tcp_portmon_update, "tcp_portmon: needs arguments")
991                 tcp_portmon_init(obj, arg);
992 #endif /* TCP_PORT_MONITOR */
993         END OBJ(entropy_avail, &update_entropy)
994         END OBJ(entropy_perc, &update_entropy)
995         END OBJ(entropy_poolsize, &update_entropy)
996         END OBJ(entropy_bar, &update_entropy)
997                 scan_bar(obj, arg);
998         END OBJ_ARG(include, 0, "include needs a argument")
999                 struct conftree *leaf = conftree_add(currentconffile, arg);
1000                 if(leaf) {
1001                         if (load_config_file(arg) == TRUE) {
1002                                 obj->sub = malloc(sizeof(struct text_object));
1003                                 currentconffile = leaf;
1004                                 extract_variable_text_internal(obj->sub, get_global_text());
1005                                 currentconffile = leaf->back;
1006                         } else {
1007                                 NORM_ERR("Can't load configfile '%s'.", arg);
1008                         }
1009                 } else {
1010                         NORM_ERR("You are trying to load '%s' recursively, I'm only going to load it once to prevent an infinite loop.", arg);
1011                 }
1012         END OBJ_ARG(blink, 0, "blink needs a argument")
1013                 obj->sub = malloc(sizeof(struct text_object));
1014                 extract_variable_text_internal(obj->sub, arg);
1015         END OBJ_ARG(to_bytes, 0, "to_bytes needs a argument")
1016                 obj->sub = malloc(sizeof(struct text_object));
1017                 extract_variable_text_internal(obj->sub, arg);
1018         END OBJ(scroll, 0)
1019                 parse_scroll_arg(obj, arg, free_at_crash);
1020         END OBJ_ARG(combine, 0, "combine needs arguments: <text1> <text2>")
1021                 parse_combine_arg(obj, arg, free_at_crash);
1022 #ifdef NVIDIA
1023         END OBJ_ARG(nvidia, 0, "nvidia needs an argument")
1024                 if (set_nvidia_type(obj, arg)) {
1025                         CRIT_ERR(obj, free_at_crash, "nvidia: invalid argument"
1026                                  " specified: '%s'\n", arg);
1027                 }
1028 #endif /* NVIDIA */
1029 #ifdef APCUPSD
1030         END OBJ_ARG(apcupsd, &update_apcupsd, "apcupsd needs arguments: <host> <port>")
1031                 char host[64];
1032                 int port;
1033                 if (sscanf(arg, "%63s %d", host, &port) != 2) {
1034                         CRIT_ERR(obj, free_at_crash, "apcupsd needs arguments: <host> <port>");
1035                 } else {
1036                         info.apcupsd.port = htons(port);
1037                         strncpy(info.apcupsd.host, host, sizeof(info.apcupsd.host));
1038                 }
1039         END OBJ(apcupsd_name, &update_apcupsd)
1040         END OBJ(apcupsd_model, &update_apcupsd)
1041         END OBJ(apcupsd_upsmode, &update_apcupsd)
1042         END OBJ(apcupsd_cable, &update_apcupsd)
1043         END OBJ(apcupsd_status, &update_apcupsd)
1044         END OBJ(apcupsd_linev, &update_apcupsd)
1045         END OBJ(apcupsd_load, &update_apcupsd)
1046         END OBJ(apcupsd_loadbar, &update_apcupsd)
1047                 scan_bar(obj, arg);
1048 #ifdef X11
1049         END OBJ(apcupsd_loadgraph, &update_apcupsd)
1050                 char* buf = 0;
1051                 buf = scan_graph(obj, arg, 0);
1052                 if (buf) free(buf);
1053         END OBJ(apcupsd_loadgauge, &update_apcupsd)
1054                 scan_gauge(obj, arg);
1055 #endif /* X11 */
1056         END OBJ(apcupsd_charge, &update_apcupsd)
1057         END OBJ(apcupsd_timeleft, &update_apcupsd)
1058         END OBJ(apcupsd_temp, &update_apcupsd)
1059         END OBJ(apcupsd_lastxfer, &update_apcupsd)
1060 #endif /* APCUPSD */
1061         END {
1062                 char buf[256];
1063
1064                 NORM_ERR("unknown variable %s", s);
1065                 obj->type = OBJ_text;
1066                 snprintf(buf, 256, "${%s}", s);
1067                 obj->data.s = strndup(buf, text_buffer_size);
1068         }
1069 #undef OBJ
1070 #undef OBJ_IF
1071 #undef OBJ_ARG
1072 #undef OBJ_IF_ARG
1073 #undef __OBJ_HEAD
1074 #undef __OBJ_IF
1075 #undef __OBJ_ARG
1076 #undef END
1077
1078         return obj;
1079 }
1080
1081 /*
1082  * - assumes that *string is '#'
1083  * - removes the part from '#' to the end of line ('\n' or '\0')
1084  * - it removes the '\n'
1085  * - copies the last char into 'char *last' argument, which should be a pointer
1086  *   to a char rather than a string.
1087  */
1088 static size_t remove_comment(char *string, char *last)
1089 {
1090         char *end = string;
1091         while (*end != '\0' && *end != '\n') {
1092                 ++end;
1093         }
1094         if (last) *last = *end;
1095         if (*end == '\n') end++;
1096         strfold(string, end - string);
1097         return end - string;
1098 }
1099
1100 size_t remove_comments(char *string)
1101 {
1102         char *curplace;
1103         size_t folded = 0;
1104         for (curplace = string; *curplace != 0; curplace++) {
1105                 if (*curplace == '\\' && *(curplace + 1) == '#') {
1106                         // strcpy can't be used for overlapping strings
1107                         strfold(curplace, 1);
1108                         folded += 1;
1109                 } else if (*curplace == '#') {
1110                         folded += remove_comment(curplace, 0);
1111                 }
1112         }
1113         return folded;
1114 }
1115
1116 int extract_variable_text_internal(struct text_object *retval, const char *const_p)
1117 {
1118         struct text_object *obj;
1119         char *p, *s, *orig_p;
1120         long line;
1121         void *ifblock_opaque = NULL;
1122         char *tmp_p;
1123         char *arg = 0;
1124         size_t len = 0;
1125
1126         p = strndup(const_p, max_user_text - 1);
1127         while (text_contains_templates(p)) {
1128                 char *tmp;
1129                 tmp = find_and_replace_templates(p);
1130                 free(p);
1131                 p = tmp;
1132         }
1133         s = orig_p = p;
1134
1135         if (strcmp(p, const_p)) {
1136                 DBGP("replaced all templates in text: input is\n'%s'\noutput is\n'%s'", const_p, p);
1137         } else {
1138                 DBGP("no templates to replace");
1139         }
1140
1141         memset(retval, 0, sizeof(struct text_object));
1142
1143         line = global_text_lines;
1144
1145         while (*p) {
1146                 if (*p == '\n') {
1147                         line++;
1148                 }
1149                 if (*p == '$') {
1150                         *p = '\0';
1151                         obj = create_plain_text(s);
1152                         if (obj != NULL) {
1153                                 append_object(retval, obj);
1154                         }
1155                         *p = '$';
1156                         p++;
1157                         s = p;
1158
1159                         if (*p != '$') {
1160                                 char buf[256];
1161                                 const char *var;
1162
1163                                 /* variable is either $foo or ${foo} */
1164                                 if (*p == '{') {
1165                                         unsigned int brl = 1, brr = 0;
1166
1167                                         p++;
1168                                         s = p;
1169                                         while (*p && brl != brr) {
1170                                                 if (*p == '{') {
1171                                                         brl++;
1172                                                 }
1173                                                 if (*p == '}') {
1174                                                         brr++;
1175                                                 }
1176                                                 p++;
1177                                         }
1178                                         p--;
1179                                 } else {
1180                                         s = p;
1181                                         if (*p == '#') {
1182                                                 p++;
1183                                         }
1184                                         while (*p && (isalnum((int) *p) || *p == '_')) {
1185                                                 p++;
1186                                         }
1187                                 }
1188
1189                                 /* copy variable to buffer */
1190                                 len = (p - s > 255) ? 255 : (p - s);
1191                                 strncpy(buf, s, len);
1192                                 buf[len] = '\0';
1193
1194                                 if (*p == '}') {
1195                                         p++;
1196                                 }
1197                                 s = p;
1198
1199                                 /* search for variable in environment */
1200
1201                                 var = getenv(buf);
1202                                 if (var) {
1203                                         obj = create_plain_text(var);
1204                                         if (obj) {
1205                                                 append_object(retval, obj);
1206                                         }
1207                                         continue;
1208                                 }
1209
1210                                 /* if variable wasn't found in environment, use some special */
1211
1212                                 arg = 0;
1213
1214                                 /* split arg */
1215                                 if (strchr(buf, ' ')) {
1216                                         arg = strchr(buf, ' ');
1217                                         *arg = '\0';
1218                                         arg++;
1219                                         while (isspace((int) *arg)) {
1220                                                 arg++;
1221                                         }
1222                                         if (!*arg) {
1223                                                 arg = 0;
1224                                         }
1225                                 }
1226
1227                                 /* lowercase variable name */
1228                                 tmp_p = buf;
1229                                 while (*tmp_p) {
1230                                         *tmp_p = tolower(*tmp_p);
1231                                         tmp_p++;
1232                                 }
1233
1234                                 obj = construct_text_object(buf, arg,
1235                                                 line, &ifblock_opaque, orig_p);
1236                                 if (obj != NULL) {
1237                                         append_object(retval, obj);
1238                                 }
1239                                 continue;
1240                         } else {
1241                                 obj = create_plain_text("$");
1242                                 s = p + 1;
1243                                 if (obj != NULL) {
1244                                         append_object(retval, obj);
1245                                 }
1246                         }
1247                 } else if (*p == '\\' && *(p+1) == '#') {
1248                         strfold(p, 1);
1249                 } else if (*p == '#') {
1250                         char c;
1251                         if (remove_comment(p, &c) && p > orig_p && c == '\n') {
1252                                 /* if remove_comment removed a newline, we need to 'back up' with p */
1253                                 p--;
1254                         }
1255                 }
1256                 p++;
1257         }
1258         obj = create_plain_text(s);
1259         if (obj != NULL) {
1260                 append_object(retval, obj);
1261         }
1262
1263         if (!ifblock_stack_empty(&ifblock_opaque)) {
1264                 NORM_ERR("one or more $endif's are missing");
1265         }
1266
1267         free(orig_p);
1268         return 0;
1269 }
1270
1271 /*
1272  * Frees the list of text objects root points to.  When internal = 1, it won't
1273  * free global objects.
1274  */
1275 void free_text_objects(struct text_object *root, int internal)
1276 {
1277         struct text_object *obj;
1278
1279         if (!root->prev) {
1280                 return;
1281         }
1282
1283 #define data obj->data
1284         for (obj = root->prev; obj; obj = root->prev) {
1285                 root->prev = obj->prev;
1286                 switch (obj->type) {
1287 #ifndef __OpenBSD__
1288                         case OBJ_acpitemp:
1289                                 close(data.i);
1290                                 break;
1291 #endif /* !__OpenBSD__ */
1292 #ifdef __linux__
1293                         case OBJ_i2c:
1294                         case OBJ_platform:
1295                         case OBJ_hwmon:
1296                                 free_sysfs_sensor(obj);
1297                                 break;
1298 #endif /* __linux__ */
1299                         case OBJ_cmdline_to_pid:
1300                                 free(data.s);
1301                                 break;
1302                         case OBJ_pid_environ:
1303                         case OBJ_pid_chroot:
1304                         case OBJ_pid_cmdline:
1305                         case OBJ_pid_cwd:
1306                         case OBJ_pid_environ_list:
1307                         case OBJ_pid_exe:
1308                         case OBJ_pid_openfiles:
1309                         case OBJ_pid_parent:
1310                         case OBJ_pid_state:
1311                         case OBJ_pid_state_short:
1312                         case OBJ_pid_stderr:
1313                         case OBJ_pid_stdin:
1314                         case OBJ_pid_stdout:
1315                         case OBJ_pid_uid:
1316                         case OBJ_pid_euid:
1317                         case OBJ_pid_suid:
1318                         case OBJ_pid_fsuid:
1319                         case OBJ_pid_gid:
1320                         case OBJ_pid_egid:
1321                         case OBJ_pid_sgid:
1322                         case OBJ_pid_fsgid:
1323                                 if(obj->sub) {
1324                                         free_text_objects(obj->sub, 1);
1325                                         free(obj->sub);
1326                                 }
1327                                 break;
1328                         case OBJ_read_tcp:
1329                                 free_read_tcp(obj);
1330                                 break;
1331                         case OBJ_time:
1332                         case OBJ_utime:
1333                                 free_time(obj);
1334                                 break;
1335                         case OBJ_tztime:
1336                                 free_tztime(obj);
1337                                 break;
1338                         case OBJ_mboxscan:
1339                                 free_mboxscan(obj);
1340                                 break;
1341                         case OBJ_mails:
1342                         case OBJ_new_mails:
1343                         case OBJ_seen_mails:
1344                         case OBJ_unseen_mails:
1345                         case OBJ_flagged_mails:
1346                         case OBJ_unflagged_mails:
1347                         case OBJ_forwarded_mails:
1348                         case OBJ_unforwarded_mails:
1349                         case OBJ_replied_mails:
1350                         case OBJ_unreplied_mails:
1351                         case OBJ_draft_mails:
1352                         case OBJ_trashed_mails:
1353                                 free_local_mails(obj);
1354                                 break;
1355                         case OBJ_imap_unseen:
1356                         case OBJ_imap_messages:
1357                         case OBJ_pop3_unseen:
1358                         case OBJ_pop3_used:
1359                                 free_mail_obj(obj);
1360                                 break;
1361                         case OBJ_if_empty:
1362                         case OBJ_if_match:
1363                                 free_text_objects(obj->sub, 1);
1364                                 free(obj->sub);
1365                                 break;
1366                         case OBJ_if_existing:
1367                         case OBJ_if_mounted:
1368                         case OBJ_if_running:
1369                                 free(data.s);
1370                                 break;
1371                         case OBJ_head:
1372                         case OBJ_tail:
1373                                 free_tailhead(obj);
1374                                 break;
1375                         case OBJ_text:
1376                         case OBJ_font:
1377                         case OBJ_image:
1378                         case OBJ_eval:
1379                                 free(data.s);
1380                                 break;
1381                         case OBJ_exec:
1382                         case OBJ_execbar:
1383 #ifdef X11
1384                         case OBJ_execgauge:
1385                         case OBJ_execgraph:
1386 #endif
1387                         case OBJ_execp:
1388                                 free_exec(obj);
1389                                 break;
1390 #ifdef HAVE_ICONV
1391                         case OBJ_iconv_start:
1392                                 free_iconv();
1393                                 break;
1394 #endif
1395 #ifdef __linux__
1396                         case OBJ_disk_protect:
1397                                 free(data.s);
1398                                 break;
1399                         case OBJ_if_gw:
1400                         case OBJ_gw_iface:
1401                         case OBJ_gw_ip:
1402                                 free_gateway_info();
1403                                 break;
1404                         case OBJ_ioscheduler:
1405                                 if(data.s)
1406                                         free(data.s);
1407                                 break;
1408 #endif
1409 #if (defined(__FreeBSD__) || defined(__linux__))
1410                         case OBJ_if_up:
1411                                 free_if_up(obj);
1412                                 break;
1413 #endif
1414 #ifdef XMMS2
1415                         case OBJ_xmms2_artist:
1416                                 if (info.xmms2.artist) {
1417                                         free(info.xmms2.artist);
1418                                         info.xmms2.artist = 0;
1419                                 }
1420                                 break;
1421                         case OBJ_xmms2_album:
1422                                 if (info.xmms2.album) {
1423                                         free(info.xmms2.album);
1424                                         info.xmms2.album = 0;
1425                                 }
1426                                 break;
1427                         case OBJ_xmms2_title:
1428                                 if (info.xmms2.title) {
1429                                         free(info.xmms2.title);
1430                                         info.xmms2.title = 0;
1431                                 }
1432                                 break;
1433                         case OBJ_xmms2_genre:
1434                                 if (info.xmms2.genre) {
1435                                         free(info.xmms2.genre);
1436                                         info.xmms2.genre = 0;
1437                                 }
1438                                 break;
1439                         case OBJ_xmms2_comment:
1440                                 if (info.xmms2.comment) {
1441                                         free(info.xmms2.comment);
1442                                         info.xmms2.comment = 0;
1443                                 }
1444                                 break;
1445                         case OBJ_xmms2_url:
1446                                 if (info.xmms2.url) {
1447                                         free(info.xmms2.url);
1448                                         info.xmms2.url = 0;
1449                                 }
1450                                 break;
1451                         case OBJ_xmms2_date:
1452                                 if (info.xmms2.date) {
1453                                         free(info.xmms2.date);
1454                                         info.xmms2.date = 0;
1455                                 }
1456                                 break;
1457                         case OBJ_xmms2_status:
1458                                 if (info.xmms2.status) {
1459                                         free(info.xmms2.status);
1460                                         info.xmms2.status = 0;
1461                                 }
1462                                 break;
1463                         case OBJ_xmms2_playlist:
1464                                 if (info.xmms2.playlist) {
1465                                         free(info.xmms2.playlist);
1466                                         info.xmms2.playlist = 0;
1467                                 }
1468                                 break;
1469                         case OBJ_xmms2_smart:
1470                                 if (info.xmms2.artist) {
1471                                         free(info.xmms2.artist);
1472                                         info.xmms2.artist = 0;
1473                                 }
1474                                 if (info.xmms2.title) {
1475                                         free(info.xmms2.title);
1476                                         info.xmms2.title = 0;
1477                                 }
1478                                 if (info.xmms2.url) {
1479                                         free(info.xmms2.url);
1480                                         info.xmms2.url = 0;
1481                                 }
1482                                 break;
1483 #endif
1484 #ifdef BMPX
1485                         case OBJ_bmpx_title:
1486                         case OBJ_bmpx_artist:
1487                         case OBJ_bmpx_album:
1488                         case OBJ_bmpx_track:
1489                         case OBJ_bmpx_uri:
1490                         case OBJ_bmpx_bitrate:
1491                                 break;
1492 #endif
1493 #ifdef EVE
1494                         case OBJ_eve:
1495                                 free_eve(obj);
1496                                 break;
1497 #endif
1498 #ifdef HAVE_CURL
1499                         case OBJ_curl:
1500                                 curl_obj_free(obj);
1501                                 break;
1502 #endif
1503 #ifdef RSS
1504                         case OBJ_rss:
1505                                 rss_free_obj_info(obj);
1506                                 break;
1507 #endif
1508 #ifdef WEATHER
1509                         case OBJ_weather:
1510                                 free_weather(obj);
1511                                 break;
1512 #endif
1513 #ifdef XOAP
1514                         case OBJ_weather_forecast:
1515                                 free_weather(obj);
1516                                 break;
1517 #endif
1518 #ifdef HAVE_LUA
1519                         case OBJ_lua:
1520                         case OBJ_lua_parse:
1521                         case OBJ_lua_bar:
1522 #ifdef X11
1523                         case OBJ_lua_graph:
1524                         case OBJ_lua_gauge:
1525 #endif /* X11 */
1526                                 free(data.s);
1527                                 break;
1528 #endif /* HAVE_LUA */
1529                         case OBJ_pre_exec:
1530                                 break;
1531 #ifndef __OpenBSD__
1532                         case OBJ_battery:
1533                                 free(data.s);
1534                                 break;
1535                         case OBJ_battery_short:
1536                                 free(data.s);
1537                                 break;
1538                         case OBJ_battery_time:
1539                                 free(data.s);
1540                                 break;
1541 #endif /* !__OpenBSD__ */
1542                         case OBJ_execpi:
1543                         case OBJ_execi:
1544                         case OBJ_execibar:
1545                         case OBJ_texeci:
1546 #ifdef X11
1547                         case OBJ_execigraph:
1548                         case OBJ_execigauge:
1549 #endif /* X11 */
1550                                 free_execi(obj);
1551                                 break;
1552                         case OBJ_nameserver:
1553                                 free_dns_data();
1554                                 break;
1555 #ifdef __linux__
1556                         case OBJ_top:
1557                         case OBJ_top_mem:
1558                         case OBJ_top_time:
1559 #ifdef IOSTATS
1560                         case OBJ_top_io:
1561 #endif
1562                                 free_top(obj, internal);
1563                                 break;
1564 #endif /* __linux__ */
1565 #ifdef HDDTEMP
1566                         case OBJ_hddtemp:
1567                                 if (data.s) {
1568                                         free(data.s);
1569                                         data.s = NULL;
1570                                 }
1571                                 free_hddtemp();
1572                                 break;
1573 #endif /* HDDTEMP */
1574                         case OBJ_entropy_avail:
1575                         case OBJ_entropy_perc:
1576                         case OBJ_entropy_poolsize:
1577                         case OBJ_entropy_bar:
1578                                 break;
1579                         case OBJ_user_names:
1580                                 if (info.users.names) {
1581                                         free(info.users.names);
1582                                         info.users.names = 0;
1583                                 }
1584                                 break;
1585                         case OBJ_user_terms:
1586                                 if (info.users.terms) {
1587                                         free(info.users.terms);
1588                                         info.users.terms = 0;
1589                                 }
1590                                 break;
1591                         case OBJ_user_times:
1592                                 if (info.users.times) {
1593                                         free(info.users.times);
1594                                         info.users.times = 0;
1595                                 }
1596                                 break;
1597                         case OBJ_user_time:
1598                                 if (info.users.ctime) {
1599                                         free(info.users.ctime);
1600                                         info.users.ctime = 0;
1601                                 }
1602                                 if (data.s) {
1603                                         free(data.s);
1604                                 }
1605                                 break;
1606 #ifdef IBM
1607                         case OBJ_smapi:
1608                         case OBJ_smapi_bat_perc:
1609                         case OBJ_smapi_bat_temp:
1610                         case OBJ_smapi_bat_power:
1611                                 free(data.s);
1612                                 break;
1613                         case OBJ_if_smapi_bat_installed:
1614                                 free(data.s);
1615                                 break;
1616 #endif /* IBM */
1617 #ifdef NVIDIA
1618                         case OBJ_nvidia:
1619                                 free_nvidia(obj);
1620                                 break;
1621 #endif /* NVIDIA */
1622 #ifdef MPD
1623                         case OBJ_mpd_title:
1624                         case OBJ_mpd_artist:
1625                         case OBJ_mpd_album:
1626                         case OBJ_mpd_random:
1627                         case OBJ_mpd_repeat:
1628                         case OBJ_mpd_vol:
1629                         case OBJ_mpd_bitrate:
1630                         case OBJ_mpd_status:
1631                         case OBJ_mpd_bar:
1632                         case OBJ_mpd_elapsed:
1633                         case OBJ_mpd_length:
1634                         case OBJ_mpd_track:
1635                         case OBJ_mpd_name:
1636                         case OBJ_mpd_file:
1637                         case OBJ_mpd_percent:
1638                         case OBJ_mpd_smart:
1639                         case OBJ_if_mpd_playing:
1640                                 free_mpd();
1641                                 break;
1642 #endif /* MPD */
1643 #ifdef MOC
1644                         case OBJ_moc_state:
1645                         case OBJ_moc_file:
1646                         case OBJ_moc_title:
1647                         case OBJ_moc_artist:
1648                         case OBJ_moc_song:
1649                         case OBJ_moc_album:
1650                         case OBJ_moc_totaltime:
1651                         case OBJ_moc_timeleft:
1652                         case OBJ_moc_curtime:
1653                         case OBJ_moc_bitrate:
1654                         case OBJ_moc_rate:
1655                                 free_moc();
1656                                 break;
1657 #endif /* MOC */
1658                         case OBJ_include:
1659                         case OBJ_blink:
1660                         case OBJ_to_bytes:
1661                                 if(obj->sub) {
1662                                         free_text_objects(obj->sub, 1);
1663                                         free(obj->sub);
1664                                 }
1665                                 break;
1666                         case OBJ_scroll:
1667                                 free_scroll(obj);
1668                                 break;
1669                         case OBJ_combine:
1670                                 free_combine(obj);
1671                                 break;
1672 #ifdef APCUPSD
1673                         case OBJ_apcupsd:
1674                         case OBJ_apcupsd_name:
1675                         case OBJ_apcupsd_model:
1676                         case OBJ_apcupsd_upsmode:
1677                         case OBJ_apcupsd_cable:
1678                         case OBJ_apcupsd_status:
1679                         case OBJ_apcupsd_linev:
1680                         case OBJ_apcupsd_load:
1681                         case OBJ_apcupsd_loadbar:
1682 #ifdef X11
1683                         case OBJ_apcupsd_loadgraph:
1684                         case OBJ_apcupsd_loadgauge:
1685 #endif /* X11 */
1686                         case OBJ_apcupsd_charge:
1687                         case OBJ_apcupsd_timeleft:
1688                         case OBJ_apcupsd_temp:
1689                         case OBJ_apcupsd_lastxfer:
1690                                 break;
1691 #endif /* APCUPSD */
1692 #ifdef TCP_PORT_MONITOR
1693                         case OBJ_tcp_portmon:
1694                                 tcp_portmon_free(obj);
1695                                 break;
1696 #endif /* TCP_PORT_MONITOR */
1697 #ifdef X11
1698                         case OBJ_desktop:
1699                         case OBJ_desktop_number:
1700                         case OBJ_desktop_name:
1701                                 if(info.x11.desktop.name && !internal) {
1702                                   free(info.x11.desktop.name);
1703                                   info.x11.desktop.name = NULL;
1704                                 }
1705                                 if(info.x11.desktop.all_names && !internal) {
1706                                   free(info.x11.desktop.all_names);
1707                                   info.x11.desktop.all_names = NULL;
1708                                 }
1709                                 break;
1710 #endif /* X11 */
1711                 }
1712                 if(obj->special_data) free(obj->special_data);
1713                 free(obj);
1714         }
1715 #undef data
1716 }
1717