const char *
gui_color_search_config (const char *color_name)
{
struct t_config_option *ptr_option;
if (color_name)
{
for (ptr_option = weechat_config_section_color->options;
ptr_option; ptr_option = ptr_option->next_option)
{
if (string_strcasecmp (ptr_option->name, color_name) == 0)
{
if (ptr_option->min < 0)
{
return gui_color_get_custom (
gui_color_get_name (CONFIG_COLOR(ptr_option)));
}
return GUI_COLOR(ptr_option->min);
}
}
}
/* color not found */
return NULL;
}
void
gui_cursor_display_debug_info ()
{
struct t_gui_focus_info *focus_info;
char str_info[1024];
if (!gui_cursor_debug)
return;
focus_info = gui_focus_get_info (gui_cursor_x, gui_cursor_y);
if (focus_info)
{
snprintf (str_info, sizeof (str_info),
"%s(%d,%d) window:0x%lx, buffer:0x%lx (%s), "
"bar_window:0x%lx (bar: %s, item: %s, line: %d, col: %d), "
"chat: %d, word: \"%s\"",
gui_color_get_custom ("yellow,red"),
focus_info->x, focus_info->y,
(long unsigned int)focus_info->window,
(long unsigned int)focus_info->buffer,
(focus_info->buffer) ? (focus_info->buffer)->full_name : "-",
(long unsigned int)focus_info->bar_window,
(focus_info->bar_window) ? ((focus_info->bar_window)->bar)->name : "-",
(focus_info->bar_item) ? focus_info->bar_item : "-",
focus_info->bar_item_line,
focus_info->bar_item_col,
focus_info->chat,
focus_info->chat_word);
gui_input_delete_line (gui_current_window->buffer);
gui_input_insert_string (gui_current_window->buffer, str_info, -1);
gui_focus_free_info (focus_info);
}
}
const char *
plugin_api_color (const char *color_name)
{
const char *str_color;
if (!color_name)
return GUI_NO_COLOR;
/* name is a weechat color option ? => then return this color */
str_color = gui_color_search_config (color_name);
if (str_color)
return str_color;
return gui_color_get_custom (color_name);
}
char *
eval_replace_vars_cb (void *data, const char *text)
{
struct t_hashtable *pointers, *extra_vars;
struct t_eval_regex *eval_regex;
struct t_config_option *ptr_option;
struct t_gui_buffer *ptr_buffer;
char str_value[512], *value, *pos, *pos1, *pos2, *hdata_name, *list_name;
char *tmp, *info_name, *hide_char, *hidden_string, *error;
const char *prefix, *suffix, *ptr_value, *ptr_arguments, *ptr_string;
struct t_hdata *hdata;
void *pointer;
int i, length_hide_char, length, index, rc, extra_vars_eval;
long number;
long unsigned int ptr;
time_t date;
struct tm *date_tmp;
pointers = (struct t_hashtable *)(((void **)data)[0]);
extra_vars = (struct t_hashtable *)(((void **)data)[1]);
extra_vars_eval = *(int *)(((void **)data)[2]);
prefix = (const char *)(((void **)data)[3]);
suffix = (const char *)(((void **)data)[4]);
eval_regex = (struct t_eval_regex *)(((void **)data)[5]);
/* 1. variable in hashtable "extra_vars" */
if (extra_vars)
{
ptr_value = hashtable_get (extra_vars, text);
if (ptr_value)
{
if (extra_vars_eval)
{
return eval_replace_vars (ptr_value, pointers,
extra_vars, extra_vars_eval,
prefix, suffix,
eval_regex);
}
else
{
return strdup (ptr_value);
}
}
}
/*
* 2. force evaluation of string (recursive call)
* --> use with caution: the text must be safe!
*/
if (strncmp (text, "eval:", 5) == 0)
{
return eval_replace_vars (text + 5, pointers,
extra_vars, extra_vars_eval,
prefix, suffix,
eval_regex);
}
/* 3. convert escaped chars */
if (strncmp (text, "esc:", 4) == 0)
return string_convert_escaped_chars (text + 4);
if ((text[0] == '\\') && text[1] && (text[1] != '\\'))
return string_convert_escaped_chars (text);
/* 4. hide chars: replace all chars by a given char/string */
if (strncmp (text, "hide:", 5) == 0)
{
hidden_string = NULL;
ptr_string = strchr (text + 5,
(text[5] == ',') ? ';' : ',');
if (!ptr_string)
return strdup ("");
hide_char = string_strndup (text + 5, ptr_string - text - 5);
if (hide_char)
{
length_hide_char = strlen (hide_char);
length = utf8_strlen (ptr_string + 1);
hidden_string = malloc ((length * length_hide_char) + 1);
if (hidden_string)
{
index = 0;
for (i = 0; i < length; i++)
{
memcpy (hidden_string + index, hide_char,
length_hide_char);
index += length_hide_char;
}
hidden_string[length * length_hide_char] = '\0';
}
free (hide_char);
}
return (hidden_string) ? hidden_string : strdup ("");
}
/* 5. regex group captured */
if (strncmp (text, "re:", 3) == 0)
{
if (eval_regex && eval_regex->result)
{
if (strcmp (text + 3, "+") == 0)
number = eval_regex->last_match;
else
{
number = strtol (text + 3, &error, 10);
if (!error || error[0])
number = -1;
}
if ((number >= 0) && (number <= eval_regex->last_match))
{
return string_strndup (
eval_regex->result + eval_regex->match[number].rm_so,
eval_regex->match[number].rm_eo - eval_regex->match[number].rm_so);
}
}
return strdup ("");
}
/* 6. color code */
if (strncmp (text, "color:", 6) == 0)
{
ptr_value = gui_color_search_config (text + 6);
if (ptr_value)
return strdup (ptr_value);
ptr_value = gui_color_get_custom (text + 6);
return strdup ((ptr_value) ? ptr_value : "");
}
/* 7. info */
if (strncmp (text, "info:", 5) == 0)
{
ptr_value = NULL;
ptr_arguments = strchr (text + 5, ',');
if (ptr_arguments)
{
info_name = string_strndup (text + 5, ptr_arguments - text - 5);
ptr_arguments++;
}
else
info_name = strdup (text + 5);
if (info_name)
{
ptr_value = hook_info_get (NULL, info_name, ptr_arguments);
free (info_name);
}
return strdup ((ptr_value) ? ptr_value : "");
}
/* 8. current date/time */
if ((strncmp (text, "date", 4) == 0) && (!text[4] || (text[4] == ':')))
{
date = time (NULL);
date_tmp = localtime (&date);
if (!date_tmp)
return strdup ("");
rc = (int) strftime (str_value, sizeof (str_value),
(text[4] == ':') ? text + 5 : "%F %T",
date_tmp);
return strdup ((rc > 0) ? str_value : "");
}
/* 9. environment variable */
if (strncmp (text, "env:", 4) == 0)
{
ptr_value = getenv (text + 4);
if (ptr_value)
return strdup (ptr_value);
}
/* 10. option: if found, return this value */
if (strncmp (text, "sec.data.", 9) == 0)
{
ptr_value = hashtable_get (secure_hashtable_data, text + 9);
return strdup ((ptr_value) ? ptr_value : "");
}
else
{
config_file_search_with_string (text, NULL, NULL, &ptr_option, NULL);
if (ptr_option)
{
if (!ptr_option->value)
return strdup ("");
switch (ptr_option->type)
{
case CONFIG_OPTION_TYPE_BOOLEAN:
return strdup (CONFIG_BOOLEAN(ptr_option) ? EVAL_STR_TRUE : EVAL_STR_FALSE);
case CONFIG_OPTION_TYPE_INTEGER:
if (ptr_option->string_values)
return strdup (ptr_option->string_values[CONFIG_INTEGER(ptr_option)]);
snprintf (str_value, sizeof (str_value),
"%d", CONFIG_INTEGER(ptr_option));
return strdup (str_value);
case CONFIG_OPTION_TYPE_STRING:
return strdup (CONFIG_STRING(ptr_option));
case CONFIG_OPTION_TYPE_COLOR:
return strdup (gui_color_get_name (CONFIG_COLOR(ptr_option)));
case CONFIG_NUM_OPTION_TYPES:
return strdup ("");
}
}
}
/* 11. local variable in buffer */
ptr_buffer = hashtable_get (pointers, "buffer");
if (ptr_buffer)
{
ptr_value = hashtable_get (ptr_buffer->local_variables, text);
if (ptr_value)
return strdup (ptr_value);
}
/* 12. hdata */
value = NULL;
hdata_name = NULL;
list_name = NULL;
pointer = NULL;
pos = strchr (text, '.');
if (pos > text)
hdata_name = string_strndup (text, pos - text);
else
hdata_name = strdup (text);
if (!hdata_name)
goto end;
pos1 = strchr (hdata_name, '[');
if (pos1 > hdata_name)
{
pos2 = strchr (pos1 + 1, ']');
if (pos2 > pos1 + 1)
{
list_name = string_strndup (pos1 + 1, pos2 - pos1 - 1);
}
tmp = string_strndup (hdata_name, pos1 - hdata_name);
if (tmp)
{
free (hdata_name);
hdata_name = tmp;
}
}
hdata = hook_hdata_get (NULL, hdata_name);
if (!hdata)
goto end;
if (list_name)
{
if (strncmp (list_name, "0x", 2) == 0)
{
rc = sscanf (list_name, "%lx", &ptr);
if ((rc != EOF) && (rc != 0))
{
pointer = (void *)ptr;
if (!hdata_check_pointer (hdata, NULL, pointer))
goto end;
}
else
goto end;
}
else
pointer = hdata_get_list (hdata, list_name);
}
if (!pointer)
{
pointer = hashtable_get (pointers, hdata_name);
if (!pointer)
goto end;
}
value = eval_hdata_get_value (hdata, pointer, (pos) ? pos + 1 : NULL);
end:
if (hdata_name)
free (hdata_name);
if (list_name)
free (list_name);
return (value) ? value : strdup ("");
}
void
gui_color_buffer_display ()
{
int y, i, lines, line, col, color, max_color, num_items;
char str_line[1024], str_color[64], str_rgb[64], **items;
struct t_gui_color_palette *color_palette;
if (!gui_color_buffer)
return;
gui_buffer_clear (gui_color_buffer);
/* set title buffer */
gui_buffer_set_title (gui_color_buffer,
_("WeeChat colors | Actions: "
"[e] Display extra infos [r] Refresh "
"[z] Reset colors [q] Close buffer | "
"Keys: [alt-c] Temporarily switch to terminal "
"colors"));
/* display terminal/colors infos */
y = 0;
gui_color_info_term_colors (str_line, sizeof (str_line));
gui_chat_printf_y (gui_color_buffer, y++, "%s", str_line);
/* display palette of colors */
y++;
if (gui_color_use_term_colors)
{
gui_color_buffer_display_timer ();
y++;
}
else
{
gui_chat_printf_y (gui_color_buffer, y++,
_("WeeChat color pairs (in use: %d, left: %d):"),
gui_color_pairs_used,
gui_color_num_pairs - gui_color_pairs_used);
}
max_color = (gui_color_use_term_colors) ?
gui_color_term_colors - 1 : gui_color_num_pairs;
if (max_color > 255)
max_color = 255;
lines = (max_color <= 64) ? 8 : 16;
for (line = 0; line < lines; line++)
{
str_line[0] = '\0';
for (col = 0; col < 16; col++)
{
color = (col * lines) + line;
if (color <= max_color)
{
if (color == 0)
{
snprintf (str_color, sizeof (str_color),
" ");
}
else if (gui_color_use_term_colors
|| (color <= gui_color_pairs_used))
{
snprintf (str_color, sizeof (str_color),
"%c%c%05d%c%03d%c",
GUI_COLOR_COLOR_CHAR,
GUI_COLOR_EXTENDED_CHAR,
color,
(color == 0) ? '<' : ' ',
color,
(color == 0) ? '>' : ' ');
}
else
{
snprintf (str_color, sizeof (str_color),
"%s - ",
GUI_NO_COLOR);
}
strcat (str_line, str_color);
}
else
{
snprintf (str_color, sizeof (str_color),
"%s ",
GUI_COLOR(GUI_COLOR_CHAT));
strcat (str_line, str_color);
}
}
gui_chat_printf_y (gui_color_buffer, y++,
" %s",
str_line);
}
if (gui_color_buffer_extra_info)
{
/* display time of last auto reset of color pairs */
y++;
gui_chat_printf_y (gui_color_buffer, y++,
_("Last auto reset of pairs: %s"),
(gui_color_pairs_auto_reset_last == 0) ?
"-" : ctime (&gui_color_pairs_auto_reset_last));
/* display WeeChat basic colors */
y++;
gui_chat_printf_y (gui_color_buffer, y++,
_("WeeChat basic colors:"));
str_line[0] = '\0';
for (i = 0; i < GUI_CURSES_NUM_WEECHAT_COLORS; i++)
{
if (gui_color_use_term_colors)
{
snprintf (str_color, sizeof (str_color),
" %s",
gui_weechat_colors[i].string);
}
else
{
snprintf (str_color, sizeof (str_color),
"%c%c%02d %s",
GUI_COLOR_COLOR_CHAR,
GUI_COLOR_FG_CHAR,
i,
gui_weechat_colors[i].string);
}
if (gui_chat_strlen_screen (str_line) + gui_chat_strlen_screen (str_color) > 80)
{
gui_chat_printf_y (gui_color_buffer, y++,
" %s", str_line);
str_line[0] = '\0';
}
strcat (str_line, str_color);
}
if (str_line[0])
{
gui_chat_printf_y (gui_color_buffer, y++,
" %s", str_line);
}
/* display nick colors */
y++;
gui_chat_printf_y (gui_color_buffer, y++,
_("Nick colors:"));
items = string_split (CONFIG_STRING(config_color_chat_nick_colors),
",", 0, 0, &num_items);
if (items)
{
str_line[0] = '\0';
for (i = 0; i < num_items; i++)
{
if (gui_color_use_term_colors)
{
snprintf (str_color, sizeof (str_color),
" %s",
items[i]);
}
else
{
snprintf (str_color, sizeof (str_color),
"%s %s",
gui_color_get_custom (items[i]),
items[i]);
}
if (gui_chat_strlen_screen (str_line) + gui_chat_strlen_screen (str_color) > 80)
{
gui_chat_printf_y (gui_color_buffer, y++,
" %s", str_line);
str_line[0] = '\0';
}
strcat (str_line, str_color);
}
if (str_line[0])
{
gui_chat_printf_y (gui_color_buffer, y++,
" %s", str_line);
}
string_free_split (items);
}
/* display palette colors */
if (gui_color_hash_palette_color->items_count > 0)
{
y++;
gui_chat_printf_y (gui_color_buffer, y++,
_("Color aliases:"));
for (i = 1; i <= gui_color_num_pairs; i++)
{
color_palette = gui_color_palette_get (i);
if (color_palette)
{
str_color[0] = '\0';
if (!gui_color_use_term_colors)
{
snprintf (str_color, sizeof (str_color),
"%c%c%c%05d",
GUI_COLOR_COLOR_CHAR,
GUI_COLOR_FG_CHAR,
GUI_COLOR_EXTENDED_CHAR,
i);
}
str_rgb[0] = '\0';
if ((color_palette->r >= 0) && (color_palette->g >= 0)
&& (color_palette->b >= 0))
{
snprintf (str_rgb, sizeof (str_rgb),
" (%d/%d/%d)",
color_palette->r,
color_palette->g,
color_palette->b);
}
gui_chat_printf_y (gui_color_buffer, y++,
" %5d: %s%s%s",
i,
str_color,
(color_palette->alias) ? color_palette->alias : "",
str_rgb);
}
}
}
/* display content of colors */
if (gui_color_term_color_content)
{
y++;
gui_chat_printf_y (gui_color_buffer, y++,
_("Content of colors (r/g/b):"));
for (i = 0; i < gui_color_term_colors; i++)
{
gui_chat_printf_y (gui_color_buffer, y++,
" %3d: %4hd / %4hd / %4hd",
i,
gui_color_term_color_content[i * 3],
gui_color_term_color_content[(i* 3) + 1],
gui_color_term_color_content[(i* 3) + 2]);
}
}
}
}
char *
eval_replace_vars_cb (void *data, const char *text)
{
struct t_hashtable *pointers, *extra_vars;
struct t_config_option *ptr_option;
struct t_gui_buffer *ptr_buffer;
char str_value[64], *value, *pos, *pos1, *pos2, *hdata_name, *list_name;
char *tmp, *info_name, *hide_char, *hidden_string;
const char *ptr_value, *ptr_arguments, *ptr_string;
struct t_hdata *hdata;
void *pointer;
int i, length_hide_char, length, index;
pointers = (struct t_hashtable *)(((void **)data)[0]);
extra_vars = (struct t_hashtable *)(((void **)data)[1]);
/* 1. look for var in hashtable "extra_vars" */
if (extra_vars)
{
ptr_value = hashtable_get (extra_vars, text);
if (ptr_value)
return strdup (ptr_value);
}
/* 2. convert escaped chars */
if (strncmp (text, "esc:", 4) == 0)
return string_convert_escaped_chars (text + 4);
if ((text[0] == '\\') && text[1] && (text[1] != '\\'))
return string_convert_escaped_chars (text);
/* 3. hide chars: replace all chars by a given char */
if (strncmp (text, "hide:", 5) == 0)
{
hidden_string = NULL;
ptr_string = strchr (text + 5,
(text[5] == ',') ? ';' : ',');
if (!ptr_string)
return strdup ("");
hide_char = string_strndup (text + 5, ptr_string - text - 5);
if (hide_char)
{
length_hide_char = strlen (hide_char);
length = utf8_strlen (ptr_string + 1);
hidden_string = malloc ((length * length_hide_char) + 1);
if (hidden_string)
{
index = 0;
for (i = 0; i < length; i++)
{
memcpy (hidden_string + index, hide_char,
length_hide_char);
index += length_hide_char;
}
hidden_string[length * length_hide_char] = '\0';
}
free (hide_char);
}
return (hidden_string) ? hidden_string : strdup ("");
}
/* 4. look for a color */
if (strncmp (text, "color:", 6) == 0)
{
ptr_value = gui_color_get_custom (text + 6);
return strdup ((ptr_value) ? ptr_value : "");
}
/* 5. look for an info */
if (strncmp (text, "info:", 5) == 0)
{
ptr_value = NULL;
ptr_arguments = strchr (text + 5, ',');
if (ptr_arguments)
{
info_name = string_strndup (text + 5, ptr_arguments - text - 5);
ptr_arguments++;
}
else
info_name = strdup (text + 5);
if (info_name)
{
ptr_value = hook_info_get (NULL, info_name, ptr_arguments);
free (info_name);
}
return strdup ((ptr_value) ? ptr_value : "");
}
/* 6. look for name of option: if found, return this value */
if (strncmp (text, "sec.data.", 9) == 0)
{
ptr_value = hashtable_get (secure_hashtable_data, text + 9);
return strdup ((ptr_value) ? ptr_value : "");
}
else
{
config_file_search_with_string (text, NULL, NULL, &ptr_option, NULL);
if (ptr_option)
{
if (!ptr_option->value)
return strdup ("");
switch (ptr_option->type)
{
case CONFIG_OPTION_TYPE_BOOLEAN:
return strdup (CONFIG_BOOLEAN(ptr_option) ? EVAL_STR_TRUE : EVAL_STR_FALSE);
case CONFIG_OPTION_TYPE_INTEGER:
if (ptr_option->string_values)
return strdup (ptr_option->string_values[CONFIG_INTEGER(ptr_option)]);
snprintf (str_value, sizeof (str_value),
"%d", CONFIG_INTEGER(ptr_option));
return strdup (str_value);
case CONFIG_OPTION_TYPE_STRING:
return strdup (CONFIG_STRING(ptr_option));
case CONFIG_OPTION_TYPE_COLOR:
return strdup (gui_color_get_name (CONFIG_COLOR(ptr_option)));
case CONFIG_NUM_OPTION_TYPES:
return strdup ("");
}
}
}
/* 7. look for local variable in buffer */
ptr_buffer = hashtable_get (pointers, "buffer");
if (ptr_buffer)
{
ptr_value = hashtable_get (ptr_buffer->local_variables, text);
if (ptr_value)
return strdup (ptr_value);
}
/* 8. look for hdata */
value = NULL;
hdata_name = NULL;
list_name = NULL;
pointer = NULL;
pos = strchr (text, '.');
if (pos > text)
hdata_name = string_strndup (text, pos - text);
else
hdata_name = strdup (text);
if (!hdata_name)
goto end;
pos1 = strchr (hdata_name, '[');
if (pos1 > hdata_name)
{
pos2 = strchr (pos1 + 1, ']');
if (pos2 > pos1 + 1)
{
list_name = string_strndup (pos1 + 1, pos2 - pos1 - 1);
}
tmp = string_strndup (hdata_name, pos1 - hdata_name);
if (tmp)
{
free (hdata_name);
hdata_name = tmp;
}
}
hdata = hook_hdata_get (NULL, hdata_name);
if (!hdata)
goto end;
if (list_name)
pointer = hdata_get_list (hdata, list_name);
if (!pointer)
{
pointer = hashtable_get (pointers, hdata_name);
if (!pointer)
goto end;
}
value = eval_hdata_get_value (hdata, pointer, (pos) ? pos + 1 : NULL);
end:
if (hdata_name)
free (hdata_name);
if (list_name)
free (list_name);
return (value) ? value : strdup ("");
}
char *
gui_color_emphasize (const char *string,
const char *search, int case_sensitive,
regex_t *regex)
{
regmatch_t regex_match;
char *result, *result2, *string_no_color, *pos;
const char *ptr_string, *ptr_no_color, *color_emphasis;
int rc, length_search, length_emphasis, length_result;
int pos1, pos2, real_pos1, real_pos2, count_emphasis;
if (!string && !regex)
return NULL;
color_emphasis = gui_color_get_custom ("emphasis");
if (!color_emphasis)
return NULL;
length_emphasis = strlen (color_emphasis);
/*
* allocate space for 8 emphasized strings (8 before + 8 after = 16);
* more space will be allocated later (if there are more than 8 emphasized
* strings)
*/
length_result = strlen (string) + (length_emphasis * 2 * 8) + 1;
result = malloc (length_result);
if (!result)
return NULL;
result[0] = '\0';
/*
* build a string without color codes to search in this one (then with the
* position of text found, we will retrieve position in original string,
* which can contain color codes)
*/
string_no_color = gui_color_decode (string, NULL);
if (!string_no_color)
{
free (result);
return NULL;
}
length_search = (search) ? strlen (search) : 0;
ptr_string = string;
ptr_no_color = string_no_color;
count_emphasis = 0;
while (ptr_no_color && ptr_no_color[0])
{
if (regex)
{
/* search next match using the regex */
regex_match.rm_so = -1;
rc = regexec (regex, ptr_no_color, 1, ®ex_match, 0);
/*
* no match found: exit the loop (if rm_no == 0, it is an empty
* match at beginning of string: we consider there is no match, to
* prevent an infinite loop)
*/
if ((rc != 0) || (regex_match.rm_so < 0) || (regex_match.rm_eo <= 0))
{
strcat (result, ptr_string);
break;
}
pos1 = regex_match.rm_so;
pos2 = regex_match.rm_eo;
}
else
{
/* search next match in the string */
if (case_sensitive)
pos = strstr (ptr_no_color, search);
else
pos = string_strcasestr (ptr_no_color, search);
if (!pos)
{
strcat (result, ptr_string);
break;
}
pos1 = pos - ptr_no_color;
pos2 = pos1 + length_search;
if (pos2 <= 0)
{
strcat (result, ptr_string);
break;
}
}
/*
* find the position of match in the original string (which can contain
* color codes)
*/
real_pos1 = gui_chat_string_real_pos (ptr_string,
gui_chat_string_pos (ptr_no_color, pos1));
real_pos2 = gui_chat_string_real_pos (ptr_string,
gui_chat_string_pos (ptr_no_color, pos2));
/*
* concatenate following strings to the result:
* - beginning of string (before match)
* - emphasis color code
* - the matching string
* - emphasis color code
*/
if (real_pos1 > 0)
strncat (result, ptr_string, real_pos1);
strcat (result, color_emphasis);
strncat (result, ptr_string + real_pos1, real_pos2 - real_pos1);
strcat (result, color_emphasis);
/* restart next loop after the matching string */
ptr_string += real_pos2;
ptr_no_color += pos2;
/* check if we should allocate more space for emphasis color codes */
count_emphasis++;
if (count_emphasis == 8)
{
/* allocate more space for emphasis color codes */
length_result += (length_emphasis * 2 * 8);
result2 = realloc (result, length_result);
if (!result2)
{
free (result);
return NULL;
}
result = result2;
count_emphasis = 0;
}
}
free (string_no_color);
return result;
}
TEST(Eval, EvalExpression)
{
struct t_hashtable *pointers, *extra_vars, *options;
struct t_config_option *ptr_option;
char *value, str_value[256];
pointers = NULL;
extra_vars = hashtable_new (32,
WEECHAT_HASHTABLE_STRING,
WEECHAT_HASHTABLE_STRING,
NULL, NULL);
CHECK(extra_vars);
hashtable_set (extra_vars, "test", "value");
options = NULL;
POINTERS_EQUAL(NULL, eval_expression (NULL, NULL, NULL, NULL));
/* test with simple strings */
WEE_CHECK_EVAL("", "");
WEE_CHECK_EVAL("a b c", "a b c");
WEE_CHECK_EVAL("$", "$");
WEE_CHECK_EVAL("", "${");
WEE_CHECK_EVAL("}", "}");
WEE_CHECK_EVAL("", "${}");
WEE_CHECK_EVAL("", "${xyz}");
/* test eval of substring */
WEE_CHECK_EVAL("\t", "${eval:${\\t}}");
/* test value from extra_vars */
WEE_CHECK_EVAL("value", "${test}");
/* test escaped chars */
WEE_CHECK_EVAL("\t", "${\\t}");
WEE_CHECK_EVAL("\t", "${esc:\t}");
/* test hidden chars */
WEE_CHECK_EVAL("********", "${hide:*,password}");
WEE_CHECK_EVAL("\u2603\u2603\u2603", "${hide:${esc:\u2603},abc}");
/* test color */
WEE_CHECK_EVAL(gui_color_get_custom ("green"), "${color:green}");
WEE_CHECK_EVAL(gui_color_get_custom ("*214"), "${color:*214}");
snprintf (str_value, sizeof (str_value),
"%s-test-",
gui_color_from_option (config_color_chat_delimiters));
WEE_CHECK_EVAL(str_value, "${color:chat_delimiters}-test-");
config_file_search_with_string ("irc.color.message_join", NULL, NULL,
&ptr_option, NULL);
if (!ptr_option)
{
FAIL("ERROR: option irc.color.message_join not found.");
}
snprintf (str_value, sizeof (str_value),
"%s-test-", gui_color_from_option (ptr_option));
WEE_CHECK_EVAL(str_value, "${color:irc.color.message_join}-test-");
WEE_CHECK_EVAL("test", "${option.not.found}test");
/* test info */
WEE_CHECK_EVAL(version_get_version (), "${info:version}");
/* test date */
value = eval_expression ("${date}", pointers, extra_vars, options);
LONGS_EQUAL(19, strlen (value));
free (value);
value = eval_expression ("${date:%H:%M:%S}",
pointers, extra_vars, options);
LONGS_EQUAL(8, strlen (value));
free (value);
/* test option */
snprintf (str_value, sizeof (str_value),
"%d", CONFIG_INTEGER(config_look_scroll_amount));
WEE_CHECK_EVAL(str_value, "${weechat.look.scroll_amount}");
WEE_CHECK_EVAL(str_value, "${${window.buffer.name}.look.scroll_amount}");
/* test hdata */
WEE_CHECK_EVAL("x", "x${buffer.number");
WEE_CHECK_EVAL("x${buffer.number}1",
"x\\${buffer.number}${buffer.number}");
WEE_CHECK_EVAL("1", "${buffer.number}");
WEE_CHECK_EVAL("1", "${window.buffer.number}");
WEE_CHECK_EVAL("core.weechat", "${buffer.full_name}");
WEE_CHECK_EVAL("core.weechat", "${window.buffer.full_name}");
hashtable_free (extra_vars);
}
