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