Llewellyn/conky
1
0
Fork 0
mirror of https://github.com/Llewellynvdm/conky.git synced 2024-12-28 13:00:45 +00:00
Code Issues Releases Activity
2f8bfbd807
conky/src/conky.cc
Brenden Matthews 9adaba449a
Run clang-format.
2021-02-01 17:30:17 -06:00

2941 lines
88 KiB
C++
Raw Blame History

/*
*
* Conky, a system monitor, based on torsmo
*
* Any original torsmo code is licensed under the BSD license
*
* All code written since the fork of torsmo is licensed under the GPL
*
* Please see COPYING for details
*
* Copyright (c) 2004, Hannu Saransaari and Lauri Hakkarainen
* Copyright (c) 2005-2019 Brenden Matthews, Philip Kovacs, et. al.
* (see AUTHORS)
* All rights reserved.
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
*/
#include "conky.h"
#include <algorithm>
#include <cerrno>
#include <climits>
#include <clocale>
#include <cmath>
#include <cstdarg>
#include <ctime>
#include <iostream>
#include <memory>
#include <sstream>
#include <string>
#include <vector>
#include "common.h"
#include "config.h"
#include "text_object.h"
#ifdef HAVE_DIRENT_H
#include <dirent.h>
#endif /* HAVE_DIRENT_H */
#include <sys/param.h>
#include <sys/time.h>
#ifdef HAVE_SYS_INOTIFY_H
#pragma clang diagnostic push
#pragma clang diagnostic ignored "-Wc99-extensions"
#include <sys/inotify.h>
#pragma clang diagnostic pop
#endif /* HAVE_SYS_INOTIFY_H */
#ifdef BUILD_X11
#pragma GCC diagnostic push
#pragma GCC diagnostic ignored "-Wvariadic-macros"
#include <X11/Xutil.h>
#pragma GCC diagnostic pop
#include "x11.h"
#ifdef BUILD_XDAMAGE
#include <X11/extensions/Xdamage.h>
#endif
#ifdef BUILD_IMLIB2
#include "imlib2.h"
#endif /* BUILD_IMLIB2 */
#endif /* BUILD_X11 */
#ifdef BUILD_NCURSES
#include <ncurses.h>
#endif
#include <fcntl.h>
#include <getopt.h>
#include <netdb.h>
#include <netinet/in.h>
#include <sys/stat.h>
#include <sys/types.h>
#if defined BUILD_RSS
#include <libxml/parser.h>
#endif
#ifdef BUILD_CURL
#include <curl/curl.h>
#endif
/* local headers */
#include "colours.h"
#include "core.h"
#include "diskio.h"
#include "exec.h"
#ifdef BUILD_X11
#include "fonts.h"
#endif
#include "fs.h"
#ifdef BUILD_ICONV
#include "iconv_tools.h"
#endif
#include "llua.h"
#include "logging.h"
#include "mail.h"
#include "nc.h"
#include "net_stat.h"
#include "specials.h"
#include "temphelper.h"
#include "template.h"
#include "timeinfo.h"
#include "top.h"
#ifdef BUILD_MYSQL
#include "mysql.h"
#endif /* BUILD_MYSQL */
#ifdef BUILD_NVIDIA
#include "nvidia.h"
#endif
#ifdef BUILD_CURL
#include "ccurl_thread.h"
#endif /* BUILD_CURL */
#ifdef BUILD_WEATHER_METAR
#include "weather.h"
#endif /* BUILD_WEATHER_METAR */
#include "lua-config.hh"
#include "setting.hh"
/* check for OS and include appropriate headers */
#if defined(__linux__)
#include "linux.h"
#elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
#include "freebsd.h"
#elif defined(__DragonFly__)
#include "dragonfly.h"
#elif defined(__OpenBSD__)
#include "openbsd.h"
#endif /* __OpenBSD__ */
#ifdef BUILD_HTTP
#include <microhttpd.h>
#endif /* BUILD_HTTP */
#ifdef BUILD_OLD_CONFIG
#include "convertconf.h"
#endif /* BUILD_OLD_CONFIG */
#ifdef BUILD_BUILTIN_CONFIG
#include "defconfig.h"
#ifdef BUILD_HSV_GRADIENT
#include "hsv_gradient.h"
#endif /* BUILD_HSV_GRADIENT */
namespace {
const char builtin_config_magic[] = "==builtin==";
} // namespace
#endif /* BUILD_BUILTIN_CONFIG */
#ifndef S_ISSOCK
#define S_ISSOCK(x) ((x & S_IFMT) == S_IFSOCK)
#endif
#define MAX_IF_BLOCK_DEPTH 5
//#define SIGNAL_BLOCKING
#undef SIGNAL_BLOCKING
/* debugging level, used by logging.h */
int global_debug_level = 0;
/* disable inotify auto reload feature if desired */
static conky::simple_config_setting<bool> disable_auto_reload(
"disable_auto_reload", false, false);
/* two strings for internal use */
static char *tmpstring1, *tmpstring2;
#ifdef BUILD_NCURSES
extern WINDOW *ncurses_window;
#endif
enum spacer_state { NO_SPACER = 0, LEFT_SPACER, RIGHT_SPACER };
template <>
conky::lua_traits<spacer_state>::Map conky::lua_traits<spacer_state>::map = {
{"none", NO_SPACER}, {"left", LEFT_SPACER}, {"right", RIGHT_SPACER}};
static conky::simple_config_setting<spacer_state> use_spacer("use_spacer",
NO_SPACER, false);
/* variables holding various config settings */
static conky::simple_config_setting<bool> short_units("short_units", false,
true);
static conky::simple_config_setting<bool> format_human_readable(
"format_human_readable", true, true);
conky::simple_config_setting<bool> out_to_stdout("out_to_console",
// Default value is false, unless we are building without X
#ifdef BUILD_X11
false,
#else
true,
#endif
false);
static conky::simple_config_setting<bool> out_to_stderr("out_to_stderr", false,
false);
int top_cpu, top_mem, top_time;
#ifdef BUILD_IOSTATS
int top_io;
#endif
int top_running;
static conky::simple_config_setting<bool> extra_newline("extra_newline", false,
false);
/* Update interval */
conky::range_config_setting<double> update_interval(
"update_interval", 0.0, std::numeric_limits<double>::infinity(), 3.0, true);
conky::range_config_setting<double> update_interval_on_battery(
"update_interval_on_battery", 0.0, std::numeric_limits<double>::infinity(),
NOBATTERY, true);
conky::simple_config_setting<std::string> detect_battery("detect_battery",
std::string("BAT0"),
false);
static bool on_battery = false;
double active_update_interval() {
return (on_battery ? update_interval_on_battery : update_interval)
.get(*state);
}
void music_player_interval_setting::lua_setter(lua::state &l, bool init) {
lua::stack_sentry s(l, -2);
if (l.isnil(-2)) {
l.checkstack(1);
l.pushnumber(update_interval.get(l));
l.replace(-3);
}
Base::lua_setter(l, init);
++s;
}
music_player_interval_setting music_player_interval;
void *global_cpu = nullptr;
static conky::range_config_setting<unsigned int> max_text_width(
"max_text_width", 0, std::numeric_limits<unsigned int>::max(), 0, true);
#if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
extern kvm_t *kd;
#endif
/* prototypes for internally used functions */
static void signal_handler(int /*sig*/);
static void reload_config();
static const char *suffixes[] = {_nop("B"), _nop("KiB"), _nop("MiB"),
_nop("GiB"), _nop("TiB"), _nop("PiB"),
""};
#ifdef BUILD_X11
static void X11_create_window();
struct _x11_stuff_s {
Region region;
#ifdef BUILD_XDAMAGE
Damage damage;
XserverRegion region2, part;
int event_base, error_base;
#endif
} x11_stuff;
/* text size */
static int text_start_x, text_start_y; /* text start position in window */
static int text_offset_x, text_offset_y; /* offset for start position */
static int text_width = 1,
text_height = 1; /* initially 1 so no zero-sized window is created */
#endif /* BUILD_X11 */
/* struct that has all info to be shared between
* instances of the same text object */
struct information info;
/* path to config file */
std::string current_config;
/* set to 1 if you want all text to be in uppercase */
static conky::simple_config_setting<bool> stuff_in_uppercase("uppercase", false,
true);
static conky::simple_config_setting<bool> stuff_in_lowercase("lowercase", false,
true);
/* Run how many times? */
static conky::range_config_setting<unsigned long> total_run_times(
"total_run_times", 0, std::numeric_limits<unsigned long>::max(), 0, true);
/* fork? */
static conky::simple_config_setting<bool> fork_to_background("background",
false, false);
/* set to 0 after the first time conky is run, so we don't fork again after the
* first forking */
int first_pass = 1;
int argc_copy;
char **argv_copy;
conky::range_config_setting<int> cpu_avg_samples("cpu_avg_samples", 1, 14, 2,
true);
conky::range_config_setting<int> net_avg_samples("net_avg_samples", 1, 14, 2,
true);
conky::range_config_setting<int> diskio_avg_samples("diskio_avg_samples", 1, 14,
2, true);
/* filenames for output */
static conky::simple_config_setting<std::string> overwrite_file(
"overwrite_file", std::string(), true);
static FILE *overwrite_fpointer = nullptr;
static conky::simple_config_setting<std::string> append_file("append_file",
std::string(),
true);
static FILE *append_fpointer = nullptr;
#ifdef BUILD_HTTP
#ifdef MHD_YES
/* older API */
#define MHD_Result int
#endif /* MHD_YES */
std::string webpage;
struct MHD_Daemon *httpd;
static conky::simple_config_setting<bool> http_refresh("http_refresh", false,
true);
MHD_Result sendanswer(void *cls, struct MHD_Connection *connection,
const char *url, const char *method, const char *version,
const char *upload_data, size_t *upload_data_size,
void **con_cls) {
struct MHD_Response *response = MHD_create_response_from_buffer(
webpage.length(), (void *)webpage.c_str(), MHD_RESPMEM_PERSISTENT);
MHD_Result ret = MHD_queue_response(connection, MHD_HTTP_OK, response);
MHD_destroy_response(response);
if (cls || url || method || version || upload_data || upload_data_size ||
con_cls) {} // make compiler happy
return ret;
}
class out_to_http_setting : public conky::simple_config_setting<bool> {
typedef conky::simple_config_setting<bool> Base;
protected:
virtual void lua_setter(lua::state &l, bool init) {
lua::stack_sentry s(l, -2);
Base::lua_setter(l, init);
if (init && do_convert(l, -1).first) {
httpd = MHD_start_daemon(MHD_USE_SELECT_INTERNALLY, HTTPPORT, nullptr,
NULL, &sendanswer, nullptr, MHD_OPTION_END);
}
++s;
}
virtual void cleanup(lua::state &l) {
lua::stack_sentry s(l, -1);
if (do_convert(l, -1).first) {
MHD_stop_daemon(httpd);
httpd = nullptr;
}
l.pop();
}
public:
out_to_http_setting() : Base("out_to_http", false, false) {}
};
static out_to_http_setting out_to_http;
#endif /* BUILD_HTTP */
#ifdef BUILD_X11
static conky::simple_config_setting<bool> show_graph_scale("show_graph_scale",
false, false);
static conky::simple_config_setting<bool> show_graph_range("show_graph_range",
false, false);
/* Position on the screen */
static conky::simple_config_setting<int> gap_x("gap_x", 5, true);
static conky::simple_config_setting<int> gap_y("gap_y", 60, true);
/* border */
static conky::simple_config_setting<bool> draw_borders("draw_borders", false,
false);
static conky::simple_config_setting<bool> draw_graph_borders(
"draw_graph_borders", true, false);
conky::range_config_setting<char> stippled_borders(
"stippled_borders", 0, std::numeric_limits<char>::max(), 0, true);
static conky::simple_config_setting<bool> draw_shades("draw_shades", true,
false);
static conky::simple_config_setting<bool> draw_outline("draw_outline", false,
false);
#ifdef OWN_WINDOW
/* fixed size/pos is set if wm/user changes them */
static int fixed_size = 0, fixed_pos = 0;
#endif
static conky::range_config_setting<int> minimum_height(
"minimum_height", 0, std::numeric_limits<int>::max(), 5, true);
static conky::range_config_setting<int> minimum_width(
"minimum_width", 0, std::numeric_limits<int>::max(), 5, true);
static conky::range_config_setting<int> maximum_width(
"maximum_width", 0, std::numeric_limits<int>::max(), 0, true);
static bool isutf8(const char *envvar) {
char *s = getenv(envvar);
if (s != nullptr) {
std::string temp = s;
std::transform(temp.begin(), temp.end(), temp.begin(), ::tolower);
if ((temp.find("utf-8") != std::string::npos) ||
(temp.find("utf8") != std::string::npos)) {
return true;
}
}
return false;
}
/* UTF-8 */
conky::simple_config_setting<bool> utf8_mode("override_utf8_locale",
isutf8("LC_ALL") ||
isutf8("LC_CTYPE") ||
isutf8("LANG"),
false);
#endif /* BUILD_X11 */
/* maximum size of config TEXT buffer, i.e. below TEXT line. */
conky::range_config_setting<unsigned int> max_user_text(
"max_user_text", 47, std::numeric_limits<unsigned int>::max(),
MAX_USER_TEXT_DEFAULT, false);
/* maximum size of individual text buffers, ie $exec buffer size */
conky::range_config_setting<unsigned int> text_buffer_size(
"text_buffer_size", DEFAULT_TEXT_BUFFER_SIZE,
std::numeric_limits<unsigned int>::max(), DEFAULT_TEXT_BUFFER_SIZE, false);
/* pad percentages to decimals? */
static conky::simple_config_setting<int> pad_percents("pad_percents", 0, false);
static char *global_text = nullptr;
char *get_global_text() { return global_text; }
long global_text_lines;
static int total_updates;
static int updatereset;
std::unique_ptr<lua::state> state;
void set_updatereset(int i) { updatereset = i; }
int get_updatereset() { return updatereset; }
int get_total_updates() { return total_updates; }
int calc_text_width(const char *s) {
size_t slen = strlen(s);
#ifdef BUILD_X11
if (!out_to_x.get(*state)) {
#endif /* BUILD_X11 */
return slen;
#ifdef BUILD_X11
}
#ifdef BUILD_XFT
if (use_xft.get(*state)) {
XGlyphInfo gi;
if (utf8_mode.get(*state)) {
XftTextExtentsUtf8(display, fonts[selected_font].xftfont,
reinterpret_cast<const FcChar8 *>(s), slen, &gi);
} else {
XftTextExtents8(display, fonts[selected_font].xftfont,
reinterpret_cast<const FcChar8 *>(s), slen, &gi);
}
return gi.xOff;
}
#endif /* BUILD_XFT */
return XTextWidth(fonts[selected_font].font, s, slen);
#endif /* BUILD_X11 */
}
/* formatted text to render on screen, generated in generate_text(),
* drawn in draw_stuff() */
static char *text_buffer;
/* quite boring functions */
static inline void for_each_line(char *b, int f(char *, int)) {
char *ps, *pe;
int special_index = 0; /* specials index */
if (b == nullptr) { return; }
for (ps = b, pe = b; *pe != 0; pe++) {
if (*pe == '\n') {
*pe = '\0';
special_index = f(ps, special_index);
*pe = '\n';
ps = pe + 1;
}
}
if (ps < pe) { f(ps, special_index); }
}
static void convert_escapes(char *buf) {
char *p = buf, *s = buf;
while (*s != 0) {
if (*s == '\\') {
s++;
if (*s == 'n') {
*p++ = '\n';
} else if (*s == '\\') {
*p++ = '\\';
}
s++;
} else {
*p++ = *s++;
}
}
*p = '\0';
}
/* Prints anything normally printed with snprintf according to the current value
* of use_spacer. Actually slightly more flexible than snprintf, as you can
* safely specify the destination buffer as one of your inputs. */
int spaced_print(char *buf, int size, const char *format, int width, ...) {
int len = 0;
va_list argp;
char *tempbuf;
if (size < 1) { return 0; }
tempbuf = new char[size];
// Passes the varargs along to vsnprintf
va_start(argp, width);
vsnprintf(tempbuf, size, format, argp);
va_end(argp);
switch (use_spacer.get(*state)) {
case NO_SPACER:
len = snprintf(buf, size, "%s", tempbuf);
break;
case LEFT_SPACER:
len = snprintf(buf, size, "%*s", width, tempbuf);
break;
case RIGHT_SPACER:
len = snprintf(buf, size, "%-*s", width, tempbuf);
break;
}
delete[] tempbuf;
return len;
}
/* print percentage values
*
* - i.e., unsigned values between 0 and 100
* - respect the value of pad_percents */
int percent_print(char *buf, int size, unsigned value) {
return spaced_print(buf, size, "%u", pad_percents.get(*state), value);
}
/* converts from bytes to human readable format (K, M, G, T)
*
* The algorithm always divides by 1024, as unit-conversion of byte
* counts suggests. But for output length determination we need to
* compare with 1000 here, as we print in decimal form. */
void human_readable(long long num, char *buf, int size) {
const char **suffix = suffixes;
float fnum;
int precision;
int width;
const char *format;
/* Possibly just output as usual, for example for stdout usage */
if (!format_human_readable.get(*state)) {
spaced_print(buf, size, "%lld", 6, num);
return;
}
if (short_units.get(*state)) {
width = 6;
format = "%.*f %.1s";
} else {
width = 8;
format = "%.*f %-.3s";
}
if (llabs(num) < 1000LL) {
spaced_print(buf, size, format, width, 0, static_cast<float>(num),
_(*suffix));
return;
}
while (llabs(num / 1024) >= 1000LL && (**(suffix + 2) != 0)) {
num /= 1024;
suffix++;
}
suffix++;
fnum = num / 1024.0;
/* fnum should now be < 1000, so looks like 'AAA.BBBBB'
*
* The goal is to always have a significance of 3, by
* adjusting the decimal part of the number. Sample output:
* 123MiB
* 23.4GiB
* 5.12B
* so the point of alignment resides between number and unit. The
* upside of this is that there is minimal padding necessary, though
* there should be a way to make alignment take place at the decimal
* dot (then with fixed width decimal part).
*
* Note the repdigits below: when given a precision value, printf()
* rounds the float to it, not just cuts off the remaining digits. So
* e.g. 99.95 with a precision of 1 gets 100.0, which again should be
* printed with a precision of 0. Yay. */
precision = 0; /* print 100-999 without decimal part */
if (fnum < 99.95) { precision = 1; /* print 10-99 with one decimal place */ }
if (fnum < 9.995) { precision = 2; /* print 0-9 with two decimal places */ }
spaced_print(buf, size, format, width, precision, fnum, _(*suffix));
}
/* global object list root element */
static struct text_object global_root_object;
static long current_text_color;
void set_current_text_color(long colour) { current_text_color = colour; }
long get_current_text_color() { return current_text_color; }
static void extract_variable_text(const char *p) {
free_text_objects(&global_root_object);
delete_block_and_zero(tmpstring1);
delete_block_and_zero(tmpstring2);
delete_block_and_zero(text_buffer);
extract_variable_text_internal(&global_root_object, p);
}
void parse_conky_vars(struct text_object *root, const char *txt, char *p,
int p_max_size) {
extract_variable_text_internal(root, txt);
generate_text_internal(p, p_max_size, *root);
}
/* IFBLOCK jumping algorithm
*
* This is easier as it looks like:
* - each IF checks it's condition
* - on FALSE: jump
* - on TRUE: don't care
* - each ELSE jumps unconditionally
* - each ENDIF is silently being ignored
*
* Why this works (or: how jumping works):
* Jumping means to overwrite the "obj" variable of the loop and set it to the
* target (i.e. the corresponding ELSE or ENDIF). After that, the for-loop does
* the rest: as regularly, "obj" is being updated to point to obj->next, so
* object parsing continues right after the corresponding ELSE or ENDIF. This
* means that if we find an ELSE, it's corresponding IF must not have jumped,
* so we need to jump always. If we encounter an ENDIF, it's corresponding IF
* or ELSE has not jumped, and there is nothing to do.
*/
void generate_text_internal(char *p, int p_max_size, struct text_object root) {
struct text_object *obj;
size_t a;
if (p == nullptr) { return; }
#ifdef BUILD_ICONV
char *buff_in;
buff_in = new char[p_max_size];
memset(buff_in, 0, p_max_size);
#endif /* BUILD_ICONV */
p[0] = 0;
obj = root.next;
while ((obj != nullptr) && p_max_size > 0) {
/* check callbacks for existence and act accordingly */
if (obj->callbacks.print != nullptr) {
(*obj->callbacks.print)(obj, p, p_max_size);
} else if (obj->callbacks.iftest != nullptr) {
if ((*obj->callbacks.iftest)(obj) == 0) {
DBGP2("jumping");
if (obj->ifblock_next != nullptr) { obj = obj->ifblock_next; }
}
} else if (obj->callbacks.barval != nullptr) {
new_bar(obj, p, p_max_size, (*obj->callbacks.barval)(obj));
} else if (obj->callbacks.gaugeval != nullptr) {
new_gauge(obj, p, p_max_size, (*obj->callbacks.gaugeval)(obj));
#ifdef BUILD_X11
} else if (obj->callbacks.graphval != nullptr) {
new_graph(obj, p, p_max_size, (*obj->callbacks.graphval)(obj));
#endif /* BUILD_X11 */
} else if (obj->callbacks.percentage != nullptr) {
percent_print(p, p_max_size, (*obj->callbacks.percentage)(obj));
}
a = strlen(p);
#ifdef BUILD_ICONV
iconv_convert(&a, buff_in, p, p_max_size);
#endif /* BUILD_ICONV */
p += a;
p_max_size -= a;
(*p) = 0;
obj = obj->next;
}
#ifdef BUILD_X11
/* load any new fonts we may have had */
load_fonts(utf8_mode.get(*state));
#endif /* BUILD_X11 */
#ifdef BUILD_ICONV
delete[] buff_in;
#endif /* BUILD_ICONV */
}
void evaluate(const char *text, char *p, int p_max_size) {
struct text_object subroot {};
/**
* Consider expressions like: ${execp echo '${execp echo hi}'}
* These would require run extract_variable_text_internal() before
* callbacks and generate_text_internal() after callbacks.
*/
extract_variable_text_internal(&subroot, text);
conky::run_all_callbacks();
generate_text_internal(p, p_max_size, subroot);
DBGP2("evaluated '%s' to '%s'", text, p);
free_text_objects(&subroot);
}
double current_update_time, next_update_time, last_update_time;
static void generate_text() {
char *p;
unsigned int i, j, k;
special_count = 0;
current_update_time = get_time();
/* clears netstats info, calls conky::run_all_callbacks(), and changes
* some info.mem entries */
update_stuff();
/* populate the text buffer; generate_text_internal() iterates through
* global_root_object (an instance of the text_object struct) and calls
* any callbacks that were set on startup by construct_text_object(). */
p = text_buffer;
generate_text_internal(p, max_user_text.get(*state), global_root_object);
unsigned int mw = max_text_width.get(*state);
unsigned int tbs = text_buffer_size.get(*state);
if (mw > 0) {
for (i = 0, j = 0; p[i] != 0; i++) {
if (p[i] == '\n') {
j = 0;
} else if (j == mw) {
k = i + strlen(p + i) + 1;
if (k < tbs) {
while (k != i) {
p[k] = p[k - 1];
k--;
}
p[k] = '\n';
j = 0;
} else {
NORM_ERR(
"The end of the text_buffer is reached, increase "
"\"text_buffer_size\"");
}
} else {
j++;
}
}
}
if (stuff_in_uppercase.get(*state)) {
char *tmp_p;
tmp_p = text_buffer;
while (*tmp_p != 0) {
*tmp_p = toupper(static_cast<unsigned char>(*tmp_p));
tmp_p++;
}
} else if (stuff_in_lowercase.get(*state)) {
char *tmp_p;
tmp_p = text_buffer;
while (*tmp_p != 0) {
*tmp_p = tolower(static_cast<unsigned char>(*tmp_p));
tmp_p++;
}
}
double ui = active_update_interval();
double time = get_time();
next_update_time += ui;
if (next_update_time < time || next_update_time > time + ui) {
next_update_time = time - fmod(time, ui) + ui;
}
last_update_time = current_update_time;
total_updates++;
}
int get_string_width(const char *s) { return *s != 0 ? calc_text_width(s) : 0; }
#ifdef BUILD_X11
static inline int get_border_total() {
return border_inner_margin.get(*state) + border_outer_margin.get(*state) +
border_width.get(*state);
}
static int get_string_width_special(char *s, int special_index) {
char *p, *final;
special_t *current = specials;
int idx = 1;
int width = 0;
long i;
if (s == nullptr) { return 0; }
if (!out_to_x.get(*state)) { return strlen(s); }
p = strndup(s, text_buffer_size.get(*state));
final = p;
for (i = 0; i < special_index; i++) { current = current->next; }
for (i = 0; i < idx; i++) { current = current->next; }
while (*p != 0) {
if (*p == SPECIAL_CHAR) {
/* shift everything over by 1 so that the special char
* doesn't mess up the size calculation */
for (i = 0; i < static_cast<long>(strlen(p)); i++) {
*(p + i) = *(p + i + 1);
}
if (current->type == GRAPH || current->type == GAUGE ||
current->type == BAR) {
width += current->width;
}
if (current->type == FONT) {
// put all following text until the next fontchange/stringend in
// influenced_by_font but do not include specials
char *influenced_by_font = strdup(p);
special_t *current_after_font = current;
for (i = 0; influenced_by_font[i] != 0; i++) {
if (influenced_by_font[i] == SPECIAL_CHAR) {
// remove specials and stop at fontchange
current_after_font = current_after_font->next;
if (current_after_font->type == FONT) {
influenced_by_font[i] = 0;
break;
}
{
memmove(&influenced_by_font[i], &influenced_by_font[i + 1],
strlen(&influenced_by_font[i + 1]) + 1);
}
}
}
// add the length of influenced_by_font in the new font to width
int orig_font = selected_font;
selected_font = current->font_added;
width += calc_text_width(influenced_by_font);
selected_font = orig_font;
free(influenced_by_font);
// make sure there chars counted in the new font are not again counted
// in the old font
int specials_skipped = 0;
while (i > 0) {
if (p[specials_skipped] != 1) {
memmove(&p[specials_skipped], &p[specials_skipped + 1],
strlen(&p[specials_skipped + 1]) + 1);
} else {
specials_skipped++;
}
i--;
}
}
idx++;
current = current->next;
} else {
p++;
}
}
if (strlen(final) > 1) { width += calc_text_width(final); }
free(final);
return width;
}
static int text_size_updater(char *s, int special_index);
int last_font_height;
static void update_text_area() {
int x = 0, y = 0;
if (!out_to_x.get(*state)) { return; }
/* update text size if it isn't fixed */
#ifdef OWN_WINDOW
if (fixed_size == 0)
#endif
{
text_width = minimum_width.get(*state);
text_height = 0;
last_font_height = font_height();
for_each_line(text_buffer, text_size_updater);
text_width += 1;
if (text_height < minimum_height.get(*state)) {
text_height = minimum_height.get(*state);
}
int mw = maximum_width.get(*state);
if (text_width > mw && mw > 0) { text_width = mw; }
}
alignment align = text_alignment.get(*state);
/* get text position on workarea */
switch (align) {
case TOP_LEFT:
case TOP_RIGHT:
case TOP_MIDDLE:
y = workarea[1] + gap_y.get(*state);
break;
case BOTTOM_LEFT:
case BOTTOM_RIGHT:
case BOTTOM_MIDDLE:
default:
y = workarea[3] - text_height - gap_y.get(*state);
break;
case MIDDLE_LEFT:
case MIDDLE_RIGHT:
case MIDDLE_MIDDLE:
y = workarea[1] + (workarea[3] - workarea[1]) / 2 - text_height / 2 -
gap_y.get(*state);
break;
}
switch (align) {
case TOP_LEFT:
case BOTTOM_LEFT:
case MIDDLE_LEFT:
default:
x = workarea[0] + gap_x.get(*state);
break;
case TOP_RIGHT:
case BOTTOM_RIGHT:
case MIDDLE_RIGHT:
x = workarea[2] - text_width - gap_x.get(*state);
break;
case TOP_MIDDLE:
case BOTTOM_MIDDLE:
case MIDDLE_MIDDLE:
x = workarea[0] + (workarea[2] - workarea[0]) / 2 - text_width / 2 -
gap_x.get(*state);
break;
}
#ifdef OWN_WINDOW
if (align == NONE) { // Let the WM manage the window
x = window.x;
y = window.y;
fixed_pos = 1;
fixed_size = 1;
}
#endif /* OWN_WINDOW */
#ifdef OWN_WINDOW
if (own_window.get(*state) && (fixed_pos == 0)) {
int border_total = get_border_total();
text_start_x = text_start_y = border_total;
window.x = x - border_total;
window.y = y - border_total;
} else
#endif
{
text_start_x = x;
text_start_y = y;
}
/* update lua window globals */
llua_update_window_table(text_start_x, text_start_y, text_width, text_height);
}
/* drawing stuff */
static int cur_x, cur_y; /* current x and y for drawing */
#endif
// draw_mode also without BUILD_X11 because we only need to print to stdout with
// FG
static int draw_mode; /* FG, BG or OUTLINE */
#ifdef BUILD_X11
static long current_color;
static int saved_coordinates_x[100];
static int saved_coordinates_y[100];
int get_saved_coordinates_x(int i) { return saved_coordinates_x[i]; }
int get_saved_coordinates_y(int i) { return saved_coordinates_y[i]; }
static int text_size_updater(char *s, int special_index) {
int w = 0;
char *p;
special_t *current = specials;
for (int i = 0; i < special_index; i++) { current = current->next; }
if (!out_to_x.get(*state)) { return 0; }
/* get string widths and skip specials */
p = s;
while (*p != 0) {
if (*p == SPECIAL_CHAR) {
*p = '\0';
w += get_string_width(s);
*p = SPECIAL_CHAR;
if (current->type == BAR || current->type == GAUGE ||
current->type == GRAPH) {
w += current->width;
if (current->height > last_font_height) {
last_font_height = current->height;
last_font_height += font_height();
}
} else if (current->type == OFFSET) {
if (current->arg > 0) { w += current->arg; }
} else if (current->type == VOFFSET) {
last_font_height += current->arg;
} else if (current->type == GOTO) {
if (current->arg > cur_x) { w = static_cast<int>(current->arg); }
} else if (current->type == TAB) {
int start = current->arg;
int step = current->width;
if ((step == 0) || step < 0) { step = 10; }
w += step - (cur_x - text_start_x - start) % step;
} else if (current->type == FONT) {
selected_font = current->font_added;
if (font_height() > last_font_height) {
last_font_height = font_height();
}
}
special_index++;
current = current->next;
s = p + 1;
}
p++;
}
w += get_string_width(s);
if (w > text_width) { text_width = w; }
int mw = maximum_width.get(*state);
if (text_width > mw && mw > 0) { text_width = mw; }
text_height += last_font_height;
last_font_height = font_height();
return special_index;
}
#endif /* BUILD_X11 */
static inline void set_foreground_color(long c) {
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
#ifdef BUILD_ARGB
if (have_argb_visual) {
current_color = c | (own_window_argb_value.get(*state) << 24);
} else {
#endif /* BUILD_ARGB */
current_color = c;
#ifdef BUILD_ARGB
}
#endif /* BUILD_ARGB */
XSetForeground(display, window.gc, current_color);
}
#endif /* BUILD_X11 */
#ifdef BUILD_NCURSES
if (out_to_ncurses.get(*state)) { attron(COLOR_PAIR(c)); }
#endif /* BUILD_NCURSES */
UNUSED(c);
}
std::string string_replace_all(std::string original, const std::string &oldpart,
const std::string &newpart,
std::string::size_type start) {
std::string::size_type i = start;
int oldpartlen = oldpart.length();
while (1) {
i = original.find(oldpart, i);
if (i == std::string::npos) { break; }
original.replace(i, oldpartlen, newpart);
}
return original;
}
static void draw_string(const char *s) {
int i;
int i2;
int pos;
#ifdef BUILD_X11
int width_of_s;
#endif /* BUILD_X11 */
int max = 0;
int added;
if (s[0] == '\0') { return; }
#ifdef BUILD_X11
width_of_s = get_string_width(s);
#endif /* BUILD_X11 */
if (out_to_stdout.get(*state) && draw_mode == FG) {
printf("%s\n", s);
if (extra_newline.get(*state)) { fputc('\n', stdout); }
fflush(stdout); /* output immediately, don't buffer */
}
if (out_to_stderr.get(*state) && draw_mode == FG) {
fprintf(stderr, "%s\n", s);
fflush(stderr); /* output immediately, don't buffer */
}
if (draw_mode == FG && (overwrite_fpointer != nullptr)) {
fprintf(overwrite_fpointer, "%s\n", s);
}
if (draw_mode == FG && (append_fpointer != nullptr)) {
fprintf(append_fpointer, "%s\n", s);
}
#ifdef BUILD_NCURSES
if (out_to_ncurses.get(*state) && draw_mode == FG) { printw("%s", s); }
#endif /* BUILD_NCURSES */
#ifdef BUILD_HTTP
if (out_to_http.get(*state) && draw_mode == FG) {
std::string::size_type origlen = webpage.length();
webpage.append(s);
webpage = string_replace_all(webpage, "\n", "<br />", origlen);
webpage = string_replace_all(webpage, " ", "&nbsp;&nbsp;", origlen);
webpage = string_replace_all(webpage, "&nbsp; ", "&nbsp;&nbsp;", origlen);
webpage.append("<br />");
}
#endif /* BUILD_HTTP */
int tbs = text_buffer_size.get(*state);
memset(tmpstring1, 0, tbs);
memset(tmpstring2, 0, tbs);
strncpy(tmpstring1, s, tbs - 1);
pos = 0;
added = 0;
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
max = ((text_width - width_of_s) / get_string_width(" "));
}
#endif /* BUILD_X11 */
/* This code looks for tabs in the text and coverts them to spaces.
* The trick is getting the correct number of spaces, and not going
* over the window's size without forcing the window larger. */
for (i = 0; i < tbs; i++) {
if (tmpstring1[i] == '\t') {
i2 = 0;
for (i2 = 0; i2 < (8 - (1 + pos) % 8) && added <= max; i2++) {
/* guard against overrun */
tmpstring2[std::min(pos + i2, tbs - 1)] = ' ';
added++;
}
pos += i2;
} else {
/* guard against overrun */
tmpstring2[std::min(pos, tbs - 1)] = tmpstring1[i];
pos++;
}
}
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
int mw = maximum_width.get(*state);
if (text_width == mw) {
/* this means the text is probably pushing the limit,
* so we'll chop it */
while (cur_x + get_string_width(tmpstring2) - text_start_x > mw &&
strlen(tmpstring2) > 0) {
tmpstring2[strlen(tmpstring2) - 1] = '\0';
}
}
}
#endif /* BUILD_X11 */
s = tmpstring2;
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
#ifdef BUILD_XFT
if (use_xft.get(*state)) {
XColor c;
XftColor c2;
c.pixel = current_color;
// query color on custom colormap
XQueryColor(display, window.colourmap, &c);
c2.pixel = c.pixel;
c2.color.red = c.red;
c2.color.green = c.green;
c2.color.blue = c.blue;
c2.color.alpha = fonts[selected_font].font_alpha;
if (utf8_mode.get(*state)) {
XftDrawStringUtf8(window.xftdraw, &c2, fonts[selected_font].xftfont,
text_offset_x + cur_x, text_offset_y + cur_y,
reinterpret_cast<const XftChar8 *>(s), strlen(s));
} else {
XftDrawString8(window.xftdraw, &c2, fonts[selected_font].xftfont,
text_offset_x + cur_x, text_offset_y + cur_y,
reinterpret_cast<const XftChar8 *>(s), strlen(s));
}
} else
#endif
{
if (utf8_mode.get(*state)) {
Xutf8DrawString(display, window.drawable, fonts[selected_font].fontset,
window.gc, text_offset_x + cur_x, text_offset_y + cur_y,
s, strlen(s));
} else {
XDrawString(display, window.drawable, window.gc, text_offset_x + cur_x,
text_offset_y + cur_y, s, strlen(s));
}
}
cur_x += width_of_s;
}
#endif /* BUILD_X11 */
memcpy(tmpstring1, s, tbs);
}
#if defined(BUILD_MATH) && defined(BUILD_X11)
/// Format \a size as a real followed by closest SI unit, with \a prec number
/// of digits after the decimal point.
static std::string formatSizeWithUnits(double size, int prec = 1) {
int div = 0;
double rem = 0;
while (size >= 1024.0 &&
static_cast<size_t>(div) < (sizeof suffixes / sizeof *suffixes)) {
rem = fmod(size, 1024.0);
div++;
size /= 1024.0;
}
double size_d = size + rem / 1024.0;
std::ostringstream result;
result.setf(std::ios::fixed, std::ios::floatfield);
result.precision(prec);
result << size_d;
result << " ";
if (short_units.get(*state)) {
result << suffixes[div][0];
} else {
result << suffixes[div];
}
return result.str();
}
#endif /* BUILD_MATH && BUILD_X11 */
int draw_each_line_inner(char *s, int special_index, int last_special_applied) {
#ifndef BUILD_X11
static int cur_x, cur_y; /* current x and y for drawing */
(void)cur_y;
#endif
#ifdef BUILD_X11
int font_h = 0;
int cur_y_add = 0;
int mw = maximum_width.get(*state);
#endif /* BUILD_X11 */
char *p = s;
int orig_special_index = special_index;
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
font_h = font_height();
cur_y += font_ascent();
}
cur_x = text_start_x;
#endif /* BUILD_X11 */
while (*p != 0) {
if (*p == SPECIAL_CHAR || last_special_applied > -1) {
#ifdef BUILD_X11
int w = 0;
#endif /* BUILD_X11 */
/* draw string before special, unless we're dealing multiline
* specials */
if (last_special_applied > -1) {
special_index = last_special_applied;
} else {
*p = '\0';
draw_string(s);
*p = SPECIAL_CHAR;
s = p + 1;
}
/* draw special */
special_t *current = specials;
for (int i = 0; i < special_index; i++) { current = current->next; }
switch (current->type) {
#ifdef BUILD_X11
case HORIZONTAL_LINE:
if (out_to_x.get(*state)) {
int h = current->height;
int mid = font_ascent() / 2;
w = text_start_x + text_width - cur_x;
XSetLineAttributes(display, window.gc, h, LineSolid, CapButt,
JoinMiter);
XDrawLine(display, window.drawable, window.gc,
text_offset_x + cur_x, text_offset_y + cur_y - mid / 2,
text_offset_x + cur_x + w,
text_offset_y + cur_y - mid / 2);
}
break;
case STIPPLED_HR:
if (out_to_x.get(*state)) {
int h = current->height;
char tmp_s = current->arg;
int mid = font_ascent() / 2;
char ss[2] = {tmp_s, tmp_s};
w = text_start_x + text_width - cur_x - 1;
XSetLineAttributes(display, window.gc, h, LineOnOffDash, CapButt,
JoinMiter);
XSetDashes(display, window.gc, 0, ss, 2);
XDrawLine(display, window.drawable, window.gc,
text_offset_x + cur_x, text_offset_y + cur_y - mid / 2,
text_offset_x + cur_x + w,
text_offset_x + cur_y - mid / 2);
}
break;
case BAR:
if (out_to_x.get(*state)) {
int h, by;
double bar_usage, scale;
if (cur_x - text_start_x > mw && mw > 0) { break; }
h = current->height;
bar_usage = current->arg;
scale = current->scale;
by = cur_y - (font_ascent() / 2) - 1;
if (h < font_h) { by -= h / 2 - 1; }
w = current->width;
if (w == 0) { w = text_start_x + text_width - cur_x - 1; }
if (w < 0) { w = 0; }
XSetLineAttributes(display, window.gc, 1, LineSolid, CapButt,
JoinMiter);
XDrawRectangle(display, window.drawable, window.gc,
text_offset_x + cur_x, text_offset_y + by, w, h);
XFillRectangle(display, window.drawable, window.gc,
text_offset_x + cur_x, text_offset_y + by,
w * bar_usage / scale, h);
if (h > cur_y_add && h > font_h) { cur_y_add = h; }
}
break;
case GAUGE: /* new GAUGE */
if (out_to_x.get(*state)) {
int h, by = 0;
unsigned long last_colour = current_color;
#ifdef BUILD_MATH
float angle, px, py;
double usage, scale;
#endif /* BUILD_MATH */
if (cur_x - text_start_x > mw && mw > 0) { break; }
h = current->height;
by = cur_y - (font_ascent() / 2) - 1;
if (h < font_h) { by -= h / 2 - 1; }
w = current->width;
if (w == 0) { w = text_start_x + text_width - cur_x - 1; }
if (w < 0) { w = 0; }
XSetLineAttributes(display, window.gc, 1, LineSolid, CapButt,
JoinMiter);
XDrawArc(display, window.drawable, window.gc, text_offset_x + cur_x,
text_offset_y + by, w, h * 2, 0, 180 * 64);
#ifdef BUILD_MATH
usage = current->arg;
scale = current->scale;
angle = M_PI * usage / scale;
px = static_cast<float>(cur_x + (w / 2.)) -
static_cast<float>(w / 2.) * cos(angle);
py = static_cast<float>(by + (h)) -
static_cast<float>(h) * sin(angle);
XDrawLine(display, window.drawable, window.gc,
text_offset_x + cur_x + (w / 2.),
text_offset_y + by + (h),
text_offset_x + static_cast<int>(px),
text_offset_y + static_cast<int>(py));
#endif /* BUILD_MATH */
if (h > cur_y_add && h > font_h) { cur_y_add = h; }
set_foreground_color(last_colour);
}
break;
case GRAPH:
if (out_to_x.get(*state)) {
int h, by, i = 0, j = 0;
int colour_idx = 0;
unsigned long last_colour = current_color;
if (cur_x - text_start_x > mw && mw > 0) { break; }
h = current->height;
by = cur_y - (font_ascent() / 2) - 1;
if (h < font_h) { by -= h / 2 - 1; }
w = current->width;
if (w == 0) {
w = text_start_x + text_width - cur_x - 1;
current->graph_width = std::max(w - 1, 0);
if (current->graph_width != current->graph_allocated) {
w = current->graph_allocated + 1;
}
}
if (w < 0) { w = 0; }
if (draw_graph_borders.get(*state)) {
XSetLineAttributes(display, window.gc, 1, LineSolid, CapButt,
JoinMiter);
XDrawRectangle(display, window.drawable, window.gc,
text_offset_x + cur_x, text_offset_y + by, w, h);
}
XSetLineAttributes(display, window.gc, 1, LineSolid, CapButt,
JoinMiter);
/* in case we don't have a graph yet */
if (current->graph != nullptr) {
unsigned long *tmpcolour = nullptr;
if (current->last_colour != 0 || current->first_colour != 0) {
#ifdef BUILD_HSV_GRADIENT
tmpcolour = do_hsv_gradient(w - 1, current->last_colour,
current->first_colour);
#else
tmpcolour = do_gradient(w - 1, current->last_colour,
current->first_colour);
#endif
}
colour_idx = 0;
for (i = w - 2; i > -1; i--) {
if (current->last_colour != 0 || current->first_colour != 0) {
if (current->tempgrad != 0) {
set_foreground_color(tmpcolour[static_cast<int>(
static_cast<float>(w - 2) -
current->graph[j] * (w - 2) /
std::max(static_cast<float>(current->scale),
1.0F))]);
} else {
set_foreground_color(tmpcolour[colour_idx++]);
}
}
/* this is mugfugly, but it works */
XDrawLine(display, window.drawable, window.gc,
text_offset_x + cur_x + i + 1, text_offset_y + by + h,
text_offset_x + cur_x + i + 1,
text_offset_y + round_to_positive_int(
static_cast<double>(by) + h -
current->graph[j] * (h - 1) /
current->scale));
++j;
}
free_and_zero(tmpcolour);
}
if (h > cur_y_add && h > font_h) { cur_y_add = h; }
if (show_graph_range.get(*state)) {
int tmp_x = cur_x;
int tmp_y = cur_y;
unsigned short int seconds = active_update_interval() * w;
char *tmp_day_str;
char *tmp_hour_str;
char *tmp_min_str;
char *tmp_sec_str;
char *tmp_str;
unsigned short int timeunits;
if (seconds != 0) {
timeunits = seconds / 86400;
seconds %= 86400;
if (timeunits <= 0 ||
asprintf(&tmp_day_str, _("%dd"), timeunits) == -1) {
tmp_day_str = strdup("");
}
timeunits = seconds / 3600;
seconds %= 3600;
if (timeunits <= 0 ||
asprintf(&tmp_hour_str, _("%dh"), timeunits) == -1) {
tmp_hour_str = strdup("");
}
timeunits = seconds / 60;
seconds %= 60;
if (timeunits <= 0 ||
asprintf(&tmp_min_str, _("%dm"), timeunits) == -1) {
tmp_min_str = strdup("");
}
if (seconds <= 0 ||
asprintf(&tmp_sec_str, _("%ds"), seconds) == -1) {
tmp_sec_str = strdup("");
}
if (asprintf(&tmp_str, "%s%s%s%s", tmp_day_str, tmp_hour_str,
tmp_min_str, tmp_sec_str) == -1) {
tmp_str = strdup("");
}
free(tmp_day_str);
free(tmp_hour_str);
free(tmp_min_str);
free(tmp_sec_str);
} else {
tmp_str = strdup(
_("Range not possible")); // should never happen, but
// better safe then sorry
}
cur_x += (w / 2) - (font_ascent() * (strlen(tmp_str) / 2));
cur_y += font_h / 2;
draw_string(tmp_str);
free(tmp_str);
cur_x = tmp_x;
cur_y = tmp_y;
}
#ifdef BUILD_MATH
if (show_graph_scale.get(*state) && (current->show_scale == 1)) {
int tmp_x = cur_x;
int tmp_y = cur_y;
cur_x += font_ascent() / 2;
cur_y += font_h / 2;
std::string tmp_str = formatSizeWithUnits(
current->scale_log != 0 ? std::pow(10.0, current->scale)
: current->scale);
draw_string(tmp_str.c_str());
cur_x = tmp_x;
cur_y = tmp_y;
}
#endif
set_foreground_color(last_colour);
}
break;
case FONT:
if (out_to_x.get(*state)) {
int old = font_ascent();
cur_y -= font_ascent();
selected_font = current->font_added;
set_font();
if (cur_y + font_ascent() < cur_y + old) {
cur_y += old;
} else {
cur_y += font_ascent();
}
font_h = font_height();
}
break;
#endif /* BUILD_X11 */
case FG:
if (draw_mode == FG) { set_foreground_color(current->arg); }
break;
#ifdef BUILD_X11
case BG:
if (draw_mode == BG) { set_foreground_color(current->arg); }
break;
case OUTLINE:
if (draw_mode == OUTLINE) { set_foreground_color(current->arg); }
break;
case OFFSET:
w += current->arg;
break;
case VOFFSET:
cur_y += current->arg;
break;
case SAVE_COORDINATES:
saved_coordinates_x[static_cast<int>(current->arg)] =
cur_x - text_start_x;
saved_coordinates_y[static_cast<int>(current->arg)] =
cur_y - text_start_y - last_font_height;
break;
case TAB: {
int start = current->arg;
int step = current->width;
if ((step == 0) || step < 0) { step = 10; }
w = step - (cur_x - text_start_x - start) % step;
break;
}
case ALIGNR: {
/* TODO: add back in "+ window.border_inner_margin" to the end of
* this line? */
int pos_x = text_start_x + text_width -
get_string_width_special(s, special_index);
/* printf("pos_x %i text_start_x %i text_width %i cur_x %i "
"get_string_width(p) %i gap_x %i "
"current->arg %i window.border_inner_margin %i "
"window.border_width %i\n", pos_x, text_start_x, text_width,
cur_x, get_string_width_special(s), gap_x,
current->arg, window.border_inner_margin,
window.border_width); */
if (pos_x > current->arg && pos_x > cur_x) {
cur_x = pos_x - current->arg;
}
break;
}
case ALIGNC: {
int pos_x = (text_width) / 2 -
get_string_width_special(s, special_index) / 2 -
(cur_x - text_start_x);
/* int pos_x = text_start_x + text_width / 2 -
get_string_width_special(s) / 2; */
/* printf("pos_x %i text_start_x %i text_width %i cur_x %i "
"get_string_width(p) %i gap_x %i "
"current->arg %i\n", pos_x, text_start_x,
text_width, cur_x, get_string_width(s), gap_x,
current->arg); */
if (pos_x > current->arg) { w = pos_x - current->arg; }
break;
}
#endif /* BUILD_X11 */
case GOTO:
if (current->arg >= 0) {
#ifdef BUILD_X11
cur_x = static_cast<int>(current->arg);
// make sure shades are 1 pixel to the right of the text
if (draw_mode == BG) { cur_x++; }
#endif /* BUILD_X11 */
#ifdef BUILD_NCURSES
cur_x = static_cast<int>(current->arg);
if (out_to_ncurses.get(*state)) {
int x, y;
getyx(ncurses_window, y, x);
move(y, cur_x);
}
#endif /* BUILD_NCURSES */
}
break;
}
#ifdef BUILD_X11
cur_x += w;
#endif /* BUILD_X11 */
if (special_index != last_special_applied) {
special_index++;
} else {
special_index = orig_special_index;
last_special_applied = -1;
}
}
p++;
}
#ifdef BUILD_X11
cur_y += cur_y_add;
#endif /* BUILD_X11 */
draw_string(s);
#ifdef BUILD_NCURSES
if (out_to_ncurses.get(*state)) { printw("\n"); }
#endif /* BUILD_NCURSES */
#ifdef BUILD_X11
if (out_to_x.get(*state)) { cur_y += font_descent(); }
#endif /* BUILD_X11 */
return special_index;
}
static int draw_line(char *s, int special_index) {
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
return draw_each_line_inner(s, special_index, -1);
}
#endif /* BUILD_X11 */
#ifdef BUILD_NCURSES
if (out_to_ncurses.get(*state)) {
return draw_each_line_inner(s, special_index, -1);
}
#endif /* BUILD_NCURSES */
draw_string(s);
UNUSED(special_index);
return 0;
}
static void draw_text() {
#ifdef BUILD_HTTP
#define WEBPAGE_START1 \
"<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" " \
"\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n<html " \
"xmlns=\"http://www.w3.org/1999/xhtml\"><head><meta " \
"http-equiv=\"Content-type\" content=\"text/html;charset=UTF-8\" />"
#define WEBPAGE_START2 \
"<title>Conky</title></head><body style=\"font-family: monospace\"><p>"
#define WEBPAGE_END "</p></body></html>"
if (out_to_http.get(*state)) {
webpage = WEBPAGE_START1;
if (http_refresh.get(*state)) {
webpage.append("<meta http-equiv=\"refresh\" content=\"");
std::stringstream update_interval_str;
update_interval_str << update_interval.get(*state);
webpage.append(update_interval_str.str());
webpage.append("\" />");
}
webpage.append(WEBPAGE_START2);
}
#endif /* BUILD_HTTP */
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
cur_y = text_start_y;
int bw = border_width.get(*state);
/* draw borders */
if (draw_borders.get(*state) && bw > 0) {
if (stippled_borders.get(*state) != 0) {
char ss[2] = {stippled_borders.get(*state),
stippled_borders.get(*state)};
XSetLineAttributes(display, window.gc, bw, LineOnOffDash, CapButt,
JoinMiter);
XSetDashes(display, window.gc, 0, ss, 2);
} else {
XSetLineAttributes(display, window.gc, bw, LineSolid, CapButt,
JoinMiter);
}
int offset = border_inner_margin.get(*state) + bw;
XDrawRectangle(display, window.drawable, window.gc,
text_offset_x + text_start_x - offset,
text_offset_y + text_start_y - offset,
text_width + 2 * offset, text_height + 2 * offset);
}
/* draw text */
}
setup_fonts();
#endif /* BUILD_X11 */
#ifdef BUILD_NCURSES
init_pair(COLOR_WHITE, COLOR_WHITE, COLOR_BLACK);
attron(COLOR_PAIR(COLOR_WHITE));
#endif /* BUILD_NCURSES */
for_each_line(text_buffer, draw_line);
#ifdef BUILD_HTTP
if (out_to_http.get(*state)) { webpage.append(WEBPAGE_END); }
#endif /* BUILD_HTTP */
}
static void draw_stuff() {
#ifdef BUILD_X11
text_offset_x = text_offset_y = 0;
#ifdef BUILD_IMLIB2
cimlib_render(text_start_x, text_start_y, window.width, window.height);
#endif /* BUILD_IMLIB2 */
#endif /* BUILD_X11 */
if (static_cast<unsigned int>(!overwrite_file.get(*state).empty()) != 0u) {
overwrite_fpointer = fopen(overwrite_file.get(*state).c_str(), "we");
if (overwrite_fpointer == nullptr) {
NORM_ERR("Cannot overwrite '%s'", overwrite_file.get(*state).c_str());
}
}
if (static_cast<unsigned int>(!append_file.get(*state).empty()) != 0u) {
append_fpointer = fopen(append_file.get(*state).c_str(), "ae");
if (append_fpointer == nullptr) {
NORM_ERR("Cannot append to '%s'", append_file.get(*state).c_str());
}
}
#ifdef BUILD_X11
llua_draw_pre_hook();
if (out_to_x.get(*state)) {
selected_font = 0;
if (draw_shades.get(*state) && !draw_outline.get(*state)) {
text_offset_x = text_offset_y = 1;
text_start_y++;
set_foreground_color(default_shade_color.get(*state));
draw_mode = BG;
draw_text();
text_offset_x = text_offset_y = 0;
}
if (draw_outline.get(*state)) {
selected_font = 0;
for (text_offset_x = -1; text_offset_x < 2; text_offset_x++) {
for (text_offset_y = -1; text_offset_y < 2; text_offset_y++) {
if (text_offset_x == 0 && text_offset_y == 0) { continue; }
set_foreground_color(default_outline_color.get(*state));
draw_mode = OUTLINE;
draw_text();
}
}
text_offset_x = text_offset_y = 0;
}
set_foreground_color(default_color.get(*state));
}
#endif /* BUILD_X11 */
draw_mode = FG;
draw_text();
#if defined(BUILD_X11)
llua_draw_post_hook();
#if defined(BUILD_XDBE)
if (out_to_x.get(*state)) { xdbe_swap_buffers(); }
#else
if (out_to_x.get(*state)) { xpmdb_swap_buffers(); }
#endif
#endif /* BUILD_X11 && BUILD_XDBE */
if (overwrite_fpointer != nullptr) {
fclose(overwrite_fpointer);
overwrite_fpointer = nullptr;
}
if (append_fpointer != nullptr) {
fclose(append_fpointer);
append_fpointer = nullptr;
}
}
#ifdef BUILD_X11
static void clear_text(int exposures) {
#ifdef BUILD_XDBE
if (use_xdbe.get(*state)) {
/* The swap action is XdbeBackground, which clears */
return;
}
#else
if (use_xpmdb.get(*state)) {
return;
} else
#endif
if ((display != nullptr) &&
(window.window != 0u)) { // make sure these are !null
/* there is some extra space for borders and outlines */
int border_total = get_border_total();
XClearArea(display, window.window, text_start_x - border_total,
text_start_y - border_total, text_width + 2 * border_total,
text_height + 2 * border_total, exposures != 0 ? True : 0);
}
}
#endif /* BUILD_X11 */
static int need_to_update;
/* update_text() generates new text and clears old text area */
static void update_text() {
#ifdef BUILD_IMLIB2
cimlib_cleanup();
#endif /* BUILD_IMLIB2 */
generate_text();
#ifdef BUILD_X11
if (out_to_x.get(*state)) { clear_text(1); }
#endif /* BUILD_X11 */
need_to_update = 1;
llua_update_info(&info, active_update_interval());
}
#ifdef HAVE_SYS_INOTIFY_H
int inotify_fd = -1;
#endif
template <typename Out>
void split(const std::string &s, char delim, Out result) {
std::stringstream ss(s);
std::string item;
while (std::getline(ss, item, delim)) { *(result++) = item; }
}
std::vector<std::string> split(const std::string &s, char delim) {
std::vector<std::string> elems;
split(s, delim, std::back_inserter(elems));
return elems;
}
bool is_on_battery() { // checks if at least one battery specified in
// "detect_battery" is discharging
char buf[64];
std::vector<std::string> b_items = split(detect_battery.get(*state), ',');
for (auto const &value : b_items) {
get_battery_short_status(buf, 64, value.c_str());
if (buf[0] == 'D') { return true; }
}
return false;
}
volatile sig_atomic_t g_sigterm_pending, g_sighup_pending, g_sigusr2_pending;
void main_loop() {
int terminate = 0;
#ifdef SIGNAL_BLOCKING
sigset_t newmask, oldmask;
#endif
#ifdef BUILD_X11
double t;
#endif /* BUILD_X11 */
#ifdef HAVE_SYS_INOTIFY_H
int inotify_config_wd = -1;
#define INOTIFY_EVENT_SIZE (sizeof(struct inotify_event))
#define INOTIFY_BUF_LEN (20 * (INOTIFY_EVENT_SIZE + 16)) + 1
char inotify_buff[INOTIFY_BUF_LEN];
#endif /* HAVE_SYS_INOTIFY_H */
#ifdef SIGNAL_BLOCKING
sigemptyset(&newmask);
sigaddset(&newmask, SIGINT);
sigaddset(&newmask, SIGTERM);
sigaddset(&newmask, SIGUSR1);
#endif
last_update_time = 0.0;
next_update_time = get_time() - fmod(get_time(), active_update_interval());
info.looped = 0;
while (terminate == 0 && (total_run_times.get(*state) == 0 ||
info.looped < total_run_times.get(*state))) {
if ((update_interval_on_battery.get(*state) != NOBATTERY)) {
on_battery = is_on_battery();
}
info.looped++;
#ifdef SIGNAL_BLOCKING
/* block signals. we will inspect for pending signals later */
if (sigprocmask(SIG_BLOCK, &newmask, &oldmask) < 0) {
CRIT_ERR(nullptr, NULL, "unable to sigprocmask()");
}
#endif
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
/* wait for X event or timeout */
if (XPending(display) == 0) {
fd_set fdsr;
struct timeval tv {};
int s;
t = next_update_time - get_time();
t = std::min(std::max(t, 0.0), active_update_interval());
tv.tv_sec = static_cast<long>(t);
tv.tv_usec = static_cast<long>(t * 1000000) % 1000000;
FD_ZERO(&fdsr);
FD_SET(ConnectionNumber(display), &fdsr);
s = select(ConnectionNumber(display) + 1, &fdsr, nullptr, nullptr, &tv);
if (s == -1) {
if (errno != EINTR) {
NORM_ERR("can't select(): %s", strerror(errno));
}
} else {
/* timeout */
if (s == 0) { update_text(); }
}
}
if (need_to_update != 0) {
#ifdef OWN_WINDOW
int wx = window.x, wy = window.y;
#endif
need_to_update = 0;
selected_font = 0;
update_text_area();
#ifdef OWN_WINDOW
if (own_window.get(*state)) {
int changed = 0;
int border_total = get_border_total();
/* resize window if it isn't right size */
if ((fixed_size == 0) &&
(text_width + 2 * border_total != window.width ||
text_height + 2 * border_total != window.height)) {
window.width = text_width + 2 * border_total;
window.height = text_height + 2 * border_total;
draw_stuff(); /* redraw everything in our newly sized window */
XResizeWindow(display, window.window, window.width,
window.height); /* resize window */
set_transparent_background(window.window);
#ifdef BUILD_XDBE
/* swap buffers */
xdbe_swap_buffers();
#else
if (use_xpmdb.get(*state)) {
XFreePixmap(display, window.back_buffer);
window.back_buffer =
XCreatePixmap(display, window.window, window.width,
window.height, DefaultDepth(display, screen));
if (window.back_buffer != None) {
window.drawable = window.back_buffer;
} else {
// this is probably reallllly bad
NORM_ERR("Failed to allocate back buffer");
}
XSetForeground(display, window.gc, 0);
XFillRectangle(display, window.drawable, window.gc, 0, 0,
window.width, window.height);
}
#endif
changed++;
/* update lua window globals */
llua_update_window_table(text_start_x, text_start_y, text_width,
text_height);
}
/* move window if it isn't in right position */
if ((fixed_pos == 0) && (window.x != wx || window.y != wy)) {
XMoveWindow(display, window.window, window.x, window.y);
changed++;
}
/* update struts */
if ((changed != 0) && own_window_type.get(*state) == TYPE_PANEL) {
int sidenum = -1;
DBGP("%s", _(PACKAGE_NAME ": defining struts\n"));
fflush(stderr);
switch (text_alignment.get(*state)) {
case TOP_LEFT:
case TOP_RIGHT:
case TOP_MIDDLE: {
sidenum = 2;
break;
}
case BOTTOM_LEFT:
case BOTTOM_RIGHT:
case BOTTOM_MIDDLE: {
sidenum = 3;
break;
}
case MIDDLE_LEFT: {
sidenum = 0;
break;
}
case MIDDLE_RIGHT: {
sidenum = 1;
break;
}
case NONE:
case MIDDLE_MIDDLE: /* XXX What about these? */;
}
set_struts(sidenum);
}
}
#endif
clear_text(1);
#if defined(BUILD_XDBE)
if (use_xdbe.get(*state)) {
#else
if (use_xpmdb.get(*state)) {
#endif
XRectangle r;
int border_total = get_border_total();
r.x = text_start_x - border_total;
r.y = text_start_y - border_total;
r.width = text_width + 2 * border_total;
r.height = text_height + 2 * border_total;
XUnionRectWithRegion(&r, x11_stuff.region, x11_stuff.region);
}
}
/* handle X events */
while (XPending(display) != 0) {
XEvent ev;
XNextEvent(display, &ev);
switch (ev.type) {
case Expose: {
XRectangle r;
r.x = ev.xexpose.x;
r.y = ev.xexpose.y;
r.width = ev.xexpose.width;
r.height = ev.xexpose.height;
XUnionRectWithRegion(&r, x11_stuff.region, x11_stuff.region);
XSync(display, False);
break;
}
case PropertyNotify: {
if (ev.xproperty.state == PropertyNewValue) {
get_x11_desktop_info(ev.xproperty.display, ev.xproperty.atom);
}
#ifdef USE_ARGB
if (!have_argb_visual) {
#endif
if (ev.xproperty.atom == ATOM(_XROOTPMAP_ID) ||
ev.xproperty.atom == ATOM(_XROOTMAP_ID)) {
if (forced_redraw.get(*state)) {
draw_stuff();
next_update_time = get_time();
need_to_update = 1;
}
}
#ifdef USE_ARGB
}
#endif
break;
}
#ifdef OWN_WINDOW
case ReparentNotify:
/* make background transparent */
if (own_window.get(*state)) {
set_transparent_background(window.window);
}
break;
case ConfigureNotify:
if (own_window.get(*state)) {
/* if window size isn't what expected, set fixed size */
if (ev.xconfigure.width != window.width ||
ev.xconfigure.height != window.height) {
if (window.width != 0 && window.height != 0) { fixed_size = 1; }
/* clear old stuff before screwing up
* size and pos */
clear_text(1);
{
XWindowAttributes attrs;
if (XGetWindowAttributes(display, window.window, &attrs) !=
0) {
window.width = attrs.width;
window.height = attrs.height;
}
}
int border_total = get_border_total();
text_width = window.width - 2 * border_total;
text_height = window.height - 2 * border_total;
int mw = maximum_width.get(*state);
if (text_width > mw && mw > 0) { text_width = mw; }
}
/* if position isn't what expected, set fixed pos
* total_updates avoids setting fixed_pos when window
* is set to weird locations when started */
/* // this is broken
if (total_updates >= 2 && !fixed_pos
&& (window.x != ev.xconfigure.x
|| window.y != ev.xconfigure.y)
&& (ev.xconfigure.x != 0
|| ev.xconfigure.y != 0)) {
fixed_pos = 1;
} */
}
break;
case ButtonPress:
if (own_window.get(*state)) {
/* if an ordinary window with decorations */
if ((own_window_type.get(*state) == TYPE_NORMAL &&
!TEST_HINT(own_window_hints.get(*state),
HINT_UNDECORATED)) ||
own_window_type.get(*state) == TYPE_DESKTOP) {
/* allow conky to hold input focus. */
break;
}
/* forward the click to the desktop window */
XUngrabPointer(display, ev.xbutton.time);
ev.xbutton.window = window.desktop;
ev.xbutton.x = ev.xbutton.x_root;
ev.xbutton.y = ev.xbutton.y_root;
XSendEvent(display, ev.xbutton.window, False, ButtonPressMask,
&ev);
XSetInputFocus(display, ev.xbutton.window, RevertToParent,
ev.xbutton.time);
}
break;
case ButtonRelease:
if (own_window.get(*state)) {
/* if an ordinary window with decorations */
if ((own_window_type.get(*state) == TYPE_NORMAL) &&
!TEST_HINT(own_window_hints.get(*state), HINT_UNDECORATED)) {
/* allow conky to hold input focus. */
break;
}
/* forward the release to the desktop window */
ev.xbutton.window = window.desktop;
ev.xbutton.x = ev.xbutton.x_root;
ev.xbutton.y = ev.xbutton.y_root;
XSendEvent(display, ev.xbutton.window, False, ButtonReleaseMask,
&ev);
}
break;
#endif
default:
#ifdef BUILD_XDAMAGE
if (ev.type == x11_stuff.event_base + XDamageNotify) {
auto *dev = reinterpret_cast<XDamageNotifyEvent *>(&ev);
XFixesSetRegion(display, x11_stuff.part, &dev->area, 1);
XFixesUnionRegion(display, x11_stuff.region2, x11_stuff.region2,
x11_stuff.part);
}
#endif /* BUILD_XDAMAGE */
break;
}
}
#ifdef BUILD_XDAMAGE
if (x11_stuff.damage) {
XDamageSubtract(display, x11_stuff.damage, x11_stuff.region2, None);
XFixesSetRegion(display, x11_stuff.region2, nullptr, 0);
}
#endif /* BUILD_XDAMAGE */
/* XDBE doesn't seem to provide a way to clear the back buffer
* without interfering with the front buffer, other than passing
* XdbeBackground to XdbeSwapBuffers. That means that if we're
* using XDBE, we need to redraw the text even if it wasn't part of
* the exposed area. OTOH, if we're not going to call draw_stuff at
* all, then no swap happens and we can safely do nothing. */
if (XEmptyRegion(x11_stuff.region) == 0) {
#if defined(BUILD_XDBE)
if (use_xdbe.get(*state)) {
#else
if (use_xpmdb.get(*state)) {
#endif
XRectangle r;
int border_total = get_border_total();
r.x = text_start_x - border_total;
r.y = text_start_y - border_total;
r.width = text_width + 2 * border_total;
r.height = text_height + 2 * border_total;
XUnionRectWithRegion(&r, x11_stuff.region, x11_stuff.region);
}
XSetRegion(display, window.gc, x11_stuff.region);
#ifdef BUILD_XFT
if (use_xft.get(*state)) {
XftDrawSetClip(window.xftdraw, x11_stuff.region);
}
#endif
draw_stuff();
XDestroyRegion(x11_stuff.region);
x11_stuff.region = XCreateRegion();
}
} else {
#endif /* BUILD_X11 */
struct timespec req, rem;
auto time_to_sleep = next_update_time - get_time();
auto seconds = static_cast<time_t>(std::floor(time_to_sleep));
auto nanos = (time_to_sleep - seconds) * 1000000000L;
req.tv_sec = seconds;
req.tv_nsec = nanos;
nanosleep(&req, &rem);
update_text();
draw_stuff();
#ifdef BUILD_NCURSES
if (out_to_ncurses.get(*state)) {
refresh();
clear();
}
#endif
#ifdef BUILD_X11
}
#endif /* BUILD_X11 */
#ifdef SIGNAL_BLOCKING
/* unblock signals of interest and let handler fly */
if (sigprocmask(SIG_SETMASK, &oldmask, nullptr) < 0) {
CRIT_ERR(nullptr, NULL, "unable to sigprocmask()");
}
#endif
if (g_sighup_pending != 0) {
g_sighup_pending = 0;
NORM_ERR("received SIGUSR1. reloading the config file.");
reload_config();
}
if (g_sigusr2_pending != 0) {
g_sigusr2_pending = 0;
// refresh view;
NORM_ERR("received SIGUSR2. refreshing.");
update_text();
draw_stuff();
#ifdef BUILD_NCURSES
if (out_to_ncurses.get(*state)) {
refresh();
clear();
}
#endif
}
if (g_sigterm_pending != 0) {
g_sigterm_pending = 0;
NORM_ERR("received SIGHUP, SIGINT, or SIGTERM to terminate. bye!");
terminate = 1;
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
XDestroyRegion(x11_stuff.region);
x11_stuff.region = nullptr;
#ifdef BUILD_XDAMAGE
if (x11_stuff.damage) {
XDamageDestroy(display, x11_stuff.damage);
XFixesDestroyRegion(display, x11_stuff.region2);
XFixesDestroyRegion(display, x11_stuff.part);
}
#endif /* BUILD_XDAMAGE */
}
#endif /* BUILD_X11 */
}
#ifdef HAVE_SYS_INOTIFY_H
if (!disable_auto_reload.get(*state) && inotify_fd != -1 &&
inotify_config_wd == -1 && !current_config.empty()) {
inotify_config_wd =
inotify_add_watch(inotify_fd, current_config.c_str(), IN_MODIFY);
}
if (!disable_auto_reload.get(*state) && inotify_fd != -1 &&
inotify_config_wd != -1 && !current_config.empty()) {
int len = 0, idx = 0;
fd_set descriptors;
struct timeval time_to_wait;
FD_ZERO(&descriptors);
FD_SET(inotify_fd, &descriptors);
time_to_wait.tv_sec = time_to_wait.tv_usec = 0;
select(inotify_fd + 1, &descriptors, nullptr, NULL, &time_to_wait);
if (FD_ISSET(inotify_fd, &descriptors)) {
/* process inotify events */
len = read(inotify_fd, inotify_buff, INOTIFY_BUF_LEN - 1);
inotify_buff[len] = 0;
while (len > 0 && idx < len) {
struct inotify_event *ev = (struct inotify_event *)&inotify_buff[idx];
if (ev->wd == inotify_config_wd &&
(ev->mask & IN_MODIFY || ev->mask & IN_IGNORED)) {
/* current_config should be reloaded */
NORM_ERR("'%s' modified, reloading...", current_config.c_str());
reload_config();
if (ev->mask & IN_IGNORED) {
/* for some reason we get IN_IGNORED here
* sometimes, so we need to re-add the watch */
inotify_config_wd = inotify_add_watch(
inotify_fd, current_config.c_str(), IN_MODIFY);
}
break;
} else {
llua_inotify_query(ev->wd, ev->mask);
}
idx += INOTIFY_EVENT_SIZE + ev->len;
}
}
} else if (disable_auto_reload.get(*state) && inotify_fd != -1) {
inotify_rm_watch(inotify_fd, inotify_config_wd);
close(inotify_fd);
inotify_fd = inotify_config_wd = -1;
}
#endif /* HAVE_SYS_INOTIFY_H */
llua_update_info(&info, active_update_interval());
}
clean_up(nullptr, nullptr);
#ifdef HAVE_SYS_INOTIFY_H
if (inotify_fd != -1) {
inotify_rm_watch(inotify_fd, inotify_config_wd);
close(inotify_fd);
inotify_fd = inotify_config_wd = -1;
}
#endif /* HAVE_SYS_INOTIFY_H */
}
/* reload the config file */
static void reload_config() {
struct stat sb {};
if ((stat(current_config.c_str(), &sb) != 0) ||
(!S_ISREG(sb.st_mode) && !S_ISLNK(sb.st_mode))) {
NORM_ERR(_("Config file '%s' is gone, continuing with config from "
"memory.\nIf you recreate this file sent me a SIGUSR1 to tell "
"me about it. ( kill -s USR1 %d )"),
current_config.c_str(), getpid());
return;
}
clean_up(nullptr, nullptr);
state = std::make_unique<lua::state>();
conky::export_symbols(*state);
sleep(1); /* slight pause */
initialisation(argc_copy, argv_copy);
}
#ifdef BUILD_X11
void clean_up_x11() {
if (window_created == 1) {
int border_total = get_border_total();
XClearArea(display, window.window, text_start_x - border_total,
text_start_y - border_total, text_width + 2 * border_total,
text_height + 2 * border_total, 0);
}
destroy_window();
free_fonts(utf8_mode.get(*state));
if (x11_stuff.region != nullptr) {
XDestroyRegion(x11_stuff.region);
x11_stuff.region = nullptr;
}
}
#endif
void free_specials(special_t *&current) {
if (current != nullptr) {
free_specials(current->next);
if (current->type == GRAPH) { free(current->graph); }
delete current;
current = nullptr;
}
clear_stored_graphs();
}
void clean_up_without_threads(void *memtofree1, void *memtofree2) {
free_and_zero(memtofree1);
free_and_zero(memtofree2);
free_and_zero(info.cpu_usage);
#ifdef BUILD_X11
if (out_to_x.get(*state)) {
clean_up_x11();
} else {
fonts.clear(); // in set_default_configurations a font is set but not
}
// loaded
#endif /* BUILD_X11 */
if (info.first_process != nullptr) {
free_all_processes();
info.first_process = nullptr;
}
free_text_objects(&global_root_object);
delete_block_and_zero(tmpstring1);
delete_block_and_zero(tmpstring2);
delete_block_and_zero(text_buffer);
free_and_zero(global_text);
#ifdef BUILD_PORT_MONITORS
tcp_portmon_clear();
#endif
llua_shutdown_hook();
#if defined BUILD_RSS
xmlCleanupParser();
#endif
free_specials(specials);
clear_net_stats();
clear_fs_stats();
clear_diskio_stats();
free_and_zero(global_cpu);
conky::cleanup_config_settings(*state);
state.reset();
}
void clean_up(void *memtofree1, void *memtofree2) {
/* free_update_callbacks(); XXX: some new equivalent of this? */
clean_up_without_threads(memtofree1, memtofree2);
}
static void set_default_configurations() {
update_uname();
info.memmax = 0;
top_cpu = 0;
top_mem = 0;
top_time = 0;
#ifdef BUILD_IOSTATS
top_io = 0;
#endif
top_running = 0;
#ifdef BUILD_XMMS2
info.xmms2.artist = nullptr;
info.xmms2.album = nullptr;
info.xmms2.title = nullptr;
info.xmms2.genre = nullptr;
info.xmms2.comment = nullptr;
info.xmms2.url = nullptr;
info.xmms2.status = nullptr;
info.xmms2.playlist = nullptr;
#endif /* BUILD_XMMS2 */
state->pushboolean(true);
#ifdef BUILD_X11
out_to_x.lua_set(*state);
#else
out_to_stdout.lua_set(*state);
#endif
info.users.number = 1;
}
#ifdef BUILD_X11
static void X11_create_window() {
if (out_to_x.get(*state)) {
setup_fonts();
load_fonts(utf8_mode.get(*state));
update_text_area(); /* to position text/window on screen */
#ifdef OWN_WINDOW
if (own_window.get(*state)) {
if (fixed_pos == 0) {
XMoveWindow(display, window.window, window.x, window.y);
}
set_transparent_background(window.window);
}
#endif
create_gc();
draw_stuff();
x11_stuff.region = XCreateRegion();
#ifdef BUILD_XDAMAGE
if (XDamageQueryExtension(display, &x11_stuff.event_base,
&x11_stuff.error_base) == 0) {
NORM_ERR("Xdamage extension unavailable");
x11_stuff.damage = 0;
} else {
x11_stuff.damage =
XDamageCreate(display, window.window, XDamageReportNonEmpty);
x11_stuff.region2 =
XFixesCreateRegionFromWindow(display, window.window, 0);
x11_stuff.part = XFixesCreateRegionFromWindow(display, window.window, 0);
}
#endif /* BUILD_XDAMAGE */
selected_font = 0;
update_text_area(); /* to get initial size of the window */
}
/* setup lua window globals */
llua_setup_window_table(text_start_x, text_start_y, text_width, text_height);
}
#endif /* BUILD_X11 */
void load_config_file() {
DBGP(_("reading contents from config file '%s'"), current_config.c_str());
lua::state &l = *state;
lua::stack_sentry s(l);
l.checkstack(2);
try {
#ifdef BUILD_BUILTIN_CONFIG
if (current_config == builtin_config_magic) {
l.loadstring(defconfig);
} else {
#endif
l.loadfile(current_config.c_str());
#ifdef BUILD_BUILTIN_CONFIG
}
#endif
} catch (lua::syntax_error &e) {
#define SYNTAX_ERR_READ_CONF "Syntax error (%s) while reading config file. "
#ifdef BUILD_OLD_CONFIG
NORM_ERR(_(SYNTAX_ERR_READ_CONF), e.what());
NORM_ERR(_("Assuming it's in old syntax and attempting conversion."));
// the strchr thingy skips the first line (#! /usr/bin/lua)
l.loadstring(strchr(convertconf, '\n'));
l.pushstring(current_config.c_str());
l.call(1, 1);
#else
char *syntaxerr;
if (asprintf(&syntaxerr, _(SYNTAX_ERR_READ_CONF), e.what())) {
std::string syntaxerrobj(syntaxerr);
free(syntaxerr);
throw conky::error(syntaxerrobj);
}
#endif
}
l.call(0, 0);
l.getglobal("conky");
l.getfield(-1, "text");
l.replace(-2);
if (l.type(-1) != lua::TSTRING) {
throw conky::error(_("missing text block in configuration"));
}
/* Remove \\-\n. */
l.gsub(l.tocstring(-1), "\\\n", "");
l.replace(-2);
global_text = strdup(l.tocstring(-1));
l.pop();
}
inline void reset_optind() {
#if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || \
defined(__OpenBSD__) || defined(__NetBSD__) || defined(__DragonFly__)
optind = optreset = 1;
#else
optind = 0;
#endif
}
void set_current_config() {
/* load current_config, CONFIG_FILE or SYSTEM_CONFIG_FILE */
struct stat s {};
if (current_config.empty()) {
/* Try to use personal config file first */
std::string buf = to_real_path(XDG_CONFIG_FILE);
if (stat(buf.c_str(), &s) == 0) { current_config = buf; }
}
if (current_config.empty()) {
/* Try to use personal config file first */
std::string buf = to_real_path(CONFIG_FILE);
if (stat(buf.c_str(), &s) == 0) { current_config = buf; }
}
/* Try to use system config file if personal config does not exist */
if (current_config.empty() && (stat(SYSTEM_CONFIG_FILE, &s) == 0)) {
current_config = SYSTEM_CONFIG_FILE;
}
/* No readable config found */
if (current_config.empty()) {
#define NOCFGFILEFOUND "no personal or system-wide config file found"
#ifdef BUILD_BUILTIN_CONFIG
current_config = builtin_config_magic;
NORM_ERR(NOCFGFILEFOUND ", using builtin default");
#else
throw conky::error(NOCFGFILEFOUND);
#endif
}
// "-" stands for "read from stdin"
if (current_config == "-") { current_config = "/dev/stdin"; }
}
/* : means that character before that takes an argument */
const char *getopt_string =
"vVqdDSs:t:u:i:hc:p:"
#ifdef BUILD_X11
"x:y:w:a:X:m:f:"
#ifdef OWN_WINDOW
"o"
#endif
"b"
#endif /* BUILD_X11 */
#ifdef BUILD_BUILTIN_CONFIG
"C"
#endif
;
const struct option longopts[] = {
{"help", 0, nullptr, 'h'}, {"version", 0, nullptr, 'V'},
{"quiet", 0, nullptr, 'q'}, {"debug", 0, nullptr, 'D'},
{"config", 1, nullptr, 'c'},
#ifdef BUILD_BUILTIN_CONFIG
{"print-config", 0, nullptr, 'C'},
#endif
{"daemonize", 0, nullptr, 'd'},
#ifdef BUILD_X11
{"alignment", 1, nullptr, 'a'}, {"display", 1, nullptr, 'X'},
{"xinerama-head", 1, nullptr, 'm'}, {"font", 1, nullptr, 'f'},
#ifdef OWN_WINDOW
{"own-window", 0, nullptr, 'o'},
#endif
{"double-buffer", 0, nullptr, 'b'}, {"window-id", 1, nullptr, 'w'},
#endif /* BUILD_X11 */
{"text", 1, nullptr, 't'}, {"interval", 1, nullptr, 'u'},
{"pause", 1, nullptr, 'p'}, {nullptr, 0, nullptr, 0}};
void setup_inotify() {
#ifdef HAVE_SYS_INOTIFY_H
// the file descriptor will be automatically closed on exit
inotify_fd = inotify_init();
if (inotify_fd != -1) {
fcntl(inotify_fd, F_SETFL, fcntl(inotify_fd, F_GETFL) | O_NONBLOCK);
fcntl(inotify_fd, F_SETFD, fcntl(inotify_fd, F_GETFD) | FD_CLOEXEC);
}
#endif /* HAVE_SYS_INOTIFY_H */
}
void initialisation(int argc, char **argv) {
struct sigaction act {
}, oact{};
clear_net_stats();
set_default_configurations();
set_current_config();
load_config_file();
/* handle other command line arguments */
reset_optind();
#if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
if ((kd = kvm_open("/dev/null", "/dev/null", "/dev/null", O_RDONLY,
"kvm_open")) == nullptr) {
CRIT_ERR(nullptr, NULL, "cannot read kvm");
}
#endif
while (1) {
int c = getopt_long(argc, argv, getopt_string, longopts, nullptr);
int startup_pause;
char *conv_end;
if (c == -1) { break; }
switch (c) {
case 'd':
state->pushboolean(true);
fork_to_background.lua_set(*state);
break;
#ifdef BUILD_X11
case 'f':
state->pushstring(optarg);
font.lua_set(*state);
break;
case 'a':
state->pushstring(optarg);
text_alignment.lua_set(*state);
break;
case 'm':
state->pushinteger(strtol(optarg, &conv_end, 10));
if (*conv_end != 0) {
CRIT_ERR(nullptr, nullptr, "'%s' is a wrong xinerama-head index",
optarg);
}
head_index.lua_set(*state);
break;
case 'X':
state->pushstring(optarg);
display_name.lua_set(*state);
break;
#ifdef OWN_WINDOW
case 'o':
state->pushboolean(true);
own_window.lua_set(*state);
break;
#endif
#ifdef BUILD_XDBE
case 'b':
state->pushboolean(true);
use_xdbe.lua_set(*state);
break;
#else
case 'b':
state->pushboolean(true);
use_xpmdb.lua_set(*state);
break;
#endif
#endif /* BUILD_X11 */
case 't':
free_and_zero(global_text);
global_text = strndup(optarg, max_user_text.get(*state));
convert_escapes(global_text);
break;
case 'u':
state->pushinteger(strtol(optarg, &conv_end, 10));
if (*conv_end != 0) {
CRIT_ERR(nullptr, nullptr, "'%s' is a wrong update-interval", optarg);
}
update_interval.lua_set(*state);
break;
case 'i':
state->pushinteger(strtol(optarg, &conv_end, 10));
if (*conv_end != 0) {
CRIT_ERR(nullptr, nullptr, "'%s' is a wrong number of update-times",
optarg);
}
total_run_times.lua_set(*state);
break;
#ifdef BUILD_X11
case 'x':
state->pushinteger(strtol(optarg, &conv_end, 10));
if (*conv_end != 0) {
CRIT_ERR(nullptr, nullptr, "'%s' is a wrong value for the X-position",
optarg);
}
gap_x.lua_set(*state);
break;
case 'y':
state->pushinteger(strtol(optarg, &conv_end, 10));
if (*conv_end != 0) {
CRIT_ERR(nullptr, nullptr, "'%s' is a wrong value for the Y-position",
optarg);
}
gap_y.lua_set(*state);
break;
#endif /* BUILD_X11 */
case 'p':
if (first_pass != 0) {
startup_pause = atoi(optarg);
sleep(startup_pause);
}
break;
case '?':
throw unknown_arg_throw();
}
}
conky::set_config_settings(*state);
#ifdef BUILD_X11
if (out_to_x.get(*state)) { current_text_color = default_color.get(*state); }
#endif
/* generate text and get initial size */
extract_variable_text(global_text);
free_and_zero(global_text);
/* fork */
if (fork_to_background.get(*state) && (first_pass != 0)) {
int pid = fork();
switch (pid) {
case -1:
NORM_ERR(PACKAGE_NAME ": couldn't fork() to background: %s",
strerror(errno));
break;
case 0:
/* child process */
usleep(25000);
fprintf(stderr, "\n");
fflush(stderr);
break;
default:
/* parent process */
fprintf(stderr, PACKAGE_NAME ": forked to background, pid is %d\n",
pid);
fflush(stderr);
throw fork_throw();
}
}
text_buffer = new char[max_user_text.get(*state)];
memset(text_buffer, 0, max_user_text.get(*state));
tmpstring1 = new char[text_buffer_size.get(*state)];
memset(tmpstring1, 0, text_buffer_size.get(*state));
tmpstring2 = new char[text_buffer_size.get(*state)];
memset(tmpstring2, 0, text_buffer_size.get(*state));
#ifdef BUILD_X11
X11_create_window();
#endif /* BUILD_X11 */
llua_setup_info(&info, active_update_interval());
/* Set signal handlers */
act.sa_handler = signal_handler;
sigemptyset(&act.sa_mask);
act.sa_flags = 0;
#ifdef SA_RESTART
act.sa_flags |= SA_RESTART;
#endif
if (sigaction(SIGINT, &act, &oact) < 0 ||
sigaction(SIGALRM, &act, &oact) < 0 ||
sigaction(SIGUSR1, &act, &oact) < 0 ||
sigaction(SIGUSR2, &act, &oact) < 0 ||
sigaction(SIGHUP, &act, &oact) < 0 ||
sigaction(SIGTERM, &act, &oact) < 0) {
NORM_ERR("error setting signal handler: %s", strerror(errno));
}
llua_startup_hook();
}
static void signal_handler(int sig) {
/* signal handler is light as a feather, as it should be.
* we will poll g_signal_pending with each loop of conky
* and do any signal processing there, NOT here */
switch (sig) {
case SIGHUP:
case SIGINT:
case SIGTERM:
g_sigterm_pending = 1;
break;
case SIGUSR1:
g_sighup_pending = 1;
break;
case SIGUSR2:
g_sigusr2_pending = 1;
default:
/* Reaching here means someone set a signal
* (SIGXXXX, signal_handler), but didn't write any code
* to deal with it.
* If you don't want to handle a signal, don't set a handler on
* it in the first place.
* We cannot print debug messages from a sighandler, so simply ignore.
*/
break;
}
}
View Git Blame Copy Permalink