git.maemo.org Git - monky/blob - src/core.c

   1 /* -*- mode: c; c-basic-offset: 4; tab-width: 4; indent-tabs-mode: t -*-
   2  *
   3  * Conky, a system monitor, based on torsmo
   4  *
   5  * Any original torsmo code is licensed under the BSD license
   6  *
   7  * All code written since the fork of torsmo is licensed under the GPL
   8  *
   9  * Please see COPYING for details
  10  *
  11  * Copyright (c) 2004, Hannu Saransaari and Lauri Hakkarainen
  12  * Copyright (c) 2005-2009 Brenden Matthews, Philip Kovacs, et. al.
  13  *      (see AUTHORS)
  14  * All rights reserved.
  15  *
  16  * This program is free software: you can redistribute it and/or modify
  17  * it under the terms of the GNU General Public License as published by
  18  * the Free Software Foundation, either version 3 of the License, or
  19  * (at your option) any later version.
  20  *
  21  * This program is distributed in the hope that it will be useful,
  22  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  23  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  24  * GNU General Public License for more details.
  25  * You should have received a copy of the GNU General Public License
  26  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  27  *
  28  * vim: ts=4 sw=4 noet ai cindent syntax=c
  29  *
  30  */
  31
  32 /* local headers */
  33 #include "core.h"
  34 #include "text_object.h"
  35 #include "algebra.h"
  36 #include "build.h"
  37 #include "colours.h"
  38 #include "diskio.h"
  39 #ifdef X11
  40 #include "fonts.h"
  41 #endif
  42 #include "fs.h"
  43 #include "logging.h"
  44 #include "mixer.h"
  45 #include "mail.h"
  46 #include "mboxscan.h"
  47 #include "specials.h"
  48 #include "temphelper.h"
  49 #include "template.h"
  50 #include "tailhead.h"
  51 #include "top.h"
  52
  53 /* check for OS and include appropriate headers */
  54 #if defined(__linux__)
  55 #include "linux.h"
  56 #elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
  57 #include "freebsd.h"
  58 #elif defined(__OpenBSD__)
  59 #include "openbsd.h"
  60 #endif
  61
  62 #include <string.h>
  63 #include <ctype.h>
  64
  65 #ifdef HAVE_ICONV
  66 #include <iconv.h>
  67
  68 #ifdef NCURSES
  69 #include <ncurses.h>
  70 #endif
  71
  72 #define ICONV_CODEPAGE_LENGTH 20
  73
  74 int register_iconv(iconv_t *new_iconv);
  75
  76 long iconv_selected;
  77 long iconv_count = 0;
  78 char iconv_converting;
  79 static iconv_t **iconv_cd = 0;
  80
  81 char is_iconv_converting(void)
  82 {
  83         return iconv_converting;
  84 }
  85
  86 void set_iconv_converting(char i)
  87 {
  88         iconv_converting = i;
  89 }
  90
  91 long get_iconv_selected(void)
  92 {
  93         return iconv_selected;
  94 }
  95
  96 void set_iconv_selected(long i)
  97 {
  98         iconv_selected = i;
  99 }
 100
 101 int register_iconv(iconv_t *new_iconv)
 102 {
 103         iconv_cd = realloc(iconv_cd, sizeof(iconv_t *) * (iconv_count + 1));
 104         if (!iconv_cd) {
 105                 CRIT_ERR(NULL, NULL, "Out of memory");
 106         }
 107         iconv_cd[iconv_count] = malloc(sizeof(iconv_t));
 108         if (!iconv_cd[iconv_count]) {
 109                 CRIT_ERR(NULL, NULL, "Out of memory");
 110         }
 111         memcpy(iconv_cd[iconv_count], new_iconv, sizeof(iconv_t));
 112         iconv_count++;
 113         return iconv_count;
 114 }
 115
 116 void free_iconv(void)
 117 {
 118         if (iconv_cd) {
 119                 long i;
 120
 121                 for (i = 0; i < iconv_count; i++) {
 122                         if (iconv_cd[i]) {
 123                                 iconv_close(*iconv_cd[i]);
 124                                 free(iconv_cd[i]);
 125                         }
 126                 }
 127                 free(iconv_cd);
 128         }
 129         iconv_cd = 0;
 130 }
 131
 132 void iconv_convert(size_t a, char *buff_in, char *p, size_t p_max_size)
 133 {
 134         if (a > 0 && is_iconv_converting() && get_iconv_selected() > 0
 135                         && (iconv_cd[iconv_selected - 1] != (iconv_t) (-1))) {
 136                 int bytes;
 137                 size_t dummy1, dummy2;
 138 #ifdef __FreeBSD__
 139                 const char *ptr = buff_in;
 140 #else
 141                 char *ptr = buff_in;
 142 #endif
 143                 char *outptr = p;
 144
 145                 dummy1 = dummy2 = a;
 146
 147                 strncpy(buff_in, p, p_max_size);
 148
 149                 iconv(*iconv_cd[iconv_selected - 1], NULL, NULL, NULL, NULL);
 150                 while (dummy1 > 0) {
 151                         bytes = iconv(*iconv_cd[iconv_selected - 1], &ptr, &dummy1,
 152                                         &outptr, &dummy2);
 153                         if (bytes == -1) {
 154                                 NORM_ERR("Iconv codeset conversion failed");
 155                                 break;
 156                         }
 157                 }
 158
 159                 /* It is nessecary when we are converting from multibyte to
 160                  * singlebyte codepage */
 161                 a = outptr - p;
 162         }
 163 }
 164 #endif /* HAVE_ICONV */
 165
 166 /* strip a leading /dev/ if any, following symlinks first
 167  *
 168  * BEWARE: this function returns a pointer to static content
 169  *         which gets overwritten in consecutive calls. I.e.:
 170  *         this function is NOT reentrant.
 171  */
 172 static const char *dev_name(const char *path)
 173 {
 174         static char buf[255];   /* should be enough for pathnames */
 175         ssize_t buflen;
 176
 177         if (!path)
 178                 return NULL;
 179
 180 #define DEV_NAME(x) \
 181   x != NULL && strlen(x) > 5 && strncmp(x, "/dev/", 5) == 0 ? x + 5 : x
 182         if ((buflen = readlink(path, buf, 254)) == -1)
 183                 return DEV_NAME(path);
 184         buf[buflen] = '\0';
 185         return DEV_NAME(buf);
 186 #undef DEV_NAME
 187 }
 188
 189 static struct text_object *new_text_object_internal(void)
 190 {
 191         struct text_object *obj = malloc(sizeof(struct text_object));
 192         memset(obj, 0, sizeof(struct text_object));
 193         return obj;
 194 }
 195
 196 static struct text_object *create_plain_text(const char *s)
 197 {
 198         struct text_object *obj;
 199
 200         if (s == NULL || *s == '\0') {
 201                 return NULL;
 202         }
 203
 204         obj = new_text_object_internal();
 205
 206         obj->type = OBJ_text;
 207         obj->data.s = strndup(s, text_buffer_size);
 208         return obj;
 209 }
 210
 211 /* construct_text_object() creates a new text_object */
 212 struct text_object *construct_text_object(const char *s, const char *arg, long
 213                 line, void **ifblock_opaque, void *free_at_crash)
 214 {
 215         // struct text_object *obj = new_text_object();
 216         struct text_object *obj = new_text_object_internal();
 217
 218         obj->line = line;
 219
 220 #define OBJ(a, n) if (strcmp(s, #a) == 0) { \
 221         obj->type = OBJ_##a; need_mask |= (1ULL << n); {
 222 #define OBJ_IF(a, n) if (strcmp(s, #a) == 0) { \
 223         obj->type = OBJ_##a; need_mask |= (1ULL << n); \
 224         obj_be_ifblock_if(ifblock_opaque, obj); {
 225 #define END } } else
 226
 227 #define SIZE_DEFAULTS(arg) { \
 228         obj->a = default_##arg##_width; \
 229         obj->b = default_##arg##_height; \
 230 }
 231
 232 #ifdef X11
 233         if (s[0] == '#') {
 234                 obj->type = OBJ_color;
 235                 obj->data.l = get_x11_color(s);
 236         } else
 237 #endif /* X11 */
 238 #ifdef __OpenBSD__
 239         OBJ(freq, INFO_FREQ)
 240 #else
 241         OBJ(acpitemp, 0)
 242                 obj->data.i = open_acpi_temperature(arg);
 243         END OBJ(acpiacadapter, 0)
 244         END OBJ(freq, INFO_FREQ)
 245 #endif /* !__OpenBSD__ */
 246                 get_cpu_count();
 247                 if (!arg || !isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) == 0
 248                                 || (unsigned int) atoi(&arg[0]) > info.cpu_count) {
 249                         obj->data.cpu_index = 1;
 250                         /* NORM_ERR("freq: Invalid CPU number or you don't have that many CPUs! "
 251                                 "Displaying the clock for CPU 1."); */
 252                 } else {
 253                         obj->data.cpu_index = atoi(&arg[0]);
 254                 }
 255                 obj->a = 1;
 256         END OBJ(freq_g, INFO_FREQ)
 257                 get_cpu_count();
 258                 if (!arg || !isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) == 0
 259                                 || (unsigned int) atoi(&arg[0]) > info.cpu_count) {
 260                         obj->data.cpu_index = 1;
 261                         /* NORM_ERR("freq_g: Invalid CPU number or you don't have that many "
 262                                 "CPUs! Displaying the clock for CPU 1."); */
 263                 } else {
 264                         obj->data.cpu_index = atoi(&arg[0]);
 265                 }
 266                 obj->a = 1;
 267         END OBJ(read_tcp, 0)
 268                 if (arg) {
 269                         obj->data.read_tcp.host = malloc(text_buffer_size);
 270                         sscanf(arg, "%s", obj->data.read_tcp.host);
 271                         sscanf(arg+strlen(obj->data.read_tcp.host), "%u", &(obj->data.read_tcp.port));
 272                         if(obj->data.read_tcp.port == 0) {
 273                                 obj->data.read_tcp.port = atoi(obj->data.read_tcp.host);
 274                                 strcpy(obj->data.read_tcp.host,"localhost");
 275                         }
 276                         obj->data.read_tcp.port = htons(obj->data.read_tcp.port);
 277                         if(obj->data.read_tcp.port < 1 || obj->data.read_tcp.port > 65535) {
 278                                 CRIT_ERR(obj, free_at_crash, "read_tcp: Needs \"(host) port\" as argument(s)");
 279                         }
 280                 }else{
 281                         CRIT_ERR(obj, free_at_crash, "read_tcp: Needs \"(host) port\" as argument(s)");
 282                 }
 283 #if defined(__linux__)
 284         END OBJ(voltage_mv, 0)
 285                 get_cpu_count();
 286                 if (!arg || !isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) == 0
 287                                 || (unsigned int) atoi(&arg[0]) > info.cpu_count) {
 288                         obj->data.cpu_index = 1;
 289                         /* NORM_ERR("voltage_mv: Invalid CPU number or you don't have that many "
 290                                 "CPUs! Displaying voltage for CPU 1."); */
 291                 } else {
 292                         obj->data.cpu_index = atoi(&arg[0]);
 293                 }
 294                 obj->a = 1;
 295         END OBJ(voltage_v, 0)
 296                 get_cpu_count();
 297                 if (!arg || !isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) == 0
 298                                 || (unsigned int) atoi(&arg[0]) > info.cpu_count) {
 299                         obj->data.cpu_index = 1;
 300                         /* NORM_ERR("voltage_v: Invalid CPU number or you don't have that many "
 301                                 "CPUs! Displaying voltage for CPU 1."); */
 302                 } else {
 303                         obj->data.cpu_index = atoi(&arg[0]);
 304                 }
 305                 obj->a = 1;
 306
 307 #ifdef HAVE_IWLIB
 308         END OBJ(wireless_essid, INFO_NET)
 309                 if (arg) {
 310                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 311                 } else {
 312                         // default to DEFAULTNETDEV
 313                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 314                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 315                         free(buf);
 316                 }
 317         END OBJ(wireless_mode, INFO_NET)
 318                 if (arg) {
 319                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 320                 } else {
 321                         // default to DEFAULTNETDEV
 322                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 323                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 324                         free(buf);
 325                 }
 326         END OBJ(wireless_bitrate, INFO_NET)
 327                 if (arg) {
 328                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 329                 } else {
 330                         // default to DEFAULTNETDEV
 331                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 332                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 333                         free(buf);
 334                 }
 335         END OBJ(wireless_ap, INFO_NET)
 336                 if (arg) {
 337                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 338                 } else {
 339                         // default to DEFAULTNETDEV
 340                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 341                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 342                         free(buf);
 343                 }
 344         END OBJ(wireless_link_qual, INFO_NET)
 345                 if (arg) {
 346                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 347                 } else {
 348                         // default to DEFAULTNETDEV
 349                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 350                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 351                         free(buf);
 352                 }
 353         END OBJ(wireless_link_qual_max, INFO_NET)
 354                 if (arg) {
 355                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 356                 } else {
 357                         // default to DEFAULTNETDEV
 358                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 359                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 360                         free(buf);
 361                 }
 362         END OBJ(wireless_link_qual_perc, INFO_NET)
 363                 if (arg) {
 364                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 365                 } else {
 366                         // default to DEFAULTNETDEV
 367                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 368                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 369                         free(buf);
 370                 }
 371         END OBJ(wireless_link_bar, INFO_NET)
 372                 SIZE_DEFAULTS(bar);
 373                 if (arg) {
 374                         arg = scan_bar(arg, &obj->a, &obj->b);
 375                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 376                 } else {
 377                         // default to DEFAULTNETDEV
 378                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 379                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 380                         free(buf);
 381                 }
 382 #endif /* HAVE_IWLIB */
 383
 384 #endif /* __linux__ */
 385
 386 #ifndef __OpenBSD__
 387         END OBJ(acpifan, 0)
 388         END OBJ(battery, 0)
 389                 char bat[64];
 390
 391                 if (arg) {
 392                         sscanf(arg, "%63s", bat);
 393                 } else {
 394                         strcpy(bat, "BAT0");
 395                 }
 396                 obj->data.s = strndup(bat, text_buffer_size);
 397         END OBJ(battery_short, 0)
 398                 char bat[64];
 399
 400                 if (arg) {
 401                         sscanf(arg, "%63s", bat);
 402                 } else {
 403                         strcpy(bat, "BAT0");
 404                 }
 405                 obj->data.s = strndup(bat, text_buffer_size);
 406         END OBJ(battery_time, 0)
 407                 char bat[64];
 408
 409                 if (arg) {
 410                         sscanf(arg, "%63s", bat);
 411                 } else {
 412                         strcpy(bat, "BAT0");
 413                 }
 414                 obj->data.s = strndup(bat, text_buffer_size);
 415         END OBJ(battery_percent, 0)
 416                 char bat[64];
 417
 418                 if (arg) {
 419                         sscanf(arg, "%63s", bat);
 420                 } else {
 421                         strcpy(bat, "BAT0");
 422                 }
 423                 obj->data.s = strndup(bat, text_buffer_size);
 424         END OBJ(battery_bar, 0)
 425                 char bat[64];
 426                 SIZE_DEFAULTS(bar);
 427                 obj->b = 6;
 428                 if (arg) {
 429                         arg = scan_bar(arg, &obj->a, &obj->b);
 430                         sscanf(arg, "%63s", bat);
 431                 } else {
 432                         strcpy(bat, "BAT0");
 433                 }
 434                 obj->data.s = strndup(bat, text_buffer_size);
 435 #endif /* !__OpenBSD__ */
 436
 437 #if defined(__linux__)
 438         END OBJ(disk_protect, 0)
 439                 if (arg)
 440                         obj->data.s = strndup(dev_name(arg), text_buffer_size);
 441                 else
 442                         CRIT_ERR(obj, free_at_crash, "disk_protect needs an argument");
 443         END OBJ(i8k_version, INFO_I8K)
 444         END OBJ(i8k_bios, INFO_I8K)
 445         END OBJ(i8k_serial, INFO_I8K)
 446         END OBJ(i8k_cpu_temp, INFO_I8K)
 447         END OBJ(i8k_left_fan_status, INFO_I8K)
 448         END OBJ(i8k_right_fan_status, INFO_I8K)
 449         END OBJ(i8k_left_fan_rpm, INFO_I8K)
 450         END OBJ(i8k_right_fan_rpm, INFO_I8K)
 451         END OBJ(i8k_ac_status, INFO_I8K)
 452         END OBJ(i8k_buttons_status, INFO_I8K)
 453 #if defined(IBM)
 454         END OBJ(ibm_fan, 0)
 455         END OBJ(ibm_temps, 0)
 456                 if (!arg) {
 457                         CRIT_ERR(obj, free_at_crash, "ibm_temps: needs an argument");
 458                 }
 459                 if (!isdigit(arg[0]) || strlen(arg) >= 2 || atoi(&arg[0]) >= 8) {
 460                         obj->data.sensor = 0;
 461                         NORM_ERR("Invalid temperature sensor! Sensor number must be 0 to 7. "
 462                                 "Using 0 (CPU temp sensor).");
 463                 }
 464                 obj->data.sensor = atoi(&arg[0]);
 465         END OBJ(ibm_volume, 0)
 466         END OBJ(ibm_brightness, 0)
 467 #endif
 468         /* information from sony_laptop kernel module
 469          * /sys/devices/platform/sony-laptop */
 470         END OBJ(sony_fanspeed, 0)
 471         END OBJ_IF(if_gw, INFO_GW)
 472         END OBJ(ioscheduler, 0)
 473                 if (!arg) {
 474                         CRIT_ERR(obj, free_at_crash, "get_ioscheduler needs an argument (e.g. hda)");
 475                         obj->data.s = 0;
 476                 } else
 477                         obj->data.s = strndup(dev_name(arg), text_buffer_size);
 478         END OBJ(laptop_mode, 0)
 479         END OBJ(pb_battery, 0)
 480                 if (arg && strcmp(arg, "status") == EQUAL) {
 481                         obj->data.i = PB_BATT_STATUS;
 482                 } else if (arg && strcmp(arg, "percent") == EQUAL) {
 483                         obj->data.i = PB_BATT_PERCENT;
 484                 } else if (arg && strcmp(arg, "time") == EQUAL) {
 485                         obj->data.i = PB_BATT_TIME;
 486                 } else {
 487                         NORM_ERR("pb_battery: needs one argument: status, percent or time");
 488                         free(obj);
 489                         return NULL;
 490                 }
 491
 492 #endif /* __linux__ */
 493 #if (defined(__FreeBSD__) || defined(__linux__))
 494         END OBJ_IF(if_up, 0)
 495                 if (!arg) {
 496                         NORM_ERR("if_up needs an argument");
 497                         obj->data.ifblock.s = 0;
 498                 } else {
 499                         obj->data.ifblock.s = strndup(arg, text_buffer_size);
 500                 }
 501 #endif
 502 #if defined(__OpenBSD__)
 503         END OBJ(obsd_sensors_temp, 0)
 504                 if (!arg) {
 505                         CRIT_ERR(obj, free_at_crash, "obsd_sensors_temp: needs an argument");
 506                 }
 507                 if (!isdigit(arg[0]) || atoi(&arg[0]) < 0
 508                                 || atoi(&arg[0]) > OBSD_MAX_SENSORS - 1) {
 509                         obj->data.sensor = 0;
 510                         NORM_ERR("Invalid temperature sensor number!");
 511                 }
 512                 obj->data.sensor = atoi(&arg[0]);
 513         END OBJ(obsd_sensors_fan, 0)
 514                 if (!arg) {
 515                         CRIT_ERR(obj, free_at_crash, "obsd_sensors_fan: needs 2 arguments (device and sensor "
 516                                 "number)");
 517                 }
 518                 if (!isdigit(arg[0]) || atoi(&arg[0]) < 0
 519                                 || atoi(&arg[0]) > OBSD_MAX_SENSORS - 1) {
 520                         obj->data.sensor = 0;
 521                         NORM_ERR("Invalid fan sensor number!");
 522                 }
 523                 obj->data.sensor = atoi(&arg[0]);
 524         END OBJ(obsd_sensors_volt, 0)
 525                 if (!arg) {
 526                         CRIT_ERR(obj, free_at_crash, "obsd_sensors_volt: needs 2 arguments (device and sensor "
 527                                 "number)");
 528                 }
 529                 if (!isdigit(arg[0]) || atoi(&arg[0]) < 0
 530                                 || atoi(&arg[0]) > OBSD_MAX_SENSORS - 1) {
 531                         obj->data.sensor = 0;
 532                         NORM_ERR("Invalid voltage sensor number!");
 533                 }
 534                 obj->data.sensor = atoi(&arg[0]);
 535         END OBJ(obsd_vendor, 0)
 536         END OBJ(obsd_product, 0)
 537 #endif /* __OpenBSD__ */
 538         END OBJ(buffers, INFO_BUFFERS)
 539         END OBJ(cached, INFO_BUFFERS)
 540 #define SCAN_CPU(__arg, __var) { \
 541         int __offset = 0; \
 542         if (__arg && sscanf(__arg, " cpu%u %n", &__var, &__offset) > 0) \
 543                 __arg += __offset; \
 544         else \
 545                 __var = 0; \
 546 }
 547         END OBJ(cpu, INFO_CPU)
 548                 SCAN_CPU(arg, obj->data.cpu_index);
 549                 DBGP2("Adding $cpu for CPU %d", obj->data.cpu_index);
 550 #ifdef X11
 551         END OBJ(cpugauge, INFO_CPU)
 552                 SIZE_DEFAULTS(gauge);
 553                 SCAN_CPU(arg, obj->data.cpu_index);
 554                 scan_gauge(arg, &obj->a, &obj->b);
 555                 DBGP2("Adding $cpugauge for CPU %d", obj->data.cpu_index);
 556 #endif /* X11 */
 557         END OBJ(cpubar, INFO_CPU)
 558                 SIZE_DEFAULTS(bar);
 559                 SCAN_CPU(arg, obj->data.cpu_index);
 560                 scan_bar(arg, &obj->a, &obj->b);
 561                 DBGP2("Adding $cpubar for CPU %d", obj->data.cpu_index);
 562 #ifdef X11
 563         END OBJ(cpugraph, INFO_CPU)
 564                 char *buf = 0;
 565                 SIZE_DEFAULTS(graph);
 566                 SCAN_CPU(arg, obj->data.cpu_index);
 567                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
 568                         &obj->e, &obj->char_a, &obj->char_b);
 569                 DBGP2("Adding $cpugraph for CPU %d", obj->data.cpu_index);
 570                 if (buf) free(buf);
 571         END OBJ(loadgraph, INFO_LOADAVG)
 572                 char *buf = 0;
 573                 SIZE_DEFAULTS(graph);
 574                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
 575                                 &obj->e, &obj->char_a, &obj->char_b);
 576                 if (buf) {
 577                         int a = 1, r = 3;
 578                         if (arg) {
 579                                 r = sscanf(arg, "%d", &a);
 580                         }
 581                         obj->data.loadavg[0] = (r >= 1) ? (unsigned char) a : 0;
 582                         free(buf);
 583                 }
 584 #endif /* X11 */
 585         END OBJ(diskio, INFO_DISKIO)
 586                 obj->data.diskio = prepare_diskio_stat(dev_name(arg));
 587         END OBJ(diskio_read, INFO_DISKIO)
 588                 obj->data.diskio = prepare_diskio_stat(dev_name(arg));
 589         END OBJ(diskio_write, INFO_DISKIO)
 590                 obj->data.diskio = prepare_diskio_stat(dev_name(arg));
 591 #ifdef X11
 592         END OBJ(diskiograph, INFO_DISKIO)
 593                 char *buf = 0;
 594                 SIZE_DEFAULTS(graph);
 595                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
 596                                 &obj->e, &obj->char_a, &obj->char_b);
 597
 598                 obj->data.diskio = prepare_diskio_stat(dev_name(buf));
 599                 if (buf) free(buf);
 600         END OBJ(diskiograph_read, INFO_DISKIO)
 601                 char *buf = 0;
 602                 SIZE_DEFAULTS(graph);
 603                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
 604                                 &obj->e, &obj->char_a, &obj->char_b);
 605
 606                 obj->data.diskio = prepare_diskio_stat(dev_name(buf));
 607                 if (buf) free(buf);
 608         END OBJ(diskiograph_write, INFO_DISKIO)
 609                 char *buf = 0;
 610                 SIZE_DEFAULTS(graph);
 611                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
 612                                 &obj->e, &obj->char_a, &obj->char_b);
 613
 614                 obj->data.diskio = prepare_diskio_stat(dev_name(buf));
 615                 if (buf) free(buf);
 616 #endif /* X11 */
 617         END OBJ(color, 0)
 618 #ifdef X11
 619                 if (output_methods & TO_X) {
 620                         obj->data.l = arg ? get_x11_color(arg) : default_fg_color;
 621                         set_current_text_color(obj->data.l);
 622                 }
 623 #endif /* X11 */
 624 #ifdef NCURSES
 625                 if (output_methods & TO_NCURSES) {
 626                         obj->data.l = COLOR_WHITE;
 627                         if(arg) {
 628                                 if(strcasecmp(arg, "red") == 0) {
 629                                         obj->data.l = COLOR_RED;
 630                                 }else if(strcasecmp(arg, "green") == 0) {
 631                                         obj->data.l = COLOR_GREEN;
 632                                 }else if(strcasecmp(arg, "yellow") == 0) {
 633                                         obj->data.l = COLOR_YELLOW;
 634                                 }else if(strcasecmp(arg, "blue") == 0) {
 635                                         obj->data.l = COLOR_BLUE;
 636                                 }else if(strcasecmp(arg, "magenta") == 0) {
 637                                         obj->data.l = COLOR_MAGENTA;
 638                                 }else if(strcasecmp(arg, "cyan") == 0) {
 639                                         obj->data.l = COLOR_CYAN;
 640                                 }else if(strcasecmp(arg, "black") == 0) {
 641                                         obj->data.l = COLOR_BLACK;
 642                                 }
 643                         }
 644                         set_current_text_color(obj->data.l);
 645                         init_pair(obj->data.l, obj->data.l, COLOR_BLACK);
 646                 }
 647 #endif /* NCURSES */
 648         END OBJ(color0, 0)
 649                 obj->data.l = color0;
 650                 set_current_text_color(obj->data.l);
 651         END OBJ(color1, 0)
 652                 obj->data.l = color1;
 653                 set_current_text_color(obj->data.l);
 654         END OBJ(color2, 0)
 655                 obj->data.l = color2;
 656                 set_current_text_color(obj->data.l);
 657         END OBJ(color3, 0)
 658                 obj->data.l = color3;
 659                 set_current_text_color(obj->data.l);
 660         END OBJ(color4, 0)
 661                 obj->data.l = color4;
 662                 set_current_text_color(obj->data.l);
 663         END OBJ(color5, 0)
 664                 obj->data.l = color5;
 665                 set_current_text_color(obj->data.l);
 666         END OBJ(color6, 0)
 667                 obj->data.l = color6;
 668                 set_current_text_color(obj->data.l);
 669         END OBJ(color7, 0)
 670                 obj->data.l = color7;
 671                 set_current_text_color(obj->data.l);
 672         END OBJ(color8, 0)
 673                 obj->data.l = color8;
 674                 set_current_text_color(obj->data.l);
 675         END OBJ(color9, 0)
 676                 obj->data.l = color9;
 677                 set_current_text_color(obj->data.l);
 678 #ifdef X11
 679         END OBJ(font, 0)
 680                 obj->data.s = scan_font(arg);
 681 #endif /* X11 */
 682         END OBJ(conky_version, 0)
 683         END OBJ(conky_build_date, 0)
 684         END OBJ(conky_build_arch, 0)
 685         END OBJ(downspeed, INFO_NET)
 686                 if (arg) {
 687                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 688                 } else {
 689                         // default to DEFAULTNETDEV
 690                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 691                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 692                         free(buf);
 693                 }
 694         END OBJ(downspeedf, INFO_NET)
 695                 if (arg) {
 696                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
 697                 } else {
 698                         // default to DEFAULTNETDEV
 699                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
 700                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
 701                         free(buf);
 702                 }
 703 #ifdef X11
 704         END OBJ(downspeedgraph, INFO_NET)
 705                 char *buf = 0;
 706                 SIZE_DEFAULTS(graph);
 707                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
 708                                 &obj->e, &obj->char_a, &obj->char_b);
 709
 710                 // default to DEFAULTNETDEV
 711                 buf = strndup(buf ? buf : DEFAULTNETDEV, text_buffer_size);
 712                 obj->data.net = get_net_stat(buf, obj, free_at_crash);
 713                 free(buf);
 714 #endif /* X11 */
 715         END OBJ(else, 0)
 716                 obj_be_ifblock_else(ifblock_opaque, obj);
 717         END OBJ(endif, 0)
 718                 obj_be_ifblock_endif(ifblock_opaque, obj);
 719         END OBJ(eval, 0)
 720                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
 721         END OBJ(image, 0)
 722                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
 723         END OBJ(exec, 0)
 724                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
 725         END OBJ(execp, 0)
 726                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
 727         END OBJ(execbar, 0)
 728                 SIZE_DEFAULTS(bar);
 729                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
 730 #ifdef X11
 731         END OBJ(execgauge, 0)
 732                 SIZE_DEFAULTS(gauge);
 733                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
 734         END OBJ(execgraph, 0)
 735                 SIZE_DEFAULTS(graph);
 736                 obj->data.s = strndup(arg ? arg : "", text_buffer_size);
 737 #endif /* X11 */
 738         END OBJ(execibar, 0)
 739                 int n;
 740                 SIZE_DEFAULTS(bar);
 741
 742                 if (!arg || sscanf(arg, "%f %n", &obj->data.execi.interval, &n) <= 0) {
 743                         char buf[256];
 744
 745                         NORM_ERR("${execibar <interval> command}");
 746                         obj->type = OBJ_text;
 747                         snprintf(buf, 256, "${%s}", s);
 748                         obj->data.s = strndup(buf, text_buffer_size);
 749                 } else {
 750                         obj->data.execi.cmd = strndup(arg + n, text_buffer_size);
 751                 }
 752 #ifdef X11
 753         END OBJ(execigraph, 0)
 754                 int n;
 755                 SIZE_DEFAULTS(graph);
 756
 757                 if (!arg || sscanf(arg, "%f %n", &obj->data.execi.interval, &n) <= 0) {
 758                         char buf[256];
 759
 760                         NORM_ERR("${execigraph <interval> command}");
 761                         obj->type = OBJ_text;
 762                         snprintf(buf, 256, "${%s}", s);
 763                         obj->data.s = strndup(buf, text_buffer_size);
 764                 } else {
 765                         obj->data.execi.cmd = strndup(arg + n, text_buffer_size);
 766                 }
 767         END OBJ(execigauge, 0)
 768                 int n;
 769                 SIZE_DEFAULTS(gauge);
 770
 771                 if (!arg || sscanf(arg, "%f %n", &obj->data.execi.interval, &n) <= 0) {
 772                         char buf[256];
 773
 774                         NORM_ERR("${execigauge <interval> command}");
 775                         obj->type = OBJ_text;
 776                         snprintf(buf, 256, "${%s}", s);
 777                         obj->data.s = strndup(buf, text_buffer_size);
 778                 } else {
 779                         obj->data.execi.cmd = strndup(arg + n, text_buffer_size);
 780                 }
 781 #endif /* X11 */
 782         END OBJ(execi, 0)
 783                 int n;
 784
 785                 if (!arg || sscanf(arg, "%f %n", &obj->data.execi.interval, &n) <= 0) {
 786                         char buf[256];
 787
 788                         NORM_ERR("${execi <interval> command}");
 789                         obj->type = OBJ_text;
 790                         snprintf(buf, 256, "${%s}", s);
 791                         obj->data.s = strndup(buf, text_buffer_size);
 792                 } else {
 793                         obj->data.execi.cmd = strndup(arg + n, text_buffer_size);
 794                         obj->data.execi.buffer = malloc(text_buffer_size);
 795                 }
 796         END OBJ(execpi, 0)
 797                 int n;
 798
 799                 if (!arg || sscanf(arg, "%f %n", &obj->data.execi.interval, &n) <= 0) {
 800                         char buf[256];
 801
 802                         NORM_ERR("${execi <interval> command}");
 803                         obj->type = OBJ_text;
 804                         snprintf(buf, 256, "${%s}", s);
 805                         obj->data.s = strndup(buf, text_buffer_size);
 806                 } else {
 807                         obj->data.execi.cmd = strndup(arg + n, text_buffer_size);
 808                         obj->data.execi.buffer = malloc(text_buffer_size);
 809                 }
 810         END OBJ(texeci, 0)
 811                         int n;
 812
 813                         if (!arg || sscanf(arg, "%f %n", &obj->data.texeci.interval, &n) <= 0) {
 814                                 char buf[256];
 815
 816                                 NORM_ERR("${texeci <interval> command}");
 817                                 obj->type = OBJ_text;
 818                                 snprintf(buf, 256, "${%s}", s);
 819                                 obj->data.s = strndup(buf, text_buffer_size);
 820                         } else {
 821                                 obj->data.texeci.cmd = strndup(arg + n, text_buffer_size);
 822                                 obj->data.texeci.buffer = malloc(text_buffer_size);
 823                         }
 824                         obj->data.texeci.p_timed_thread = NULL;
 825         END OBJ(pre_exec, 0)
 826                 obj->type = OBJ_text;
 827                 if (arg) {
 828                         char buf[2048];
 829
 830                         do_read_exec(arg, buf, sizeof(buf));
 831                         obj->data.s = strndup(buf, text_buffer_size);
 832                 } else {
 833                         obj->data.s = strndup("", text_buffer_size);
 834                 }
 835         END OBJ(fs_bar, INFO_FS)
 836                 SIZE_DEFAULTS(bar);
 837                 arg = scan_bar(arg, &obj->data.fsbar.w, &obj->data.fsbar.h);
 838                 if (arg) {
 839                         while (isspace(*arg)) {
 840                                 arg++;
 841                         }
 842                         if (*arg == '\0') {
 843                                 arg = "/";
 844                         }
 845                 } else {
 846                         arg = "/";
 847                 }
 848                 obj->data.fsbar.fs = prepare_fs_stat(arg);
 849         END OBJ(fs_bar_free, INFO_FS)
 850                 SIZE_DEFAULTS(bar);
 851                 arg = scan_bar(arg, &obj->data.fsbar.w, &obj->data.fsbar.h);
 852                 if (arg) {
 853                         while (isspace(*arg)) {
 854                                 arg++;
 855                         }
 856                         if (*arg == '\0') {
 857                                 arg = "/";
 858                         }
 859                 } else {
 860                         arg = "/";
 861                 }
 862
 863                 obj->data.fsbar.fs = prepare_fs_stat(arg);
 864         END OBJ(fs_free, INFO_FS)
 865                 if (!arg) {
 866                         arg = "/";
 867                 }
 868                 obj->data.fs = prepare_fs_stat(arg);
 869         END OBJ(fs_used_perc, INFO_FS)
 870                 if (!arg) {
 871                         arg = "/";
 872                 }
 873                 obj->data.fs = prepare_fs_stat(arg);
 874         END OBJ(fs_free_perc, INFO_FS)
 875                 if (!arg) {
 876                         arg = "/";
 877                 }
 878                 obj->data.fs = prepare_fs_stat(arg);
 879         END OBJ(fs_size, INFO_FS)
 880                 if (!arg) {
 881                         arg = "/";
 882                 }
 883                 obj->data.fs = prepare_fs_stat(arg);
 884         END OBJ(fs_type, INFO_FS)
 885                 if (!arg) {
 886                         arg = "/";
 887                 }
 888                 obj->data.fs = prepare_fs_stat(arg);
 889         END OBJ(fs_used, INFO_FS)
 890                 if (!arg) {
 891                         arg = "/";
 892                 }
 893                 obj->data.fs = prepare_fs_stat(arg);
 894         END OBJ(hr, 0)
 895                 obj->data.i = arg ? atoi(arg) : 1;
 896         END OBJ(nameserver, INFO_DNS)
 897                 obj->data.i = arg ? atoi(arg) : 0;
 898         END OBJ(offset, 0)
 899                 obj->data.i = arg ? atoi(arg) : 1;
 900         END OBJ(voffset, 0)
 901                 obj->data.i = arg ? atoi(arg) : 1;
 902         END OBJ(goto, 0)
 903
 904                 if (!arg) {
 905                         NORM_ERR("goto needs arguments");
 906                         obj->type = OBJ_text;
 907                         obj->data.s = strndup("${goto}", text_buffer_size);
 908                         return NULL;
 909                 }
 910
 911                 obj->data.i = atoi(arg);
 912
 913         END OBJ(tab, 0)
 914                 int a = 10, b = 0;
 915
 916                 if (arg) {
 917                         if (sscanf(arg, "%d %d", &a, &b) != 2) {
 918                                 sscanf(arg, "%d", &b);
 919                         }
 920                 }
 921                 if (a <= 0) {
 922                         a = 1;
 923                 }
 924                 obj->data.pair.a = a;
 925                 obj->data.pair.b = b;
 926
 927 #ifdef __linux__
 928         END OBJ(i2c, INFO_SYSFS)
 929                 char buf1[64], buf2[64];
 930                 float factor, offset;
 931                 int n, found = 0;
 932
 933                 if (!arg) {
 934                         NORM_ERR("i2c needs arguments");
 935                         obj->type = OBJ_text;
 936                         // obj->data.s = strndup("${i2c}", text_buffer_size);
 937                         return NULL;
 938                 }
 939
 940 #define HWMON_RESET() {\
 941                 buf1[0] = 0; \
 942                 factor = 1.0; \
 943                 offset = 0.0; }
 944
 945                 if (sscanf(arg, "%63s %d %f %f", buf2, &n, &factor, &offset) == 4) found = 1; else HWMON_RESET();
 946                 if (!found && sscanf(arg, "%63s %63s %d %f %f", buf1, buf2, &n, &factor, &offset) == 5) found = 1; else if (!found) HWMON_RESET();
 947                 if (!found && sscanf(arg, "%63s %63s %d", buf1, buf2, &n) == 3) found = 1; else if (!found) HWMON_RESET();
 948                 if (!found && sscanf(arg, "%63s %d", buf2, &n) == 2) found = 1; else if (!found) HWMON_RESET();
 949
 950                 if (!found) {
 951                         NORM_ERR("i2c failed to parse arguments");
 952                         obj->type = OBJ_text;
 953                         return NULL;
 954                 }
 955                 DBGP("parsed i2c args: '%s' '%s' %d %f %f\n", buf1, buf2, n, factor, offset);
 956                 obj->data.sysfs.fd = open_i2c_sensor((*buf1) ? buf1 : 0, buf2, n,
 957                                 &obj->data.sysfs.arg, obj->data.sysfs.devtype);
 958                 strncpy(obj->data.sysfs.type, buf2, 63);
 959                 obj->data.sysfs.factor = factor;
 960                 obj->data.sysfs.offset = offset;
 961
 962         END OBJ(platform, INFO_SYSFS)
 963                 char buf1[64], buf2[64];
 964                 float factor, offset;
 965                 int n, found = 0;
 966
 967                 if (!arg) {
 968                         NORM_ERR("platform needs arguments");
 969                         obj->type = OBJ_text;
 970                         return NULL;
 971                 }
 972
 973                 if (sscanf(arg, "%63s %d %f %f", buf2, &n, &factor, &offset) == 4) found = 1; else HWMON_RESET();
 974                 if (!found && sscanf(arg, "%63s %63s %d %f %f", buf1, buf2, &n, &factor, &offset) == 5) found = 1; else if (!found) HWMON_RESET();
 975                 if (!found && sscanf(arg, "%63s %63s %d", buf1, buf2, &n) == 3) found = 1; else if (!found) HWMON_RESET();
 976                 if (!found && sscanf(arg, "%63s %d", buf2, &n) == 2) found = 1; else if (!found) HWMON_RESET();
 977
 978                 if (!found) {
 979                         NORM_ERR("platform failed to parse arguments");
 980                         obj->type = OBJ_text;
 981                         return NULL;
 982                 }
 983                 DBGP("parsed platform args: '%s' '%s' %d %f %f", buf1, buf2, n, factor, offset);
 984                 obj->data.sysfs.fd = open_platform_sensor((*buf1) ? buf1 : 0, buf2, n,
 985                                 &obj->data.sysfs.arg, obj->data.sysfs.devtype);
 986                 strncpy(obj->data.sysfs.type, buf2, 63);
 987                 obj->data.sysfs.factor = factor;
 988                 obj->data.sysfs.offset = offset;
 989
 990         END OBJ(hwmon, INFO_SYSFS)
 991                 char buf1[64], buf2[64];
 992                 float factor, offset;
 993                 int n, found = 0;
 994
 995                 if (!arg) {
 996                         NORM_ERR("hwmon needs argumanets");
 997                         obj->type = OBJ_text;
 998                         return NULL;
 999                 }
