4 Copyright (C) 1999-2000 Timo Sirainen
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 #include "module-formats.h"
24 #include "special-vars.h"
30 #include "fe-windows.h"
31 #include "window-items.h"
34 #include "translation.h"
36 static const char *format_backs = "04261537";
37 static const char *format_fores = "kbgcrmyw";
38 static const char *format_boldfores = "KBGCRMYW";
40 static int signal_gui_print_text;
41 static int hide_text_style, hide_server_tags, hide_colors;
43 static int timestamp_level;
44 static int timestamp_timeout;
46 int format_find_tag(const char *module, const char *tag)
51 formats = g_hash_table_lookup(default_formats, module);
55 for (n = 0; formats[n].def != NULL; n++) {
56 if (formats[n].tag != NULL &&
57 g_strcasecmp(formats[n].tag, tag) == 0)
64 static void format_expand_code(const char **format, GString *out, int *flags)
69 /* flags are being ignored - skip the code */
70 while (**format != ']')
77 while (**format != ']' && **format != '\0') {
80 else if (**format == '-')
82 else switch (**format) {
89 g_string_append_c(out, 4);
90 g_string_append_c(out, FORMAT_STYLE_INDENT_FUNC);
91 while (**format != ']' && **format != '\0' &&
93 g_string_append_c(out, **format);
96 g_string_append_c(out, ',');
101 *flags |= !set ? PRINT_FLAG_UNSET_LINE_START :
102 **format == 's' ? PRINT_FLAG_SET_LINE_START :
103 PRINT_FLAG_SET_LINE_START_IRSSI;
106 *flags |= set ? PRINT_FLAG_SET_TIMESTAMP :
107 PRINT_FLAG_UNSET_TIMESTAMP;
110 *flags |= set ? PRINT_FLAG_SET_SERVERTAG :
111 PRINT_FLAG_UNSET_SERVERTAG;
119 int format_expand_styles(GString *out, const char **format, int *flags)
129 g_string_append_c(out, fmt);
132 /* Underline on/off */
133 g_string_append_c(out, 4);
134 g_string_append_c(out, FORMAT_STYLE_UNDERLINE);
139 g_string_append_c(out, 4);
140 g_string_append_c(out, FORMAT_STYLE_BOLD);
144 g_string_append_c(out, 4);
145 g_string_append_c(out, FORMAT_STYLE_REVERSE);
149 g_string_append_c(out, '\n');
153 g_string_append_c(out, 4);
154 g_string_append_c(out, FORMAT_STYLE_INDENT);
158 g_string_append_c(out, 4);
159 g_string_append_c(out, FORMAT_STYLE_BLINK);
164 g_string_append_c(out, 4);
165 g_string_append_c(out, FORMAT_STYLE_DEFAULTS);
168 /* clear to end of line */
169 g_string_append_c(out, 4);
170 g_string_append_c(out, FORMAT_STYLE_CLRTOEOL);
173 g_string_append_c(out, 4);
174 g_string_append_c(out, FORMAT_STYLE_MONOSPACE);
178 format_expand_code(format, out, flags);
181 /* check if it's a background color */
182 p = strchr(format_backs, fmt);
184 g_string_append_c(out, 4);
185 g_string_append_c(out, FORMAT_COLOR_NOCHANGE);
186 g_string_append_c(out, (char) ((int) (p-format_backs)+'0'));
190 /* check if it's a foreground color */
191 if (fmt == 'p') fmt = 'm';
192 p = strchr(format_fores, fmt);
194 g_string_append_c(out, 4);
195 g_string_append_c(out, (char) ((int) (p-format_fores)+'0'));
196 g_string_append_c(out, FORMAT_COLOR_NOCHANGE);
200 /* check if it's a bold foreground color */
201 if (fmt == 'P') fmt = 'M';
202 p = strchr(format_boldfores, fmt);
204 g_string_append_c(out, 4);
205 g_string_append_c(out, (char) (8+(int) (p-format_boldfores)+'0'));
206 g_string_append_c(out, FORMAT_COLOR_NOCHANGE);
216 void format_read_arglist(va_list va, FORMAT_REC *format,
217 char **arglist, int arglist_size,
218 char *buffer, int buffer_size)
220 int num, len, bufpos;
222 g_return_if_fail(format->params < arglist_size);
225 arglist[format->params] = NULL;
226 for (num = 0; num < format->params; num++) {
227 switch (format->paramtypes[num]) {
229 arglist[num] = (char *) va_arg(va, char *);
230 if (arglist[num] == NULL)
234 int d = (int) va_arg(va, int);
236 if (bufpos >= buffer_size) {
241 arglist[num] = buffer+bufpos;
242 len = g_snprintf(buffer+bufpos, buffer_size-bufpos,
248 long l = (long) va_arg(va, long);
250 if (bufpos >= buffer_size) {
255 arglist[num] = buffer+bufpos;
256 len = g_snprintf(buffer+bufpos, buffer_size-bufpos,
262 double f = (double) va_arg(va, double);
264 if (bufpos >= buffer_size) {
269 arglist[num] = buffer+bufpos;
270 len = g_snprintf(buffer+bufpos, buffer_size-bufpos,
279 void format_create_dest(TEXT_DEST_REC *dest,
280 void *server, const char *target,
281 int level, WINDOW_REC *window)
283 format_create_dest_tag(dest, server, NULL, target, level, window);
286 void format_create_dest_tag(TEXT_DEST_REC *dest, void *server,
287 const char *server_tag, const char *target,
288 int level, WINDOW_REC *window)
290 memset(dest, 0, sizeof(TEXT_DEST_REC));
292 dest->server = server;
293 dest->server_tag = server != NULL ? SERVER(server)->tag : server_tag;
294 dest->target = target;
296 dest->window = window != NULL ? window :
297 window_find_closest(server, target, level);
300 /* Return length of text part in string (ie. without % codes) */
301 int format_get_length(const char *str)
306 g_return_val_if_fail(str != NULL, 0);
308 tmp = g_string_new(NULL);
310 while (*str != '\0') {
311 if (*str == '%' && str[1] != '\0') {
314 format_expand_styles(tmp, &str, NULL)) {
319 /* %% or unknown %code, written as-is */
328 g_string_free(tmp, TRUE);
332 /* Return how many characters in `str' must be skipped before `len'
333 characters of text is skipped. Like strip_real_length(), except this
335 int format_real_length(const char *str, int len)
340 g_return_val_if_fail(str != NULL, 0);
341 g_return_val_if_fail(len >= 0, 0);
344 tmp = g_string_new(NULL);
345 while (*str != '\0' && len > 0) {
346 if (*str == '%' && str[1] != '\0') {
349 format_expand_styles(tmp, &str, NULL)) {
354 /* %% or unknown %code, written as-is */
365 g_string_free(tmp, TRUE);
366 return (int) (str-start);
369 char *format_string_expand(const char *text, int *flags)
374 g_return_val_if_fail(text != NULL, NULL);
376 out = g_string_new(NULL);
378 if (flags != NULL) *flags = 0;
380 while (*text != '\0') {
383 if (!format_expand_styles(out, &text, flags)) {
384 g_string_append_c(out, '%');
385 g_string_append_c(out, '%');
386 g_string_append_c(out, *text);
393 g_string_append_c(out, *text);
400 g_string_free(out, FALSE);
404 static char *format_get_text_args(TEXT_DEST_REC *dest,
405 const char *text, char **arglist)
411 out = g_string_new(NULL);
414 while (*text != '\0') {
417 if (!format_expand_styles(out, &text, &dest->flags)) {
418 g_string_append_c(out, '%');
419 g_string_append_c(out, '%');
420 g_string_append_c(out, *text);
423 } else if (code == '$') {
427 ret = parse_special((char **) &text, dest->server,
428 dest->target == NULL ? NULL :
429 window_item_find(dest->server, dest->target),
430 arglist, &need_free, NULL, 0);
433 /* string shouldn't end with \003 or it could
434 mess up the next one or two characters */
436 int len = strlen(ret);
437 while (len > 0 && ret[len-1] == 3) len--;
438 diff = strlen(ret)-len;
440 g_string_append(out, ret);
442 g_string_truncate(out, out->len-diff);
443 if (need_free) g_free(ret);
447 if (*text == '%' || *text == '$')
450 g_string_append_c(out, *text);
457 g_string_free(out, FALSE);
461 char *format_get_text_theme(THEME_REC *theme, const char *module,
462 TEXT_DEST_REC *dest, int formatnum, ...)
468 theme = window_get_theme(dest->window);
470 va_start(va, formatnum);
471 str = format_get_text_theme_args(theme, module, dest, formatnum, va);
477 char *format_get_text_theme_args(THEME_REC *theme, const char *module,
478 TEXT_DEST_REC *dest, int formatnum,
481 char *arglist[MAX_FORMAT_PARAMS];
482 char buffer[DEFAULT_FORMAT_ARGLIST_SIZE];
485 formats = g_hash_table_lookup(default_formats, module);
486 format_read_arglist(va, &formats[formatnum],
487 arglist, sizeof(arglist)/sizeof(char *),
488 buffer, sizeof(buffer));
490 return format_get_text_theme_charargs(theme, module, dest,
494 char *format_get_text_theme_charargs(THEME_REC *theme, const char *module,
495 TEXT_DEST_REC *dest, int formatnum,
498 MODULE_THEME_REC *module_theme;
501 module_theme = g_hash_table_lookup(theme->modules, module);
502 if (module_theme == NULL)
505 text = module_theme->expanded_formats[formatnum];
506 return format_get_text_args(dest, text, args);
509 char *format_get_text(const char *module, WINDOW_REC *window,
510 void *server, const char *target,
518 format_create_dest(&dest, server, target, 0, window);
519 theme = window_get_theme(dest.window);
521 va_start(va, formatnum);
522 str = format_get_text_theme_args(theme, module, &dest, formatnum, va);
528 /* add `linestart' to start of each line in `text'. `text' may contain
529 multiple lines separated with \n. */
530 char *format_add_linestart(const char *text, const char *linestart)
535 if (linestart == NULL)
536 return g_strdup(text);
538 if (strchr(text, '\n') == NULL)
539 return g_strconcat(linestart, text, NULL);
541 str = g_string_new(linestart);
542 while (*text != '\0') {
543 g_string_append_c(str, *text);
545 g_string_append(str, linestart);
550 g_string_free(str, FALSE);
554 char *format_add_lineend(const char *text, const char *linestart)
559 if (linestart == NULL)
560 return g_strdup(text);
562 if (strchr(text, '\n') == NULL)
563 return g_strconcat(text, linestart, NULL);
565 str = g_string_new(NULL);
566 while (*text != '\0') {
568 g_string_append(str, linestart);
569 g_string_append_c(str, *text);
572 g_string_append(str, linestart);
575 g_string_free(str, FALSE);
579 #define LINE_START_IRSSI_LEVEL \
580 (MSGLEVEL_CLIENTERROR | MSGLEVEL_CLIENTNOTICE)
582 #define NOT_LINE_START_LEVEL \
583 (MSGLEVEL_NEVER | MSGLEVEL_LASTLOG | MSGLEVEL_CLIENTCRAP | \
584 MSGLEVEL_MSGS | MSGLEVEL_PUBLIC | MSGLEVEL_DCC | MSGLEVEL_DCCMSGS | \
585 MSGLEVEL_ACTIONS | MSGLEVEL_NOTICES | MSGLEVEL_SNOTES | MSGLEVEL_CTCPS)
587 /* return the "-!- " text at the start of the line */
588 char *format_get_level_tag(THEME_REC *theme, TEXT_DEST_REC *dest)
592 /* check for flags if we want to override defaults */
593 if (dest->flags & PRINT_FLAG_UNSET_LINE_START)
596 if (dest->flags & PRINT_FLAG_SET_LINE_START)
597 format = TXT_LINE_START;
598 else if (dest->flags & PRINT_FLAG_SET_LINE_START_IRSSI)
599 format = TXT_LINE_START_IRSSI;
602 if (dest->level & LINE_START_IRSSI_LEVEL)
603 format = TXT_LINE_START_IRSSI;
604 else if ((dest->level & NOT_LINE_START_LEVEL) == 0)
605 format = TXT_LINE_START;
610 return format_get_text_theme(theme, MODULE_NAME, dest, format);
613 static char *get_timestamp(THEME_REC *theme, TEXT_DEST_REC *dest, time_t t)
615 char *format, str[256];
619 if ((timestamp_level & dest->level) == 0)
622 /* check for flags if we want to override defaults */
623 if (dest->flags & PRINT_FLAG_UNSET_TIMESTAMP)
626 if ((dest->flags & PRINT_FLAG_SET_TIMESTAMP) == 0 &&
627 (dest->level & (MSGLEVEL_NEVER|MSGLEVEL_LASTLOG)) != 0)
631 if (timestamp_timeout > 0) {
632 diff = t - dest->window->last_timestamp;
633 dest->window->last_timestamp = t;
634 if (diff < timestamp_timeout)
639 format = format_get_text_theme(theme, MODULE_NAME, dest,
641 if (strftime(str, sizeof(str), format, tm) <= 0)
644 return g_strdup(str);
647 static char *get_server_tag(THEME_REC *theme, TEXT_DEST_REC *dest)
651 if (dest->server_tag == NULL || hide_server_tags)
654 /* check for flags if we want to override defaults */
655 if (dest->flags & PRINT_FLAG_UNSET_SERVERTAG)
658 if ((dest->flags & PRINT_FLAG_SET_SERVERTAG) == 0) {
659 if (dest->window->active != NULL &&
660 dest->window->active->server == dest->server)
663 if (servers != NULL) {
665 if (servers->next != NULL)
668 if (count < 2 && lookup_servers != NULL) {
670 if (lookup_servers->next != NULL)
678 return format_get_text_theme(theme, MODULE_NAME, dest,
679 TXT_SERVERTAG, dest->server_tag);
682 char *format_get_line_start(THEME_REC *theme, TEXT_DEST_REC *dest, time_t t)
684 char *timestamp, *servertag;
687 timestamp = get_timestamp(theme, dest, t);
688 servertag = get_server_tag(theme, dest);
690 if (timestamp == NULL && servertag == NULL)
693 linestart = g_strconcat(timestamp != NULL ? timestamp : "",
696 g_free_not_null(timestamp);
697 g_free_not_null(servertag);
701 void format_newline(WINDOW_REC *window)
703 g_return_if_fail(window != NULL);
705 signal_emit_id(signal_gui_print_text, 6, window,
706 GINT_TO_POINTER(-1), GINT_TO_POINTER(-1),
707 GINT_TO_POINTER(GUI_PRINT_FLAG_NEWLINE),
711 /* parse ANSI color string */
712 static const char *get_ansi_color(THEME_REC *theme, const char *str,
713 int *fg_ret, int *bg_ret, int *flags_ret)
715 static char ansitab[8] = { 0, 4, 2, 6, 1, 5, 3, 7 };
717 int fg, bg, flags, num;
723 fg = fg_ret == NULL || *fg_ret < 0 ? theme->default_color : *fg_ret;
724 bg = bg_ret == NULL || *bg_ret < 0 ? -1 : *bg_ret;
725 flags = flags_ret == NULL ? 0 : *flags_ret;
729 if (*str == '\0') return start;
731 if (i_isdigit(*str)) {
732 num = num*10 + (*str-'0');
736 if (*str != ';' && *str != 'm')
741 /* reset colors back to default */
742 fg = theme->default_color;
744 flags &= ~GUI_PRINT_FLAG_INDENT;
748 flags |= GUI_PRINT_FLAG_BOLD;
752 flags |= GUI_PRINT_FLAG_BLINK;
756 flags |= GUI_PRINT_FLAG_REVERSE;
759 if (num >= 30 && num <= 37) {
760 if (fg == -1) fg = 0;
761 fg = (fg & 0xf8) | ansitab[num-30];
763 if (num >= 40 && num <= 47) {
764 if (bg == -1) bg = 0;
765 bg = (bg & 0xf8) | ansitab[num-40];
772 if (fg_ret != NULL) *fg_ret = fg;
773 if (bg_ret != NULL) *bg_ret = bg;
774 if (flags_ret != NULL) *flags_ret = flags;
784 /* parse MIRC color string */
785 static void get_mirc_color(const char **str, int *fg_ret, int *bg_ret)
789 fg = fg_ret == NULL ? -1 : *fg_ret;
790 bg = bg_ret == NULL ? -1 : *bg_ret;
792 if (!i_isdigit(**str) && **str != ',') {
796 /* foreground color */
800 if (i_isdigit(**str)) {
801 fg = fg*10 + (**str-'0');
806 /* background color */
808 if (!i_isdigit(**str))
813 if (i_isdigit(**str)) {
814 bg = bg*10 + (**str-'0');
821 if (fg_ret) *fg_ret = fg;
822 if (bg_ret) *bg_ret = bg;
825 #define IS_COLOR_CODE(c) \
826 ((c) == 2 || (c) == 3 || (c) == 4 || (c) == 6 || (c) == 7 || \
827 (c) == 15 || (c) == 22 || (c) == 27 || (c) == 31)
829 /* Return how many characters in `str' must be skipped before `len'
830 characters of text is skipped. */
831 int strip_real_length(const char *str, int len,
832 int *last_color_pos, int *last_color_len)
834 const char *start = str;
836 if (last_color_pos != NULL)
837 *last_color_pos = -1;
838 if (last_color_len != NULL)
839 *last_color_len = -1;
841 while (*str != '\0') {
843 const char *mircstart = str;
845 if (last_color_pos != NULL)
846 *last_color_pos = (int) (str-start);
848 get_mirc_color(&str, NULL, NULL);
849 if (last_color_len != NULL)
850 *last_color_len = (int) (str-mircstart);
852 } else if (*str == 4 && str[1] != '\0') {
853 if (str[1] < FORMAT_STYLE_SPECIAL && str[2] != '\0') {
854 if (last_color_pos != NULL)
855 *last_color_pos = (int) (str-start);
856 if (last_color_len != NULL)
859 } else if (str[1] == FORMAT_STYLE_DEFAULTS) {
860 if (last_color_pos != NULL)
861 *last_color_pos = (int) (str-start);
862 if (last_color_len != NULL)
867 if (!IS_COLOR_CODE(*str)) {
875 return (int) (str-start);
878 char *strip_codes(const char *input)
883 out = str = g_strdup(input);
884 for (p = input; *p != '\0'; p++) {
889 get_mirc_color(&p, NULL, NULL);
894 if (*p == 4 && p[1] != '\0') {
895 if (p[1] >= FORMAT_STYLE_SPECIAL) {
907 if (*p == 27 && p[1] != '\0') {
909 p = get_ansi_color(current_theme, p, NULL, NULL, NULL);
911 } else if (!IS_COLOR_CODE(*p))
919 /* send a fully parsed text string for GUI to print */
920 void format_send_to_gui(TEXT_DEST_REC *dest, const char *text)
923 char *dup, *str, *ptr, type;
924 int fgcolor, bgcolor;
927 theme = dest->window != NULL && dest->window->theme != NULL ?
928 dest->window->theme : current_theme;
930 dup = str = g_strdup(text);
932 flags = 0; fgcolor = theme->default_color; bgcolor = -1;
933 while (*str != '\0') {
935 for (ptr = str; *ptr != '\0'; ptr++) {
936 if (IS_COLOR_CODE(*ptr) || *ptr == '\n') {
942 *ptr = (char) translation_in[(int) (unsigned char) *ptr];
947 if (settings_get_bool("bell_beeps"))
948 signal_emit("beep", 0);
949 } else if (type == 4 && *ptr == FORMAT_STYLE_CLRTOEOL) {
950 /* clear to end of line */
951 flags |= GUI_PRINT_FLAG_CLRTOEOL;
954 if (*str != '\0' || (flags & GUI_PRINT_FLAG_CLRTOEOL)) {
955 /* send the text to gui handler */
956 signal_emit_id(signal_gui_print_text, 6, dest->window,
957 GINT_TO_POINTER(fgcolor),
958 GINT_TO_POINTER(bgcolor),
959 GINT_TO_POINTER(flags), str,
961 flags &= ~(GUI_PRINT_FLAG_INDENT|GUI_PRINT_FLAG_CLRTOEOL);
965 format_newline(dest->window);
974 if (!hide_text_style)
975 flags ^= GUI_PRINT_FLAG_BOLD;
979 get_mirc_color((const char **) &ptr,
980 hide_colors ? NULL : &fgcolor,
981 hide_colors ? NULL : &bgcolor);
983 flags |= GUI_PRINT_FLAG_MIRC_COLOR;
986 /* user specific colors */
987 flags &= ~GUI_PRINT_FLAG_MIRC_COLOR;
989 case FORMAT_STYLE_BLINK:
990 flags ^= GUI_PRINT_FLAG_BLINK;
992 case FORMAT_STYLE_UNDERLINE:
993 flags ^= GUI_PRINT_FLAG_UNDERLINE;
995 case FORMAT_STYLE_BOLD:
996 flags ^= GUI_PRINT_FLAG_BOLD;
998 case FORMAT_STYLE_REVERSE:
999 flags ^= GUI_PRINT_FLAG_REVERSE;
1001 case FORMAT_STYLE_MONOSPACE:
1002 flags ^= GUI_PRINT_FLAG_MONOSPACE;
1004 case FORMAT_STYLE_INDENT:
1005 flags |= GUI_PRINT_FLAG_INDENT;
1007 case FORMAT_STYLE_INDENT_FUNC: {
1008 const char *start = ptr;
1009 while (*ptr != ',' && *ptr != '\0')
1011 if (*ptr != '\0') *ptr++ = '\0';
1013 signal_emit_id(signal_gui_print_text, 6,
1014 dest->window, NULL, NULL,
1015 GINT_TO_POINTER(GUI_PRINT_FLAG_INDENT_FUNC),
1019 case FORMAT_STYLE_DEFAULTS:
1020 fgcolor = theme->default_color;
1022 flags &= GUI_PRINT_FLAG_INDENT|GUI_PRINT_FLAG_MONOSPACE;
1024 case FORMAT_STYLE_CLRTOEOL:
1027 if (*ptr != FORMAT_COLOR_NOCHANGE) {
1028 fgcolor = (unsigned char) *ptr-'0';
1030 flags &= ~GUI_PRINT_FLAG_BOLD;
1033 if (fgcolor != 8) fgcolor -= 8;
1034 flags |= GUI_PRINT_FLAG_BOLD;
1041 if (*ptr != FORMAT_COLOR_NOCHANGE) {
1044 flags &= ~GUI_PRINT_FLAG_BLINK;
1048 flags |= GUI_PRINT_FLAG_BLINK;
1056 if (!hide_text_style)
1057 flags ^= GUI_PRINT_FLAG_BLINK;
1060 /* remove all styling */
1061 fgcolor = theme->default_color;
1063 flags &= GUI_PRINT_FLAG_INDENT|GUI_PRINT_FLAG_MONOSPACE;
1067 if (!hide_text_style)
1068 flags ^= GUI_PRINT_FLAG_REVERSE;
1072 if (!hide_text_style)
1073 flags ^= GUI_PRINT_FLAG_UNDERLINE;
1076 /* ansi color code */
1078 get_ansi_color(theme, ptr,
1079 hide_colors ? NULL : &fgcolor,
1080 hide_colors ? NULL : &bgcolor,
1081 hide_colors ? NULL : &flags);
1091 static void read_settings(void)
1093 timestamp_level = settings_get_bool("timestamps") ? MSGLEVEL_ALL : 0;
1094 if (timestamp_level > 0) {
1096 level2bits(settings_get_str("timestamp_level"));
1098 timestamp_timeout = settings_get_int("timestamp_timeout");
1100 hide_server_tags = settings_get_bool("hide_server_tags");
1101 hide_text_style = settings_get_bool("hide_text_style");
1102 hide_colors = hide_text_style || settings_get_bool("hide_colors");
1105 void formats_init(void)
1107 signal_gui_print_text = signal_get_uniq_id("gui print text");
1110 signal_add("setup changed", (SIGNAL_FUNC) read_settings);
1113 void formats_deinit(void)
1115 signal_remove("setup changed", (SIGNAL_FUNC) read_settings);