1000
1001                 if (sscanf(arg, "%63s %d %f %f", buf2, &n, &factor, &offset) == 4) found = 1; else HWMON_RESET();
1002                 if (!found && sscanf(arg, "%63s %63s %d %f %f", buf1, buf2, &n, &factor, &offset) == 5) found = 1; else if (!found) HWMON_RESET();
1003                 if (!found && sscanf(arg, "%63s %63s %d", buf1, buf2, &n) == 3) found = 1; else if (!found) HWMON_RESET();
1004                 if (!found && sscanf(arg, "%63s %d", buf2, &n) == 2) found = 1; else if (!found) HWMON_RESET();
1005
1006 #undef HWMON_RESET
1007
1008                 if (!found) {
1009                         NORM_ERR("hwmon failed to parse arguments");
1010                         obj->type = OBJ_text;
1011                         return NULL;
1012                 }
1013                 DBGP("parsed hwmon args: '%s' '%s' %d %f %f\n", buf1, buf2, n, factor, offset);
1014                 obj->data.sysfs.fd = open_hwmon_sensor((*buf1) ? buf1 : 0, buf2, n,
1015                                 &obj->data.sysfs.arg, obj->data.sysfs.devtype);
1016                 strncpy(obj->data.sysfs.type, buf2, 63);
1017                 obj->data.sysfs.factor = factor;
1018                 obj->data.sysfs.offset = offset;
1019
1020 #endif /* !__OpenBSD__ */
1021
1022         END
1023         /* we have four different types of top (top, top_mem, top_time and top_io). To
1024          * avoid having almost-same code four times, we have this special
1025          * handler. */
1026         if (strncmp(s, "top", 3) == EQUAL) {
1027                 if (!parse_top_args(s, arg, obj)) {
1028                         return NULL;
1029                 }
1030         } else OBJ(addr, INFO_NET)
1031                 if (arg) {
1032                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
1033                 } else {
1034                         // default to DEFAULTNETDEV
1035                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
1036                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
1037                         free(buf);
1038                 }
1039 #if defined(__linux__)
1040         END OBJ(addrs, INFO_NET)
1041                 if (arg) {
1042                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
1043                 } else {
1044                         // default to DEFAULTNETDEV
1045                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
1046                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
1047                         free(buf);
1048                 }
1049 #endif /* __linux__ */
1050         END OBJ(tail, 0)
1051                 init_tailhead("tail", arg, obj, free_at_crash);
1052         END OBJ(head, 0)
1053                 init_tailhead("head", arg, obj, free_at_crash);
1054         END OBJ(lines, 0)
1055                 if (arg) {
1056                         obj->data.s = strndup(arg, text_buffer_size);
1057                 }else{
1058                         CRIT_ERR(obj, free_at_crash, "lines needs a argument");
1059                 }
1060         END OBJ(words, 0)
1061                 if (arg) {
1062                         obj->data.s = strndup(arg, text_buffer_size);
1063                 }else{
1064                         CRIT_ERR(obj, free_at_crash, "words needs a argument");
1065                 }
1066         END OBJ(loadavg, INFO_LOADAVG)
1067                 int a = 1, b = 2, c = 3, r = 3;
1068
1069                 if (arg) {
1070                         r = sscanf(arg, "%d %d %d", &a, &b, &c);
1071                         if (r >= 3 && (c < 1 || c > 3)) {
1072                                 r--;
1073                         }
1074                         if (r >= 2 && (b < 1 || b > 3)) {
1075                                 r--, b = c;
1076                         }
1077                         if (r >= 1 && (a < 1 || a > 3)) {
1078                                 r--, a = b, b = c;
1079                         }
1080                 }
1081                 obj->data.loadavg[0] = (r >= 1) ? (unsigned char) a : 0;
1082                 obj->data.loadavg[1] = (r >= 2) ? (unsigned char) b : 0;
1083                 obj->data.loadavg[2] = (r >= 3) ? (unsigned char) c : 0;
1084         END OBJ_IF(if_empty, 0)
1085                 if (!arg) {
1086                         NORM_ERR("if_empty needs an argument");
1087                         obj->data.ifblock.s = 0;
1088                 } else {
1089                         obj->data.ifblock.s = strndup(arg, text_buffer_size);
1090                         obj->sub = malloc(sizeof(struct text_object));
1091                         extract_variable_text_internal(obj->sub,
1092                                                        obj->data.ifblock.s);
1093                 }
1094         END OBJ_IF(if_match, 0)
1095                 if (!arg) {
1096                         NORM_ERR("if_match needs arguments");
1097                         obj->data.ifblock.s = 0;
1098                 } else {
1099                         obj->data.ifblock.s = strndup(arg, text_buffer_size);
1100                         obj->sub = malloc(sizeof(struct text_object));
1101                         extract_variable_text_internal(obj->sub,
1102                                                        obj->data.ifblock.s);
1103                 }
1104         END OBJ_IF(if_existing, 0)
1105                 if (!arg) {
1106                         NORM_ERR("if_existing needs an argument or two");
1107                         obj->data.ifblock.s = NULL;
1108                         obj->data.ifblock.str = NULL;
1109                 } else {
1110                         char buf1[256], buf2[256];
1111                         int r = sscanf(arg, "%255s %255[^\n]", buf1, buf2);
1112
1113                         if (r == 1) {
1114                                 obj->data.ifblock.s = strndup(buf1, text_buffer_size);
1115                                 obj->data.ifblock.str = NULL;
1116                         } else {
1117                                 obj->data.ifblock.s = strndup(buf1, text_buffer_size);
1118                                 obj->data.ifblock.str = strndup(buf2, text_buffer_size);
1119                         }
1120                 }
1121                 DBGP("if_existing: '%s' '%s'", obj->data.ifblock.s, obj->data.ifblock.str);
1122         END OBJ_IF(if_mounted, 0)
1123                 if (!arg) {
1124                         NORM_ERR("if_mounted needs an argument");
1125                         obj->data.ifblock.s = 0;
1126                 } else {
1127                         obj->data.ifblock.s = strndup(arg, text_buffer_size);
1128                 }
1129 #ifdef __linux__
1130         END OBJ_IF(if_running, INFO_TOP)
1131                 if (arg) {
1132                         top_running = 1;
1133                         obj->data.ifblock.s = strndup(arg, text_buffer_size);
1134 #else
1135         END OBJ_IF(if_running, 0)
1136                 if (arg) {
1137                         char buf[256];
1138
1139                         snprintf(buf, 256, "pidof %s >/dev/null", arg);
1140                         obj->data.ifblock.s = strndup(buf, text_buffer_size);
1141 #endif
1142                 } else {
1143                         NORM_ERR("if_running needs an argument");
1144                         obj->data.ifblock.s = 0;
1145                 }
1146         END OBJ(kernel, 0)
1147         END OBJ(machine, 0)
1148         END OBJ(mails, 0)
1149                 float n1;
1150                 char mbox[256], dst[256];
1151
1152                 if (!arg) {
1153                         n1 = 9.5;
1154                         /* Kapil: Changed from MAIL_FILE to
1155                            current_mail_spool since the latter
1156                            is a copy of the former if undefined
1157                            but the latter should take precedence
1158                            if defined */
1159                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1160                 } else {
1161                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1162                                 n1 = 9.5;
1163                                 strncpy(mbox, arg, sizeof(mbox));
1164                         }
1165                 }
1166
1167                 variable_substitute(mbox, dst, sizeof(dst));
1168                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1169                 obj->data.local_mail.interval = n1;
1170         END OBJ(new_mails, 0)
1171                 float n1;
1172                 char mbox[256], dst[256];
1173
1174                 if (!arg) {
1175                         n1 = 9.5;
1176                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1177                 } else {
1178                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1179                                 n1 = 9.5;
1180                                 strncpy(mbox, arg, sizeof(mbox));
1181                         }
1182                 }
1183
1184                 variable_substitute(mbox, dst, sizeof(dst));
1185                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1186                 obj->data.local_mail.interval = n1;
1187         END OBJ(seen_mails, 0)
1188                 float n1;
1189                 char mbox[256], dst[256];
1190
1191                 if (!arg) {
1192                         n1 = 9.5;
1193                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1194                 } else {
1195                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1196                                 n1 = 9.5;
1197                                 strncpy(mbox, arg, sizeof(mbox));
1198                         }
1199                 }
1200
1201                 variable_substitute(mbox, dst, sizeof(dst));
1202                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1203                 obj->data.local_mail.interval = n1;
1204         END OBJ(unseen_mails, 0)
1205                 float n1;
1206                 char mbox[256], dst[256];
1207
1208                 if (!arg) {
1209                         n1 = 9.5;
1210                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1211                 } else {
1212                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1213                                 n1 = 9.5;
1214                                 strncpy(mbox, arg, sizeof(mbox));
1215                         }
1216                 }
1217
1218                 variable_substitute(mbox, dst, sizeof(dst));
1219                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1220                 obj->data.local_mail.interval = n1;
1221         END OBJ(flagged_mails, 0)
1222                 float n1;
1223                 char mbox[256], dst[256];
1224
1225                 if (!arg) {
1226                         n1 = 9.5;
1227                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1228                 } else {
1229                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1230                                 n1 = 9.5;
1231                                 strncpy(mbox, arg, sizeof(mbox));
1232                         }
1233                 }
1234
1235                 variable_substitute(mbox, dst, sizeof(dst));
1236                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1237                 obj->data.local_mail.interval = n1;
1238         END OBJ(unflagged_mails, 0)
1239                 float n1;
1240                 char mbox[256], dst[256];
1241
1242                 if (!arg) {
1243                         n1 = 9.5;
1244                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1245                 } else {
1246                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1247                                 n1 = 9.5;
1248                                 strncpy(mbox, arg, sizeof(mbox));
1249                         }
1250                 }
1251
1252                 variable_substitute(mbox, dst, sizeof(dst));
1253                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1254                 obj->data.local_mail.interval = n1;
1255         END OBJ(forwarded_mails, 0)
1256                 float n1;
1257                 char mbox[256], dst[256];
1258
1259                 if (!arg) {
1260                         n1 = 9.5;
1261                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1262                 } else {
1263                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1264                                 n1 = 9.5;
1265                                 strncpy(mbox, arg, sizeof(mbox));
1266                         }
1267                 }
1268
1269                 variable_substitute(mbox, dst, sizeof(dst));
1270                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1271                 obj->data.local_mail.interval = n1;
1272         END OBJ(unforwarded_mails, 0)
1273                 float n1;
1274                 char mbox[256], dst[256];
1275
1276                 if (!arg) {
1277                         n1 = 9.5;
1278                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1279                 } else {
1280                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1281                                 n1 = 9.5;
1282                                 strncpy(mbox, arg, sizeof(mbox));
1283                         }
1284                 }
1285
1286                 variable_substitute(mbox, dst, sizeof(dst));
1287                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1288                 obj->data.local_mail.interval = n1;
1289         END OBJ(replied_mails, 0)
1290                 float n1;
1291                 char mbox[256], dst[256];
1292
1293                 if (!arg) {
1294                         n1 = 9.5;
1295                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1296                 } else {
1297                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1298                                 n1 = 9.5;
1299                                 strncpy(mbox, arg, sizeof(mbox));
1300                         }
1301                 }
1302
1303                 variable_substitute(mbox, dst, sizeof(dst));
1304                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1305                 obj->data.local_mail.interval = n1;
1306         END OBJ(unreplied_mails, 0)
1307                 float n1;
1308                 char mbox[256], dst[256];
1309
1310                 if (!arg) {
1311                         n1 = 9.5;
1312                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1313                 } else {
1314                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1315                                 n1 = 9.5;
1316                                 strncpy(mbox, arg, sizeof(mbox));
1317                         }
1318                 }
1319
1320                 variable_substitute(mbox, dst, sizeof(dst));
1321                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1322                 obj->data.local_mail.interval = n1;
1323         END OBJ(draft_mails, 0)
1324                 float n1;
1325                 char mbox[256], dst[256];
1326
1327                 if (!arg) {
1328                         n1 = 9.5;
1329                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1330                 } else {
1331                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1332                                 n1 = 9.5;
1333                                 strncpy(mbox, arg, sizeof(mbox));
1334                         }
1335                 }
1336
1337                 variable_substitute(mbox, dst, sizeof(dst));
1338                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1339                 obj->data.local_mail.interval = n1;
1340         END OBJ(trashed_mails, 0)
1341                 float n1;
1342                 char mbox[256], dst[256];
1343
1344                 if (!arg) {
1345                         n1 = 9.5;
1346                         strncpy(mbox, current_mail_spool, sizeof(mbox));
1347                 } else {
1348                         if (sscanf(arg, "%s %f", mbox, &n1) != 2) {
1349                                 n1 = 9.5;
1350                                 strncpy(mbox, arg, sizeof(mbox));
1351                         }
1352                 }
1353
1354                 variable_substitute(mbox, dst, sizeof(dst));
1355                 obj->data.local_mail.mbox = strndup(dst, text_buffer_size);
1356                 obj->data.local_mail.interval = n1;
1357         END OBJ(mboxscan, 0)
1358                 obj->data.mboxscan.args = (char *) malloc(text_buffer_size);
1359                 obj->data.mboxscan.output = (char *) malloc(text_buffer_size);
1360                 /* if '1' (in mboxscan.c) then there was SIGUSR1, hmm */
1361                 obj->data.mboxscan.output[0] = 1;
1362                 strncpy(obj->data.mboxscan.args, arg, text_buffer_size);
1363         END OBJ(mem, INFO_MEM)
1364         END OBJ(memeasyfree, INFO_MEM)
1365         END OBJ(memfree, INFO_MEM)
1366         END OBJ(memmax, INFO_MEM)
1367         END OBJ(memperc, INFO_MEM)
1368 #ifdef X11
1369         END OBJ(memgauge, INFO_MEM)
1370                 SIZE_DEFAULTS(gauge);
1371                 scan_gauge(arg, &obj->data.pair.a, &obj->data.pair.b);
1372 #endif /* X11*/
1373         END OBJ(membar, INFO_MEM)
1374                 SIZE_DEFAULTS(bar);
1375                 scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
1376 #ifdef X11
1377         END OBJ(memgraph, INFO_MEM)
1378                 char *buf = 0;
1379                 SIZE_DEFAULTS(graph);
1380                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
1381                                 &obj->e, &obj->char_a, &obj->char_b);
1382
1383                 if (buf) free(buf);
1384 #endif /* X11*/
1385         END OBJ(mixer, INFO_MIXER)
1386                 obj->data.l = mixer_init(arg);
1387         END OBJ(mixerl, INFO_MIXER)
1388                 obj->data.l = mixer_init(arg);
1389         END OBJ(mixerr, INFO_MIXER)
1390                 obj->data.l = mixer_init(arg);
1391 #ifdef X11
1392         END OBJ(mixerbar, INFO_MIXER)
1393                 SIZE_DEFAULTS(bar);
1394                 scan_mixer_bar(arg, &obj->data.mixerbar.l, &obj->data.mixerbar.w,
1395                         &obj->data.mixerbar.h);
1396         END OBJ(mixerlbar, INFO_MIXER)
1397                 SIZE_DEFAULTS(bar);
1398                 scan_mixer_bar(arg, &obj->data.mixerbar.l, &obj->data.mixerbar.w,
1399                         &obj->data.mixerbar.h);
1400         END OBJ(mixerrbar, INFO_MIXER)
1401                 SIZE_DEFAULTS(bar);
1402                 scan_mixer_bar(arg, &obj->data.mixerbar.l, &obj->data.mixerbar.w,
1403                         &obj->data.mixerbar.h);
1404 #endif
1405         END OBJ_IF(if_mixer_mute, INFO_MIXER)
1406                 obj->data.ifblock.i = mixer_init(arg);
1407 #ifdef X11
1408         END OBJ(monitor, INFO_X11)
1409         END OBJ(monitor_number, INFO_X11)
1410         END OBJ(desktop, INFO_X11)
1411         END OBJ(desktop_number, INFO_X11)
1412         END OBJ(desktop_name, INFO_X11)
1413 #endif
1414         END OBJ(nodename, 0)
1415         END OBJ(processes, INFO_PROCS)
1416         END OBJ(running_processes, INFO_RUN_PROCS)
1417         END OBJ(shadecolor, 0)
1418 #ifdef X11
1419                 obj->data.l = arg ? get_x11_color(arg) : default_bg_color;
1420 #endif /* X11 */
1421         END OBJ(outlinecolor, 0)
1422 #ifdef X11
1423                 obj->data.l = arg ? get_x11_color(arg) : default_out_color;
1424 #endif /* X11 */
1425         END OBJ(stippled_hr, 0)
1426 #ifdef X11
1427                 int a = get_stippled_borders(), b = 1;
1428
1429                 if (arg) {
1430                         if (sscanf(arg, "%d %d", &a, &b) != 2) {
1431                                 sscanf(arg, "%d", &b);
1432                         }
1433                 }
1434                 if (a <= 0) {
1435                         a = 1;
1436                 }
1437                 obj->data.pair.a = a;
1438                 obj->data.pair.b = b;
1439 #endif /* X11 */
1440         END OBJ(swap, INFO_MEM)
1441         END OBJ(swapfree, INFO_MEM)
1442         END OBJ(swapmax, INFO_MEM)
1443         END OBJ(swapperc, INFO_MEM)
1444         END OBJ(swapbar, INFO_MEM)
1445                 SIZE_DEFAULTS(bar);
1446                 scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
1447         END OBJ(sysname, 0)
1448         END OBJ(time, 0)
1449                 obj->data.s = strndup(arg ? arg : "%F %T", text_buffer_size);
1450         END OBJ(utime, 0)
1451                 obj->data.s = strndup(arg ? arg : "%F %T", text_buffer_size);
1452         END OBJ(tztime, 0)
1453                 char buf1[256], buf2[256], *fmt, *tz;
1454
1455                 fmt = tz = NULL;
1456                 if (arg) {
1457                         int nArgs = sscanf(arg, "%255s %255[^\n]", buf1, buf2);
1458
1459                         switch (nArgs) {
1460                                 case 2:
1461                                         tz = buf1;
1462                                 case 1:
1463                                         fmt = buf2;
1464                         }
1465                 }
1466
1467                 obj->data.tztime.fmt = strndup(fmt ? fmt : "%F %T", text_buffer_size);
1468                 obj->data.tztime.tz = tz ? strndup(tz, text_buffer_size) : NULL;
1469 #ifdef HAVE_ICONV
1470         END OBJ(iconv_start, 0)
1471                 if (is_iconv_converting()) {
1472                         CRIT_ERR(obj, free_at_crash, "You must stop your last iconv conversion before "
1473                                 "starting another");
1474                 }
1475                 if (arg) {
1476                         char iconv_from[ICONV_CODEPAGE_LENGTH];
1477                         char iconv_to[ICONV_CODEPAGE_LENGTH];
1478
1479                         if (sscanf(arg, "%s %s", iconv_from, iconv_to) != 2) {
1480                                 CRIT_ERR(obj, free_at_crash, "Invalid arguments for iconv_start");
1481                         } else {
1482                                 iconv_t new_iconv;
1483
1484                                 new_iconv = iconv_open(iconv_to, iconv_from);
1485                                 if (new_iconv == (iconv_t) (-1)) {
1486                                         NORM_ERR("Can't convert from %s to %s.", iconv_from, iconv_to);
1487                                 } else {
1488                                         obj->a = register_iconv(&new_iconv);
1489                                         set_iconv_converting(1);
1490                                 }
1491                         }
1492                 } else {
1493                         CRIT_ERR(obj, free_at_crash, "Iconv requires arguments");
1494                 }
1495         END OBJ(iconv_stop, 0)
1496                 set_iconv_converting(0);
1497
1498 #endif
1499         END OBJ(totaldown, INFO_NET)
1500                 if (arg) {
1501                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
1502                 } else {
1503                         // default to DEFAULTNETDEV
1504                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
1505                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
1506                         free(buf);
1507                 }
1508         END OBJ(totalup, INFO_NET)
1509                 obj->data.net = get_net_stat(arg, obj, free_at_crash);
1510                 if (arg) {
1511                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
1512                 } else {
1513                         // default to DEFAULTNETDEV
1514                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
1515                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
1516                         free(buf);
1517                 }
1518         END OBJ(updates, 0)
1519         END OBJ_IF(if_updatenr, 0)
1520                 obj->data.ifblock.i = arg ? atoi(arg) : 0;
1521                 if(obj->data.ifblock.i == 0) CRIT_ERR(obj, free_at_crash, "if_updatenr needs a number above 0 as argument");
1522                 set_updatereset(obj->data.ifblock.i > get_updatereset() ? obj->data.ifblock.i : get_updatereset());
1523         END OBJ(alignr, 0)
1524                 obj->data.i = arg ? atoi(arg) : 0;
1525         END OBJ(alignc, 0)
1526                 obj->data.i = arg ? atoi(arg) : 0;
1527         END OBJ(upspeed, INFO_NET)
1528                 if (arg) {
1529                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
1530                 } else {
1531                         // default to DEFAULTNETDEV
1532                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
1533                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
1534                         free(buf);
1535                 }
1536         END OBJ(upspeedf, INFO_NET)
1537                 if (arg) {
1538                         obj->data.net = get_net_stat(arg, obj, free_at_crash);
1539                 } else {
1540                         // default to DEFAULTNETDEV
1541                         char *buf = strndup(DEFAULTNETDEV, text_buffer_size);
1542                         obj->data.net = get_net_stat(buf, obj, free_at_crash);
1543                         free(buf);
1544                 }
1545
1546 #ifdef X11
1547         END OBJ(upspeedgraph, INFO_NET)
1548                 char *buf = 0;
1549                 SIZE_DEFAULTS(graph);
1550                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
1551                                 &obj->e, &obj->char_a, &obj->char_b);
1552
1553                 // default to DEFAULTNETDEV
1554                 buf = strndup(buf ? buf : DEFAULTNETDEV, text_buffer_size);
1555                 obj->data.net = get_net_stat(buf, obj, free_at_crash);
1556                 free(buf);
1557 #endif
1558         END OBJ(uptime_short, INFO_UPTIME)
1559         END OBJ(uptime, INFO_UPTIME)
1560         END OBJ(user_names, INFO_USERS)
1561         END OBJ(user_times, INFO_USERS)
1562         END OBJ(user_terms, INFO_USERS)
1563         END OBJ(user_number, INFO_USERS)
1564 #if defined(__linux__)
1565         END OBJ(gw_iface, INFO_GW)
1566         END OBJ(gw_ip, INFO_GW)
1567 #endif /* !__linux__ */
1568 #ifndef __OpenBSD__
1569         END OBJ(adt746xcpu, 0)
1570         END OBJ(adt746xfan, 0)
1571 #endif /* !__OpenBSD__ */
1572 #if (defined(__FreeBSD__) || defined(__FreeBSD_kernel__) \
1573                 || defined(__OpenBSD__)) && (defined(i386) || defined(__i386__))
1574         END OBJ(apm_adapter, 0)
1575         END OBJ(apm_battery_life, 0)
1576         END OBJ(apm_battery_time, 0)
1577 #endif /* __FreeBSD__ */
1578         END OBJ(imap_unseen, 0)
1579                 if (arg) {
1580                         // proccss
1581                         obj->data.mail = parse_mail_args(IMAP_TYPE, arg);
1582                         obj->char_b = 0;
1583                 } else {
1584                         obj->char_b = 1;
1585                 }
1586         END OBJ(imap_messages, 0)
1587                 if (arg) {
1588                         // proccss
1589                         obj->data.mail = parse_mail_args(IMAP_TYPE, arg);
1590                         obj->char_b = 0;
1591                 } else {
1592                         obj->char_b = 1;
1593                 }
1594         END OBJ(pop3_unseen, 0)
1595                 if (arg) {
1596                         // proccss
1597                         obj->data.mail = parse_mail_args(POP3_TYPE, arg);
1598                         obj->char_b = 0;
1599                 } else {
1600                         obj->char_b = 1;
1601                 }
1602         END OBJ(pop3_used, 0)
1603                 if (arg) {
1604                         // proccss
1605                         obj->data.mail = parse_mail_args(POP3_TYPE, arg);
1606                         obj->char_b = 0;
1607                 } else {
1608                         obj->char_b = 1;
1609                 }
1610 #ifdef IBM
1611         END OBJ(smapi, 0)
1612                 if (arg)
1613                         obj->data.s = strndup(arg, text_buffer_size);
1614                 else
1615                         NORM_ERR("smapi needs an argument");
1616         END OBJ_IF(if_smapi_bat_installed, 0)
1617                 if (!arg) {
1618                         NORM_ERR("if_smapi_bat_installed needs an argument");
1619                         obj->data.ifblock.s = 0;
1620                 } else
1621                         obj->data.ifblock.s = strndup(arg, text_buffer_size);
1622         END OBJ(smapi_bat_perc, 0)
1623                 if (arg)
1624                         obj->data.s = strndup(arg, text_buffer_size);
1625                 else
1626                         NORM_ERR("smapi_bat_perc needs an argument");
1627         END OBJ(smapi_bat_temp, 0)
1628                 if (arg)
1629                         obj->data.s = strndup(arg, text_buffer_size);
1630                 else
1631                         NORM_ERR("smapi_bat_temp needs an argument");
1632         END OBJ(smapi_bat_power, 0)
1633                 if (arg)
1634                         obj->data.s = strndup(arg, text_buffer_size);
1635                 else
1636                         NORM_ERR("smapi_bat_power needs an argument");
1637 #ifdef X11
1638         END OBJ(smapi_bat_bar, 0)
1639                 SIZE_DEFAULTS(bar);
1640                 if(arg) {
1641                         int cnt;
1642                         if(sscanf(arg, "%i %n", &obj->data.i, &cnt) <= 0) {
1643                                 NORM_ERR("first argument to smapi_bat_bar must be an integer value");
1644                                 obj->data.i = -1;
1645                         } else {
1646                                 obj->b = 4;
1647                                 arg = scan_bar(arg + cnt, &obj->a, &obj->b);
1648                         }
1649                 } else
1650                         NORM_ERR("smapi_bat_bar needs an argument");
1651 #endif /* X11 */
1652 #endif /* IBM */
1653 #ifdef MPD
1654 #define mpd_set_maxlen(name) \
1655                 if (arg) { \
1656                         int i; \
1657                         sscanf(arg, "%d", &i); \
1658                         if (i > 0) \
1659                                 obj->data.i = i + 1; \
1660                         else \
1661                                 NORM_ERR(#name ": invalid length argument"); \
1662                 }
1663         END OBJ(mpd_artist, INFO_MPD)
1664                 mpd_set_maxlen(mpd_artist);
1665                 init_mpd();
1666         END OBJ(mpd_title, INFO_MPD)
1667                 mpd_set_maxlen(mpd_title);
1668                 init_mpd();
1669         END OBJ(mpd_random, INFO_MPD) init_mpd();
1670         END OBJ(mpd_repeat, INFO_MPD) init_mpd();
1671         END OBJ(mpd_elapsed, INFO_MPD) init_mpd();
1672         END OBJ(mpd_length, INFO_MPD) init_mpd();
1673         END OBJ(mpd_track, INFO_MPD)
1674                 mpd_set_maxlen(mpd_track);
1675                 init_mpd();
1676         END OBJ(mpd_name, INFO_MPD)
1677                 mpd_set_maxlen(mpd_name);
1678                 init_mpd();
1679         END OBJ(mpd_file, INFO_MPD)
1680                 mpd_set_maxlen(mpd_file);
1681                 init_mpd();
1682         END OBJ(mpd_percent, INFO_MPD) init_mpd();
1683         END OBJ(mpd_album, INFO_MPD)
1684                 mpd_set_maxlen(mpd_album);
1685                 init_mpd();
1686         END OBJ(mpd_vol, INFO_MPD) init_mpd();
1687         END OBJ(mpd_bitrate, INFO_MPD) init_mpd();
1688         END OBJ(mpd_status, INFO_MPD) init_mpd();
1689         END OBJ(mpd_bar, INFO_MPD)
1690                 SIZE_DEFAULTS(bar);
1691                 scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
1692                 init_mpd();
1693         END OBJ(mpd_smart, INFO_MPD)
1694                 mpd_set_maxlen(mpd_smart);
1695                 init_mpd();
1696         END OBJ_IF(if_mpd_playing, INFO_MPD)
1697                 init_mpd();
1698 #undef mpd_set_maxlen
1699 #endif /* MPD */
1700 #ifdef MOC
1701         END OBJ(moc_state, INFO_MOC)
1702         END OBJ(moc_file, INFO_MOC)
1703         END OBJ(moc_title, INFO_MOC)
1704         END OBJ(moc_artist, INFO_MOC)
1705         END OBJ(moc_song, INFO_MOC)
1706         END OBJ(moc_album, INFO_MOC)
1707         END OBJ(moc_totaltime, INFO_MOC)
1708         END OBJ(moc_timeleft, INFO_MOC)
1709         END OBJ(moc_curtime, INFO_MOC)
1710         END OBJ(moc_bitrate, INFO_MOC)
1711         END OBJ(moc_rate, INFO_MOC)
1712 #endif /* MOC */
1713 #ifdef XMMS2
1714         END OBJ(xmms2_artist, INFO_XMMS2)
1715         END OBJ(xmms2_album, INFO_XMMS2)
1716         END OBJ(xmms2_title, INFO_XMMS2)
1717         END OBJ(xmms2_genre, INFO_XMMS2)
1718         END OBJ(xmms2_comment, INFO_XMMS2)
1719         END OBJ(xmms2_url, INFO_XMMS2)
1720         END OBJ(xmms2_tracknr, INFO_XMMS2)
1721         END OBJ(xmms2_bitrate, INFO_XMMS2)
1722         END OBJ(xmms2_date, INFO_XMMS2)
1723         END OBJ(xmms2_id, INFO_XMMS2)
1724         END OBJ(xmms2_duration, INFO_XMMS2)
1725         END OBJ(xmms2_elapsed, INFO_XMMS2)
1726         END OBJ(xmms2_size, INFO_XMMS2)
1727         END OBJ(xmms2_status, INFO_XMMS2)
1728         END OBJ(xmms2_percent, INFO_XMMS2)
1729 #ifdef X11
1730         END OBJ(xmms2_bar, INFO_XMMS2)
1731                 SIZE_DEFAULTS(bar);
1732                 scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
1733 #endif /* X11 */
1734         END OBJ(xmms2_smart, INFO_XMMS2)
1735         END OBJ(xmms2_playlist, INFO_XMMS2)
1736         END OBJ(xmms2_timesplayed, INFO_XMMS2)
1737         END OBJ_IF(if_xmms2_connected, INFO_XMMS2)
1738 #endif
1739 #ifdef AUDACIOUS
1740         END OBJ(audacious_status, INFO_AUDACIOUS)
1741         END OBJ(audacious_title, INFO_AUDACIOUS)
1742                 if (arg) {
1743                         sscanf(arg, "%d", &info.audacious.max_title_len);
1744                         if (info.audacious.max_title_len > 0) {
1745                                 info.audacious.max_title_len++;
1746                         } else {
1747                                 CRIT_ERR(obj, free_at_crash, "audacious_title: invalid length argument");
1748                         }
1749                 }
1750         END OBJ(audacious_length, INFO_AUDACIOUS)
1751         END OBJ(audacious_length_seconds, INFO_AUDACIOUS)
1752         END OBJ(audacious_position, INFO_AUDACIOUS)
1753         END OBJ(audacious_position_seconds, INFO_AUDACIOUS)
1754         END OBJ(audacious_bitrate, INFO_AUDACIOUS)
1755         END OBJ(audacious_frequency, INFO_AUDACIOUS)
1756         END OBJ(audacious_channels, INFO_AUDACIOUS)
1757         END OBJ(audacious_filename, INFO_AUDACIOUS)
1758         END OBJ(audacious_playlist_length, INFO_AUDACIOUS)
1759         END OBJ(audacious_playlist_position, INFO_AUDACIOUS)
1760         END OBJ(audacious_main_volume, INFO_AUDACIOUS)
1761 #ifdef X11
1762         END OBJ(audacious_bar, INFO_AUDACIOUS)
1763                 SIZE_DEFAULTS(bar);
1764                 scan_bar(arg, &obj->a, &obj->b);
1765 #endif /* X11 */
1766 #endif
1767 #ifdef BMPX
1768         END OBJ(bmpx_title, INFO_BMPX)
1769                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
1770         END OBJ(bmpx_artist, INFO_BMPX)
1771                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
1772         END OBJ(bmpx_album, INFO_BMPX)
1773                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
1774         END OBJ(bmpx_track, INFO_BMPX)
1775                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
1776         END OBJ(bmpx_uri, INFO_BMPX)
1777                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
1778         END OBJ(bmpx_bitrate, INFO_BMPX)
1779                 memset(&(info.bmpx), 0, sizeof(struct bmpx_s));
1780 #endif
1781 #ifdef EVE
1782         END OBJ(eve, 0)
1783                 if(arg) {
1784                         int argc;
1785                         char *userid = (char *) malloc(20 * sizeof(char));
1786                         char *apikey = (char *) malloc(64 * sizeof(char));
1787                         char *charid = (char *) malloc(20 * sizeof(char));
1788
1789                         argc = sscanf(arg, "%20s %64s %20s", userid, apikey, charid);
1790                         obj->data.eve.charid = charid;
1791                         obj->data.eve.userid = userid;
1792                         obj->data.eve.apikey = apikey;
1793
1794                         init_eve();
1795                 } else {
1796                         CRIT_ERR(obj, free_at_crash, "eve needs arguments: <userid> <apikey> <characterid>");
1797                 }
1798 #endif
1799 #ifdef HAVE_CURL
1800         END OBJ(curl, 0)
1801                 if (arg) {
1802                         int argc;
1803                         float interval = 0;
1804                         char *uri = (char *) malloc(128 * sizeof(char));
1805
1806                         argc = sscanf(arg, "%127s %f", uri, &interval);
1807                         if (argc == 2) {
1808                                 obj->data.curl.uri = uri;
1809                                 obj->data.curl.interval = interval > 0 ? interval * 60 : 15*60;
1810                         } else {
1811                                 NORM_ERR("wrong number of arguments for $curl");
1812                         }
1813                 } else {
1814                         CRIT_ERR(obj, free_at_crash, "curl needs arguments: <uri> <interval in minutes>");
1815                 }
1816 #endif
1817 #ifdef RSS
1818         END OBJ(rss, 0)
1819                 if (arg) {
1820                         float interval = 0;
1821                         int argc, act_par = 0;
1822                         unsigned int nrspaces = 0;
1823                         char *uri = (char *) malloc(128 * sizeof(char));
1824                         char *action = (char *) malloc(64 * sizeof(char));
1825
1826                         argc = sscanf(arg, "%127s %f %63s %d %u", uri, &interval, action,
1827                                         &act_par, &nrspaces);
1828                         if (argc >= 3) {
1829                                 obj->data.rss.uri = uri;
1830                                 obj->data.rss.interval = interval > 0 ? interval * 60 : 15*60;
1831                                 obj->data.rss.action = action;
1832                                 obj->data.rss.act_par = act_par;
1833                                 obj->data.rss.nrspaces = nrspaces;
1834                         } else {
1835                                 NORM_ERR("wrong number of arguments for $rss");
1836                         }
1837                 } else {
1838                         CRIT_ERR(obj, free_at_crash, "rss needs arguments: <uri> <interval in minutes> <action> "
1839                                         "[act_par] [spaces in front]");
1840                 }
1841 #endif
1842 #ifdef WEATHER
1843         END OBJ(weather, 0)
1844                 if (arg) {
1845                         int argc;
1846                         float interval = 0;
1847                         char *locID = (char *) malloc(9 * sizeof(char));
1848                         char *uri = (char *) malloc(128 * sizeof(char));
1849                         char *data_type = (char *) malloc(32 * sizeof(char));
1850
1851                         argc = sscanf(arg, "%119s %8s %31s %f", uri, locID, data_type, &interval);
1852
1853                         if (argc >= 3) {
1854                                 if (process_weather_uri(uri, locID, 0)) {
1855                                         free(data_type);
1856                                         free(uri);
1857                                         free(locID);
1858                                         CRIT_ERR(obj, free_at_crash, \
1859                                                         "could not recognize the weather uri");
1860                                 }
1861
1862                                 obj->data.weather.uri = uri;
1863                                 obj->data.weather.data_type = data_type;
1864
1865                                 /* Limit the data retrieval interval to half hour min */
1866                                 if (interval < 30) {
1867                                         interval = 30;
1868                                 }
1869
1870                                 /* Convert to seconds */
1871                                 obj->data.weather.interval = interval * 60;
1872                                 free(locID);
1873
1874                                 DBGP("weather: fetching %s from %s every %d seconds", \
1875                                                 data_type, uri, obj->data.weather.interval);
1876                         } else {
1877                                 free(data_type);
1878                                 free(uri);
1879                                 free(locID);
1880                                 CRIT_ERR(obj, free_at_crash, "wrong number of arguments for $weather");
1881                         }
1882                 } else {
1883                         CRIT_ERR(obj, free_at_crash, "weather needs arguments: <uri> <locID> <data_type> [interval in minutes]");
1884                 }
1885 #endif
1886 #ifdef XOAP
1887         END OBJ(weather_forecast, 0)
1888                 if (arg) {
1889                         int argc;
1890                         unsigned int day;
1891                         float interval = 0;
1892                         char *locID = (char *) malloc(9 * sizeof(char));
1893                         char *uri = (char *) malloc(128 * sizeof(char));
1894                         char *data_type = (char *) malloc(32 * sizeof(char));
1895
1896                         argc = sscanf(arg, "%119s %8s %1u %31s %f", uri, locID, &day, data_type, &interval);
1897
1898                         if (argc >= 4) {
1899                                 if (process_weather_uri(uri, locID, 1)) {
1900                                         free(data_type);
1901                                         free(uri);
1902                                         free(locID);
1903                                         CRIT_ERR(obj, free_at_crash, \
1904                                                         "could not recognize the weather forecast uri");
1905                                 }
1906
1907                                 obj->data.weather_forecast.uri = uri;
1908                                 obj->data.weather_forecast.data_type = data_type;
1909
1910                                 /* Limit the day between 0 (today) and FORECAST_DAYS */
1911                                 if (day >= FORECAST_DAYS) {
1912                                         day = FORECAST_DAYS-1;
1913                                 }
1914                                 obj->data.weather_forecast.day = day;
1915
1916                                 /* Limit the data retrieval interval to 3 hours and an half */
1917                                 if (interval < 210) {
1918                                         interval = 210;
1919                                 }
1920
1921                                 /* Convert to seconds */
1922                                 obj->data.weather_forecast.interval = interval * 60;
1923                                 free(locID);
1924
1925                                 DBGP("weather_forecast: fetching %s for day %d from %s every %d seconds", \
1926                                          data_type, day, uri, obj->data.weather_forecast.interval);
1927                         } else {
1928                                 free(data_type);
1929                                 free(uri);
1930                                 free(locID);
1931                                 CRIT_ERR(obj, free_at_crash, "wrong number of arguments for $weather_forecast");
1932                         }
1933                 } else {
1934                         CRIT_ERR(obj, free_at_crash, "weather_forecast needs arguments: <uri> <locID> <day> <data_type> [interval in minutes]");
1935                 }
1936 #endif
1937 #ifdef HAVE_LUA
1938         END OBJ(lua, 0)
1939                 if (arg) {
1940                         obj->data.s = strndup(arg, text_buffer_size);
1941                 } else {
1942                         CRIT_ERR(obj, free_at_crash, "lua needs arguments: <function name> [function parameters]");
1943                 }
1944         END OBJ(lua_parse, 0)
1945                 if (arg) {
1946                         obj->data.s = strndup(arg, text_buffer_size);
1947                 } else {
1948                         CRIT_ERR(obj, free_at_crash, "lua_parse needs arguments: <function name> [function parameters]");
1949                 }
1950         END OBJ(lua_bar, 0)
1951                 SIZE_DEFAULTS(bar);
1952                 if (arg) {
1953                         arg = scan_bar(arg, &obj->a, &obj->b);
1954                         if(arg) {
1955                                 obj->data.s = strndup(arg, text_buffer_size);
1956                         } else {
1957                                 CRIT_ERR(obj, free_at_crash, "lua_bar needs arguments: <height>,<width> <function name> [function parameters]");
1958                         }
1959                 } else {
1960                         CRIT_ERR(obj, free_at_crash, "lua_bar needs arguments: <height>,<width> <function name> [function parameters]");
1961                 }
1962 #ifdef X11
1963         END OBJ(lua_graph, 0)
1964                 SIZE_DEFAULTS(graph);
1965                 if (arg) {
1966                         char *buf = 0;
1967                         buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
1968                                         &obj->e, &obj->char_a, &obj->char_b);
1969                         if (buf) {
1970                                 obj->data.s = buf;
1971                         } else {
1972                                 CRIT_ERR(obj, free_at_crash, "lua_graph needs arguments: <function name> [height],[width] [gradient colour 1] [gradient colour 2] [scale] [-t] [-l]");
1973                         }
1974                 } else {
1975                         CRIT_ERR(obj, free_at_crash, "lua_graph needs arguments: <function name> [height],[width] [gradient colour 1] [gradient colour 2] [scale] [-t] [-l]");
1976         }
1977         END OBJ(lua_gauge, 0)
1978                 SIZE_DEFAULTS(gauge);
1979                 if (arg) {
1980                         arg = scan_gauge(arg, &obj->a, &obj->b);
1981                         if (arg) {
1982                                 obj->data.s = strndup(arg, text_buffer_size);
1983                         } else {
1984                                 CRIT_ERR(obj, free_at_crash, "lua_gauge needs arguments: <height>,<width> <function name> [function parameters]");
1985                         }
1986                 } else {
1987                         CRIT_ERR(obj, free_at_crash, "lua_gauge needs arguments: <height>,<width> <function name> [function parameters]");
1988                 }
1989 #endif /* X11 */
1990 #endif /* HAVE_LUA */
1991 #ifdef HDDTEMP
1992         END OBJ(hddtemp, INFO_HDDTEMP)
1993                 if (arg)
1994                         obj->data.s = strndup(arg, text_buffer_size);
1995 #endif /* HDDTEMP */
1996 #ifdef TCP_PORT_MONITOR
1997         END OBJ(tcp_portmon, INFO_TCP_PORT_MONITOR)
1998                 tcp_portmon_init(arg, &obj->data.tcp_port_monitor);
1999 #endif /* TCP_PORT_MONITOR */
2000         END OBJ(entropy_avail, INFO_ENTROPY)
2001         END OBJ(entropy_perc, INFO_ENTROPY)
2002         END OBJ(entropy_poolsize, INFO_ENTROPY)
2003         END OBJ(entropy_bar, INFO_ENTROPY)
2004                 SIZE_DEFAULTS(bar);
2005                 scan_bar(arg, &obj->a, &obj->b);
2006         END OBJ(include, 0)
2007                 if(arg) {
2008                         struct conftree *leaf = conftree_add(currentconffile, arg);
2009                         if(leaf) {
2010                                 if (load_config_file(arg) == TRUE) {
2011                                         obj->sub = malloc(sizeof(struct text_object));
2012                                         currentconffile = leaf;
2013                                         extract_variable_text_internal(obj->sub, get_global_text());
2014                                         currentconffile = leaf->back;
2015                                 } else {
2016                                         NORM_ERR("Can't load configfile '%s'.", arg);
2017                                 }
2018                         } else {
2019                                 NORM_ERR("You are trying to load '%s' recursively, I'm only going to load it once to prevent an infinite loop.", arg);
2020                         }
2021                 } else {
2022                         CRIT_ERR(obj, free_at_crash, "include needs a argument");
2023                 }
2024         END OBJ(blink, 0)
2025                 if(arg) {
2026                         obj->sub = malloc(sizeof(struct text_object));
2027                         extract_variable_text_internal(obj->sub, arg);
2028                 }else{
2029                         CRIT_ERR(obj, free_at_crash, "blink needs a argument");
2030                 }
2031         END OBJ(to_bytes, 0)
2032                 if(arg) {
2033                         obj->sub = malloc(sizeof(struct text_object));
2034                         extract_variable_text_internal(obj->sub, arg);
2035                 }else{
2036                         CRIT_ERR(obj, free_at_crash, "to_bytes needs a argument");
2037                 }
2038         END OBJ(scroll, 0)
2039                 int n1 = 0, n2 = 0;
2040
2041                 obj->data.scroll.resetcolor = get_current_text_color();
2042                 obj->data.scroll.step = 1;
2043                 if (arg && sscanf(arg, "%u %n", &obj->data.scroll.show, &n1) > 0) {
2044                         sscanf(arg + n1, "%u %n", &obj->data.scroll.step, &n2);
2045                         if (*(arg + n1 + n2)) {
2046                                 n1 += n2;
2047                         } else {
2048                                 obj->data.scroll.step = 1;
2049                         }
2050                         obj->data.scroll.text = malloc(strlen(arg + n1) + obj->data.scroll.show + 1);
2051                         for(n2 = 0; (unsigned int) n2 < obj->data.scroll.show; n2++) {
2052                                 obj->data.scroll.text[n2] = ' ';
2053                         }
2054                         obj->data.scroll.text[n2] = 0;
2055                         strcat(obj->data.scroll.text, arg + n1);
2056                         obj->data.scroll.start = 0;
2057                         obj->sub = malloc(sizeof(struct text_object));
2058                         extract_variable_text_internal(obj->sub,
2059                                         obj->data.scroll.text);
2060                 } else {
2061                         CRIT_ERR(obj, free_at_crash, "scroll needs arguments: <length> [<step>] <text>");
2062                 }
2063         END OBJ(combine, 0)
2064                 if(arg) {
2065                         unsigned int i,j;
2066                         unsigned int indenting = 0;     //vars can be used as args for other vars
2067                         int startvar[2];
2068                         int endvar[2];
2069                         startvar[0] = endvar[0] = startvar[1] = endvar[1] = -1;
2070                         j=0;
2071                         for (i=0; arg[i] != 0 && j < 2; i++) {
2072                                 if(startvar[j] == -1) {
2073                                         if(arg[i] == '$') {
2074                                                 startvar[j] = i;
2075                                         }
2076                                 }else if(endvar[j] == -1) {
2077                                         if(arg[i] == '{') {
2078                                                 indenting++;
2079                                         }else if(arg[i] == '}') {
2080                                                 indenting--;
2081                                         }
2082                                         if (indenting == 0 && arg[i+1] < 48) {  //<48 has 0, $, and the most used chars not used in varnames but not { or }
2083                                                 endvar[j]=i+1;
2084                                                 j++;
2085                                         }
2086                                 }
2087                         }
2088                         if(startvar[0] >= 0 && endvar[0] >= 0 && startvar[1] >= 0 && endvar[1] >= 0) {
2089                                 obj->data.combine.left = malloc(endvar[0]-startvar[0] + 1);
2090                                 obj->data.combine.seperation = malloc(startvar[1] - endvar[0] + 1);
2091                                 obj->data.combine.right= malloc(endvar[1]-startvar[1] + 1);
2092
2093                                 strncpy(obj->data.combine.left, arg + startvar[0], endvar[0] - startvar[0]);
2094                                 obj->data.combine.left[endvar[0] - startvar[0]] = 0;
2095
2096                                 strncpy(obj->data.combine.seperation, arg + endvar[0], startvar[1] - endvar[0]);
2097                                 obj->data.combine.seperation[startvar[1] - endvar[0]] = 0;
2098
2099                                 strncpy(obj->data.combine.right, arg + startvar[1], endvar[1] - startvar[1]);
2100                                 obj->data.combine.right[endvar[1] - startvar[1]] = 0;
2101
2102                                 obj->sub = malloc(sizeof(struct text_object));
2103                                 extract_variable_text_internal(obj->sub, obj->data.combine.left);
2104                                 obj->sub->sub = malloc(sizeof(struct text_object));
2105                                 extract_variable_text_internal(obj->sub->sub, obj->data.combine.right);
2106                         } else {
2107                                 CRIT_ERR(obj, free_at_crash, "combine needs arguments: <text1> <text2>");
2108                         }
2109                 } else {
2110                         CRIT_ERR(obj, free_at_crash, "combine needs arguments: <text1> <text2>");
2111                 }
2112 #ifdef NVIDIA
2113         END OBJ(nvidia, 0)
2114                 if (!arg) {
2115                         CRIT_ERR(obj, free_at_crash, "nvidia needs an argument\n");
2116                 } else if (set_nvidia_type(&obj->data.nvidia, arg)) {
2117                         CRIT_ERR(obj, free_at_crash, "nvidia: invalid argument"
2118                                  " specified: '%s'\n", arg);
2119                 }
2120 #endif /* NVIDIA */
2121 #ifdef APCUPSD
2122                 init_apcupsd();
2123                 END OBJ(apcupsd, INFO_APCUPSD)
2124                         if (arg) {
2125                                 char host[64];
2126                                 int port;
2127                                 if (sscanf(arg, "%63s %d", host, &port) != 2) {
2128                                         CRIT_ERR(obj, free_at_crash, "apcupsd needs arguments: <host> <port>");
2129                                 } else {
2130                                         info.apcupsd.port = htons(port);
2131                                         strncpy(info.apcupsd.host, host, sizeof(info.apcupsd.host));
2132                                 }
2133                         } else {
2134                                 CRIT_ERR(obj, free_at_crash, "apcupsd needs arguments: <host> <port>");
2135                         }
2136                         END OBJ(apcupsd_name, INFO_APCUPSD)
2137                         END OBJ(apcupsd_model, INFO_APCUPSD)
2138                         END OBJ(apcupsd_upsmode, INFO_APCUPSD)
2139                         END OBJ(apcupsd_cable, INFO_APCUPSD)
2140                         END OBJ(apcupsd_status, INFO_APCUPSD)
2141                         END OBJ(apcupsd_linev, INFO_APCUPSD)
2142                         END OBJ(apcupsd_load, INFO_APCUPSD)
2143                         END OBJ(apcupsd_loadbar, INFO_APCUPSD)
2144                                 SIZE_DEFAULTS(bar);
2145                                 scan_bar(arg, &obj->a, &obj->b);
2146 #ifdef X11
2147                         END OBJ(apcupsd_loadgraph, INFO_APCUPSD)
2148                                 char* buf = 0;
2149                                 SIZE_DEFAULTS(graph);
2150                                 buf = scan_graph(arg, &obj->a, &obj->b, &obj->c, &obj->d,
2151                                                 &obj->e, &obj->char_a, &obj->char_b);
2152                                 if (buf) free(buf);
2153                         END OBJ(apcupsd_loadgauge, INFO_APCUPSD)
2154                                 SIZE_DEFAULTS(gauge);
2155                                 scan_gauge(arg, &obj->a, &obj->b);
2156 #endif /* X11 */
2157                         END OBJ(apcupsd_charge, INFO_APCUPSD)
2158                         END OBJ(apcupsd_timeleft, INFO_APCUPSD)
2159                         END OBJ(apcupsd_temp, INFO_APCUPSD)
2160                         END OBJ(apcupsd_lastxfer, INFO_APCUPSD)
2161 #endif /* APCUPSD */
2162         END {
2163                 char buf[256];
2164
2165                 NORM_ERR("unknown variable %s", s);
2166                 obj->type = OBJ_text;
2167                 snprintf(buf, 256, "${%s}", s);
2168                 obj->data.s = strndup(buf, text_buffer_size);
2169         }
2170 #undef OBJ
2171
2172         return obj;
2173 }
2174
2175 /*
2176  * - assumes that *string is '#'
2177  * - removes the part from '#' to the end of line ('\n' or '\0')
2178  * - it removes the '\n'
2179  * - copies the last char into 'char *last' argument, which should be a pointer
2180  *   to a char rather than a string.
2181  */
2182 static size_t remove_comment(char *string, char *last)
2183 {
2184         char *end = string;
2185         while (*end != '\0' && *end != '\n') {
2186                 ++end;
2187         }
2188         if (last) *last = *end;
2189         if (*end == '\n') end++;
2190         strfold(string, end - string);
2191         return end - string;
2192 }
2193
2194 size_t remove_comments(char *string)
2195 {
2196         char *curplace;
2197         size_t folded = 0;
2198         for (curplace = string; *curplace != 0; curplace++) {
2199                 if (*curplace == '\\' && *(curplace + 1) == '#') {
2200                         // strcpy can't be used for overlapping strings
2201                         strfold(curplace, 1);
2202                         folded += 1;
2203                 } else if (*curplace == '#') {
2204                         folded += remove_comment(curplace, 0);
2205                 }
2206         }
2207         return folded;
2208 }
2209
2210 int extract_variable_text_internal(struct text_object *retval, const char *const_p)
2211 {
2212         struct text_object *obj;
2213         char *p, *s, *orig_p;
2214         long line;
2215         void *ifblock_opaque = NULL;
2216         char *tmp_p;
2217         char *arg = 0;
2218         size_t len = 0;
2219
2220         p = strndup(const_p, max_user_text - 1);
2221         while (text_contains_templates(p)) {
2222                 char *tmp;
2223                 tmp = find_and_replace_templates(p);
2224                 free(p);
2225                 p = tmp;
2226         }
2227         s = orig_p = p;
2228
2229         if (strcmp(p, const_p)) {
2230                 DBGP("replaced all templates in text: input is\n'%s'\noutput is\n'%s'", const_p, p);
2231         } else {
2232                 DBGP("no templates to replace");
2233         }
2234
2235         memset(retval, 0, sizeof(struct text_object));
2236
2237         line = global_text_lines;
2238
2239         while (*p) {
2240                 if (*p == '\n') {
2241                         line++;
2242                 }
2243                 if (*p == '$') {
2244                         *p = '\0';
2245                         obj = create_plain_text(s);
2246                         if (obj != NULL) {
2247                                 append_object(retval, obj);
2248                         }
2249                         *p = '$';
2250                         p++;
2251                         s = p;
2252
2253                         if (*p != '$') {
2254                                 char buf[256];
2255                                 const char *var;
2256
2257                                 /* variable is either $foo or ${foo} */
2258                                 if (*p == '{') {
2259                                         unsigned int brl = 1, brr = 0;
2260
2261                                         p++;
2262                                         s = p;
2263                                         while (*p && brl != brr) {
2264                                                 if (*p == '{') {
2265                                                         brl++;
2266                                                 }
2267                                                 if (*p == '}') {
2268                                                         brr++;
2269                                                 }
2270                                                 p++;
2271                                         }
2272                                         p--;
2273                                 } else {
2274                                         s = p;
2275                                         if (*p == '#') {
2276                                                 p++;
2277                                         }
2278                                         while (*p && (isalnum((int) *p) || *p == '_')) {
2279                                                 p++;
2280                                         }
2281                                 }
2282
2283                                 /* copy variable to buffer */
2284                                 len = (p - s > 255) ? 255 : (p - s);
2285                                 strncpy(buf, s, len);
2286                                 buf[len] = '\0';
2287
2288                                 if (*p == '}') {
2289                                         p++;
2290                                 }
2291                                 s = p;
2292
2293                                 /* search for variable in environment */
2294
2295                                 var = getenv(buf);
2296                                 if (var) {
2297                                         obj = create_plain_text(var);
2298                                         if (obj) {
2299                                                 append_object(retval, obj);
2300                                         }
2301                                         continue;
2302                                 }
2303
2304                                 /* if variable wasn't found in environment, use some special */
2305
2306                                 arg = 0;
2307
2308                                 /* split arg */
2309                                 if (strchr(buf, ' ')) {
2310                                         arg = strchr(buf, ' ');
2311                                         *arg = '\0';
2312                                         arg++;
2313                                         while (isspace((int) *arg)) {
2314                                                 arg++;
2315                                         }
2316                                         if (!*arg) {
2317                                                 arg = 0;
2318                                         }
2319                                 }
2320
2321                                 /* lowercase variable name */
2322                                 tmp_p = buf;
2323                                 while (*tmp_p) {
2324                                         *tmp_p = tolower(*tmp_p);
2325                                         tmp_p++;
2326                                 }
2327
2328                                 obj = construct_text_object(buf, arg,
2329                                                 line, &ifblock_opaque, orig_p);
2330                                 if (obj != NULL) {
2331                                         append_object(retval, obj);
2332                                 }
2333                                 continue;
2334                         } else {
2335                                 obj = create_plain_text("$");
2336                                 s = p + 1;
2337                                 if (obj != NULL) {
2338                                         append_object(retval, obj);
2339                                 }
2340                         }
2341                 } else if (*p == '\\' && *(p+1) == '#') {
2342                         strfold(p, 1);
2343                 } else if (*p == '#') {
2344                         char c;
2345                         if (remove_comment(p, &c) && p > orig_p && c == '\n') {
2346                                 /* if remove_comment removed a newline, we need to 'back up' with p */
2347                                 p--;
2348                         }
2349                 }
2350                 p++;
2351         }
2352         obj = create_plain_text(s);
2353         if (obj != NULL) {
2354                 append_object(retval, obj);
2355         }
2356
2357         if (!ifblock_stack_empty(&ifblock_opaque)) {
2358                 NORM_ERR("one or more $endif's are missing");
2359         }
2360
2361         free(orig_p);
2362         return 0;
2363 }
2364
2365 /*
2366  * Frees the list of text objects root points to.  When internal = 1, it won't
2367  * free global objects.
2368  */
2369 void free_text_objects(struct text_object *root, int internal)
2370 {
2371         struct text_object *obj;
2372
2373         if (!root->prev) {
2374                 return;
2375         }
2376
2377 #define data obj->data
2378         for (obj = root->prev; obj; obj = root->prev) {
2379                 root->prev = obj->prev;
2380                 switch (obj->type) {
2381 #ifndef __OpenBSD__
2382                         case OBJ_acpitemp:
2383                                 close(data.i);
2384                                 break;
2385 #endif /* !__OpenBSD__ */
2386 #ifdef __linux__
2387                         case OBJ_i2c:
2388                         case OBJ_platform:
2389                         case OBJ_hwmon:
2390                                 close(data.sysfs.fd);
2391                                 break;
2392 #endif /* __linux__ */
2393                         case OBJ_read_tcp:
2394                                 free(data.read_tcp.host);
2395                                 break;
2396                         case OBJ_time:
2397                         case OBJ_utime:
2398                                 free(data.s);
2399                                 break;
2400                         case OBJ_tztime:
2401                                 free(data.tztime.tz);
2402                                 free(data.tztime.fmt);
2403                                 break;
2404                         case OBJ_mboxscan:
2405                                 free(data.mboxscan.args);
2406                                 free(data.mboxscan.output);
2407                                 break;
2408                         case OBJ_mails:
2409                         case OBJ_new_mails:
2410                         case OBJ_seen_mails:
2411                         case OBJ_unseen_mails:
2412                         case OBJ_flagged_mails:
2413                         case OBJ_unflagged_mails:
2414                         case OBJ_forwarded_mails:
2415                         case OBJ_unforwarded_mails:
2416                         case OBJ_replied_mails:
2417                         case OBJ_unreplied_mails:
2418                         case OBJ_draft_mails:
2419                         case OBJ_trashed_mails:
2420                                 free(data.local_mail.mbox);
2421                                 break;
2422                         case OBJ_imap_unseen:
2423                                 if (!obj->char_b) {
2424                                         free(data.mail);
2425                                 }
2426                                 break;
2427                         case OBJ_imap_messages:
2428                                 if (!obj->char_b) {
2429                                         free(data.mail);
2430                                 }
2431                                 break;
2432                         case OBJ_pop3_unseen:
2433                                 if (!obj->char_b) {
2434                                         free(data.mail);
2435                                 }
2436                                 break;
2437                         case OBJ_pop3_used:
2438                                 if (!obj->char_b) {
2439                                         free(data.mail);
2440                                 }
2441                                 break;
2442                         case OBJ_if_empty:
2443                         case OBJ_if_match:
2444                                 free_text_objects(obj->sub, 1);
2445                                 free(obj->sub);
2446                                 /* fall through */
2447                         case OBJ_if_existing:
2448                         case OBJ_if_mounted:
2449                         case OBJ_if_running:
2450                                 free(data.ifblock.s);
2451                                 free(data.ifblock.str);
2452                                 break;
2453                         case OBJ_head:
2454                         case OBJ_tail:
2455                                 free(data.headtail.logfile);
2456                                 if(data.headtail.buffer) {
2457                                         free(data.headtail.buffer);
2458                                 }
2459                                 break;
2460                         case OBJ_text:
2461                         case OBJ_font:
2462                         case OBJ_image:
2463                         case OBJ_eval:
2464                         case OBJ_exec:
2465                         case OBJ_execbar:
2466 #ifdef X11
2467                         case OBJ_execgauge:
2468                         case OBJ_execgraph:
2469 #endif
2470                         case OBJ_execp:
2471                                 free(data.s);
2472                                 break;
2473 #ifdef HAVE_ICONV
2474                         case OBJ_iconv_start:
2475                                 free_iconv();
2476                                 break;
2477 #endif
2478 #ifdef __linux__
2479                         case OBJ_disk_protect:
2480                                 free(data.s);
2481                                 break;
2482                         case OBJ_if_gw:
2483                                 free(data.ifblock.s);
2484                                 free(data.ifblock.str);
2485                         case OBJ_gw_iface:
2486                         case OBJ_gw_ip:
2487                                 if (info.gw_info.iface) {
2488                                         free(info.gw_info.iface);
2489                                         info.gw_info.iface = 0;
2490                                 }
2491                                 if (info.gw_info.ip) {
2492                                         free(info.gw_info.ip);
2493                                         info.gw_info.ip = 0;
2494                                 }
2495                                 break;
2496                         case OBJ_ioscheduler:
2497                                 if(data.s)
2498                                         free(data.s);
2499                                 break;
2500 #endif
2501 #if (defined(__FreeBSD__) || defined(__linux__))
2502                         case OBJ_if_up:
2503                                 free(data.ifblock.s);
2504                                 free(data.ifblock.str);
2505                                 break;
2506 #endif
2507 #ifdef XMMS2
2508                         case OBJ_xmms2_artist:
2509                                 if (info.xmms2.artist) {
2510                                         free(info.xmms2.artist);
2511                                         info.xmms2.artist = 0;
2512                                 }
2513                                 break;
2514                         case OBJ_xmms2_album:
2515                                 if (info.xmms2.album) {
2516                                         free(info.xmms2.album);
2517                                         info.xmms2.album = 0;
2518                                 }
2519                                 break;
2520                         case OBJ_xmms2_title:
2521                                 if (info.xmms2.title) {
2522                                         free(info.xmms2.title);
2523                                         info.xmms2.title = 0;
2524                                 }
2525                                 break;
2526                         case OBJ_xmms2_genre:
2527                                 if (info.xmms2.genre) {
2528                                         free(info.xmms2.genre);
2529                                         info.xmms2.genre = 0;
2530                                 }
2531                                 break;
2532                         case OBJ_xmms2_comment:
2533                                 if (info.xmms2.comment) {
2534                                         free(info.xmms2.comment);
2535                                         info.xmms2.comment = 0;
2536                                 }
2537                                 break;
2538                         case OBJ_xmms2_url:
2539                                 if (info.xmms2.url) {
2540                                         free(info.xmms2.url);
2541                                         info.xmms2.url = 0;
2542                                 }
2543                                 break;
2544                         case OBJ_xmms2_date:
2545                                 if (info.xmms2.date) {
2546                                         free(info.xmms2.date);
2547                                         info.xmms2.date = 0;
2548                                 }
2549                                 break;
2550                         case OBJ_xmms2_status:
2551                                 if (info.xmms2.status) {
2552                                         free(info.xmms2.status);
2553                                         info.xmms2.status = 0;
2554                                 }
2555                                 break;
2556                         case OBJ_xmms2_playlist:
2557                                 if (info.xmms2.playlist) {
2558                                         free(info.xmms2.playlist);
2559                                         info.xmms2.playlist = 0;
2560                                 }
2561                                 break;
2562                         case OBJ_xmms2_smart:
2563                                 if (info.xmms2.artist) {
2564                                         free(info.xmms2.artist);
2565                                         info.xmms2.artist = 0;
2566                                 }
2567                                 if (info.xmms2.title) {
2568                                         free(info.xmms2.title);
2569                                         info.xmms2.title = 0;
2570                                 }
2571                                 if (info.xmms2.url) {
2572                                         free(info.xmms2.url);
2573                                         info.xmms2.url = 0;
2574                                 }
2575                                 break;
2576 #endif
2577 #ifdef BMPX
2578                         case OBJ_bmpx_title:
2579                         case OBJ_bmpx_artist:
2580                         case OBJ_bmpx_album:
2581                         case OBJ_bmpx_track:
2582                         case OBJ_bmpx_uri:
2583                         case OBJ_bmpx_bitrate:
2584                                 break;
2585 #endif
2586 #ifdef EVE
2587                         case OBJ_eve:
2588                                 break;
2589 #endif
2590 #ifdef HAVE_CURL
2591                         case OBJ_curl:
2592                                 free(data.curl.uri);
2593                                 break;
2594 #endif
2595 #ifdef RSS
2596                         case OBJ_rss:
2597                                 free(data.rss.uri);
2598                                 free(data.rss.action);
2599                                 break;
2600 #endif
2601 #ifdef WEATHER
2602                         case OBJ_weather:
2603                                 free(data.weather.uri);
2604                                 free(data.weather.data_type);
2605                                 break;
2606 #endif
2607 #ifdef XOAP
2608                         case OBJ_weather_forecast:
2609                                 free(data.weather_forecast.uri);
2610                                 free(data.weather_forecast.data_type);
2611                                 break;
2612 #endif
2613 #ifdef HAVE_LUA
2614                         case OBJ_lua:
2615                         case OBJ_lua_parse:
2616                         case OBJ_lua_bar:
2617 #ifdef X11
2618                         case OBJ_lua_graph:
2619                         case OBJ_lua_gauge:
2620 #endif /* X11 */
2621                                 free(data.s);
2622                                 break;
2623 #endif /* HAVE_LUA */
2624                         case OBJ_pre_exec:
2625                                 break;
2626 #ifndef __OpenBSD__
2627                         case OBJ_battery:
2628                                 free(data.s);
2629                                 break;
2630                         case OBJ_battery_short:
2631                                 free(data.s);
2632                                 break;
2633                         case OBJ_battery_time:
2634                                 free(data.s);
2635                                 break;
2636 #endif /* !__OpenBSD__ */
2637                         case OBJ_execpi:
2638                         case OBJ_execi:
2639                         case OBJ_execibar:
2640 #ifdef X11
2641                         case OBJ_execigraph:
2642                         case OBJ_execigauge:
2643 #endif /* X11 */
2644                                 free(data.execi.cmd);
2645                                 free(data.execi.buffer);
2646                                 break;
2647                         case OBJ_texeci:
2648                                 if (data.texeci.p_timed_thread) timed_thread_destroy(data.texeci.p_timed_thread, &data.texeci.p_timed_thread);
2649                                 free(data.texeci.cmd);
2650                                 free(data.texeci.buffer);
2651                                 break;
2652                         case OBJ_nameserver:
2653                                 free_dns_data();
2654                                 break;
2655                         case OBJ_top:
2656                         case OBJ_top_mem:
2657                         case OBJ_top_time:
2658 #ifdef IOSTATS
2659                         case OBJ_top_io:
2660 #endif
2661                                 if (info.first_process && !internal) {
2662                                         free_all_processes();
2663                                         info.first_process = NULL;
2664                                 }
2665                                 if (data.top.s) free(data.top.s);
2666                                 break;
2667 #ifdef HDDTEMP
2668                         case OBJ_hddtemp:
2669                                 if (data.s) {
2670                                         free(data.s);
2671                                         data.s = NULL;
2672                                 }
2673                                 free_hddtemp();
2674                                 break;
2675 #endif /* HDDTEMP */
2676                         case OBJ_entropy_avail:
2677                         case OBJ_entropy_perc:
2678                         case OBJ_entropy_poolsize:
2679                         case OBJ_entropy_bar:
2680                                 break;
2681                         case OBJ_user_names:
2682                                 if (info.users.names) {
2683                                         free(info.users.names);
2684                                         info.users.names = 0;
2685                                 }
2686                                 break;
2687                         case OBJ_user_terms:
2688                                 if (info.users.terms) {
2689                                         free(info.users.terms);
2690                                         info.users.terms = 0;
2691                                 }
2692                                 break;
2693                         case OBJ_user_times:
2694                                 if (info.users.times) {
2695                                         free(info.users.times);
2696                                         info.users.times = 0;
2697                                 }
2698                                 break;
2699 #ifdef IBM
2700                         case OBJ_smapi:
2701                         case OBJ_smapi_bat_perc:
2702                         case OBJ_smapi_bat_temp:
2703                         case OBJ_smapi_bat_power:
2704                                 free(data.s);
2705                                 break;
2706                         case OBJ_if_smapi_bat_installed:
2707                                 free(data.ifblock.s);
2708                                 free(data.ifblock.str);
2709                                 break;
2710 #endif /* IBM */
2711 #ifdef NVIDIA
2712                         case OBJ_nvidia:
2713                                 break;
2714 #endif /* NVIDIA */
2715 #ifdef MPD
2716                         case OBJ_mpd_title:
2717                         case OBJ_mpd_artist:
2718                         case OBJ_mpd_album:
2719                         case OBJ_mpd_random:
2720                         case OBJ_mpd_repeat:
2721                         case OBJ_mpd_vol:
2722                         case OBJ_mpd_bitrate:
2723                         case OBJ_mpd_status:
2724                         case OBJ_mpd_bar:
2725                         case OBJ_mpd_elapsed:
2726                         case OBJ_mpd_length:
2727                         case OBJ_mpd_track:
2728                         case OBJ_mpd_name:
2729                         case OBJ_mpd_file:
2730                         case OBJ_mpd_percent:
2731                         case OBJ_mpd_smart:
2732                         case OBJ_if_mpd_playing:
2733                                 free_mpd();
2734                                 break;
2735 #endif /* MPD */
2736 #ifdef MOC
2737                         case OBJ_moc_state:
2738                         case OBJ_moc_file:
2739                         case OBJ_moc_title:
2740                         case OBJ_moc_artist:
2741                         case OBJ_moc_song:
2742                         case OBJ_moc_album:
2743                         case OBJ_moc_totaltime:
2744                         case OBJ_moc_timeleft:
2745                         case OBJ_moc_curtime:
2746                         case OBJ_moc_bitrate:
2747                         case OBJ_moc_rate:
2748                                 free_moc();
2749                                 break;
2750 #endif /* MOC */
2751                         case OBJ_include:
2752                         case OBJ_blink:
2753                         case OBJ_to_bytes:
2754                                 if(obj->sub) {
2755                                         free_text_objects(obj->sub, 1);
2756                                         free(obj->sub);
2757                                 }
2758                                 break;
2759                         case OBJ_scroll:
2760                                 free(data.scroll.text);
2761                                 free_text_objects(obj->sub, 1);
2762                                 free(obj->sub);
2763                                 break;
2764                         case OBJ_combine:
2765                                 free(data.combine.left);
2766                                 free(data.combine.seperation);
2767                                 free(data.combine.right);
2768                                 free_text_objects(obj->sub, 1);
2769                                 free(obj->sub);
2770                                 break;
2771 #ifdef APCUPSD
2772                         case OBJ_apcupsd:
2773                         case OBJ_apcupsd_name:
2774                         case OBJ_apcupsd_model:
2775                         case OBJ_apcupsd_upsmode:
2776                         case OBJ_apcupsd_cable:
2777                         case OBJ_apcupsd_status:
2778                         case OBJ_apcupsd_linev:
2779                         case OBJ_apcupsd_load:
2780                         case OBJ_apcupsd_loadbar:
2781 #ifdef X11
2782                         case OBJ_apcupsd_loadgraph:
2783                         case OBJ_apcupsd_loadgauge:
2784 #endif /* X11 */
2785                         case OBJ_apcupsd_charge:
2786                         case OBJ_apcupsd_timeleft:
2787                         case OBJ_apcupsd_temp:
2788                         case OBJ_apcupsd_lastxfer:
2789                                 break;
2790 #endif /* APCUPSD */
2791 #ifdef X11
2792                         case OBJ_desktop:
2793                         case OBJ_desktop_number:
2794                         case OBJ_desktop_name:
2795                                 if(info.x11.desktop.name) {
2796                                   free(info.x11.desktop.name);
2797                                   info.x11.desktop.name = NULL;
2798                                 }
2799                                 if(info.x11.desktop.all_names) {
2800                                   free(info.x11.desktop.all_names);
2801                                   info.x11.desktop.all_names = NULL;
2802                                 }
2803                                 break;
2804 #endif /* X11 */
2805                 }
2806                 free(obj);
2807         }
2808 #undef data
2809 }
2810