7 #include "procheader.h"
10 #include "matcher_parser.h"
18 typedef struct _MatchParser MatchParser;
20 static MatchParser matchparser_tab[] = {
22 {MATCHCRITERIA_ALL, "all"},
23 {MATCHCRITERIA_UNREAD, "unread"},
24 {MATCHCRITERIA_NOT_UNREAD, "~unread"},
25 {MATCHCRITERIA_NEW, "new"},
26 {MATCHCRITERIA_NOT_NEW, "~new"},
27 {MATCHCRITERIA_MARKED, "marked"},
28 {MATCHCRITERIA_NOT_MARKED, "~marked"},
29 {MATCHCRITERIA_DELETED, "deleted"},
30 {MATCHCRITERIA_NOT_DELETED, "~deleted"},
31 {MATCHCRITERIA_REPLIED, "replied"},
32 {MATCHCRITERIA_NOT_REPLIED, "~replied"},
33 {MATCHCRITERIA_FORWARDED, "forwarded"},
34 {MATCHCRITERIA_NOT_FORWARDED, "~forwarded"},
37 {MATCHCRITERIA_SUBJECT, "subject"},
38 {MATCHCRITERIA_NOT_SUBJECT, "~subject"},
39 {MATCHCRITERIA_FROM, "from"},
40 {MATCHCRITERIA_NOT_FROM, "~from"},
41 {MATCHCRITERIA_TO, "to"},
42 {MATCHCRITERIA_NOT_TO, "~to"},
43 {MATCHCRITERIA_CC, "cc"},
44 {MATCHCRITERIA_NOT_CC, "~cc"},
45 {MATCHCRITERIA_TO_OR_CC, "to_or_cc"},
46 {MATCHCRITERIA_NOT_TO_AND_NOT_CC, "~to_or_cc"},
47 {MATCHCRITERIA_AGE_GREATER, "age_greater"},
48 {MATCHCRITERIA_AGE_LOWER, "age_lower"},
49 {MATCHCRITERIA_NEWSGROUPS, "newsgroups"},
50 {MATCHCRITERIA_NOT_NEWSGROUPS, "~newsgroups"},
51 {MATCHCRITERIA_INREPLYTO, "inreplyto"},
52 {MATCHCRITERIA_NOT_INREPLYTO, "~inreplyto"},
53 {MATCHCRITERIA_REFERENCES, "references"},
54 {MATCHCRITERIA_NOT_REFERENCES, "~references"},
55 {MATCHCRITERIA_SCORE_GREATER, "score_greater"},
56 {MATCHCRITERIA_SCORE_LOWER, "score_lower"},
57 {MATCHCRITERIA_SCORE_EQUAL, "score_equal"},
59 {MATCHCRITERIA_SIZE_GREATER, "size_greater"},
60 {MATCHCRITERIA_SIZE_SMALLER, "size_smaller"},
61 {MATCHCRITERIA_SIZE_EQUAL, "size_equal"},
63 /* content have to be read */
64 {MATCHCRITERIA_HEADER, "header"},
65 {MATCHCRITERIA_NOT_HEADER, "~header"},
66 {MATCHCRITERIA_HEADERS_PART, "headers_part"},
67 {MATCHCRITERIA_NOT_HEADERS_PART, "~headers_part"},
68 {MATCHCRITERIA_MESSAGE, "message"},
69 {MATCHCRITERIA_NOT_MESSAGE, "~message"},
70 {MATCHCRITERIA_BODY_PART, "body_part"},
71 {MATCHCRITERIA_NOT_BODY_PART, "~body_part"},
72 {MATCHCRITERIA_EXECUTE, "execute"},
73 {MATCHCRITERIA_NOT_EXECUTE, "~execute"},
76 {MATCHTYPE_MATCHCASE, "matchcase"},
77 {MATCHTYPE_MATCH, "match"},
78 {MATCHTYPE_REGEXPCASE, "regexpcase"},
79 {MATCHTYPE_REGEXP, "regexp"},
82 {MATCHACTION_SCORE, "score"},
83 {MATCHACTION_MOVE, "move"},
84 {MATCHACTION_COPY, "copy"},
85 {MATCHACTION_DELETE, "delete"},
86 {MATCHACTION_MARK, "mark"},
87 {MATCHACTION_UNMARK, "unmark"},
88 {MATCHACTION_MARK_AS_READ, "mark_as_read"},
89 {MATCHACTION_MARK_AS_UNREAD, "mark_as_unread"},
90 {MATCHACTION_FORWARD, "forward"},
91 {MATCHACTION_FORWARD_AS_ATTACHMENT, "forward_as_attachment"},
92 {MATCHACTION_EXECUTE, "execute"},
93 {MATCHACTION_COLOR, "color"},
94 {MATCHACTION_REDIRECT, "redirect"},
95 {MATCHACTION_DELETE_ON_SERVER, "delete_on_server"}
98 /* get_matchparser_tab_str() - used by filtering.c to translate
99 * actions to debug strings */
100 gchar * get_matchparser_tab_str(gint id)
104 for(i = 0 ; i < (int) (sizeof(matchparser_tab) / sizeof(MatchParser)) ;
106 if (matchparser_tab[i].id == id)
107 return matchparser_tab[i].str;
112 /* matcher_escape_str() - escapes a string returns newly allocated escaped string */
113 gchar *matcher_escape_str(const gchar *str)
115 register const gchar *walk;
118 register char *reswalk;
123 for (escape = 0, walk = str; *walk; walk++)
124 if (*walk == '\'' || *walk == '\"')
128 return g_strdup(str);
130 reswalk = res = g_new0(gchar, (walk - str) + escape + 1);
131 for (walk = str; *walk; walk++, reswalk++) {
132 if (*walk == '\'' || *walk == '\"')
141 /* matcher_unescape_str() - assumes that unescaping frees up room
142 * in the string, so it returns the unescaped string in the
144 gchar *matcher_unescape_str(gchar *str)
146 gchar *tmp = alloca(strlen(str) + 1);
147 register gchar *src = tmp;
148 register gchar *dst = str;
152 for ( ; *src; src++) {
158 *dst++ = '\\'; /* insert backslash */
159 else if (*src == 'n') /* insert control characters */
161 else if (*src == 'r')
163 else if (*src == 't')
165 else if (*src == 'r')
167 else if (*src == 'b')
169 else if (*src == 'f')
171 else if (*src == '\'' || *src == '\"') /* insert \' or \" */
174 /* FIXME: should perhaps escape character... */
184 /* **************** data structure allocation **************** */
186 /* matcherprop_new() - allocates a structure for one condition
188 MatcherProp * matcherprop_new(gint criteria, gchar * header,
189 gint matchtype, gchar * expr,
194 prop = g_new0(MatcherProp, 1);
195 prop->criteria = criteria;
196 if (header != NULL) {
197 prop->header = g_strdup(header);
198 prop->unesc_header = matcher_unescape_str(g_strdup(header));
202 prop->unesc_header = NULL;
205 prop->expr = g_strdup(expr);
206 prop->unesc_expr = matcher_unescape_str(g_strdup(expr));
210 prop->unesc_expr = NULL;
212 prop->matchtype = matchtype;
220 /* matcherprop_free()
222 void matcherprop_free(MatcherProp * prop)
226 if (prop->unesc_expr)
227 g_free(prop->unesc_expr);
229 g_free(prop->header);
230 if (prop->unesc_header)
231 g_free(prop->unesc_header);
232 if (prop->preg != NULL) {
240 /* ************** match ******************************/
243 /* matcherprop_string_match() - finds out if a string matches
244 * with a criterium */
245 static gboolean matcherprop_string_match(MatcherProp * prop, gchar * str)
253 switch(prop->matchtype) {
254 case MATCHTYPE_REGEXPCASE:
255 case MATCHTYPE_REGEXP:
256 if (!prop->preg && (prop->error == 0)) {
257 prop->preg = g_new0(regex_t, 1);
258 /* if regexp then don't use the escaped string */
259 if (regcomp(prop->preg, prop->expr,
260 REG_NOSUB | REG_EXTENDED
261 | ((prop->matchtype == MATCHTYPE_REGEXPCASE)
262 ? REG_ICASE : 0)) != 0) {
267 if (prop->preg == NULL)
270 if (regexec(prop->preg, str, 0, NULL, 0) == 0)
275 case MATCHTYPE_MATCH:
276 return (strstr(str, prop->unesc_expr) != NULL);
278 /* FIXME: put upper in unesc_str */
279 case MATCHTYPE_MATCHCASE:
280 str2 = alloca(strlen(prop->unesc_expr) + 1);
281 strcpy(str2, prop->unesc_expr);
283 str1 = alloca(strlen(str) + 1);
286 return (strstr(str1, str2) != NULL);
293 gboolean matcherprop_match_execute(MatcherProp * prop, MsgInfo * info)
299 file = procmsg_get_message_file(info);
303 cmd = matching_build_command(prop->unesc_expr, info);
307 retval = system(cmd);
308 debug_print(_("Command exit code: %i\n"), retval);
310 return (retval == 0);
313 /* match a message and his headers, hlist can be NULL if you don't
314 want to use headers */
316 gboolean matcherprop_match(MatcherProp * prop, MsgInfo * info)
320 switch(prop->criteria) {
321 case MATCHCRITERIA_ALL:
323 case MATCHCRITERIA_UNREAD:
324 return MSG_IS_UNREAD(info->flags);
325 case MATCHCRITERIA_NOT_UNREAD:
326 return !MSG_IS_UNREAD(info->flags);
327 case MATCHCRITERIA_NEW:
328 return MSG_IS_NEW(info->flags);
329 case MATCHCRITERIA_NOT_NEW:
330 return !MSG_IS_NEW(info->flags);
331 case MATCHCRITERIA_MARKED:
332 return MSG_IS_MARKED(info->flags);
333 case MATCHCRITERIA_NOT_MARKED:
334 return !MSG_IS_MARKED(info->flags);
335 case MATCHCRITERIA_DELETED:
336 return MSG_IS_DELETED(info->flags);
337 case MATCHCRITERIA_NOT_DELETED:
338 return !MSG_IS_DELETED(info->flags);
339 case MATCHCRITERIA_REPLIED:
340 return MSG_IS_REPLIED(info->flags);
341 case MATCHCRITERIA_NOT_REPLIED:
342 return !MSG_IS_REPLIED(info->flags);
343 case MATCHCRITERIA_FORWARDED:
344 return MSG_IS_FORWARDED(info->flags);
345 case MATCHCRITERIA_NOT_FORWARDED:
346 return !MSG_IS_FORWARDED(info->flags);
347 case MATCHCRITERIA_SUBJECT:
348 return matcherprop_string_match(prop, info->subject);
349 case MATCHCRITERIA_NOT_SUBJECT:
350 return !matcherprop_string_match(prop, info->subject);
351 case MATCHCRITERIA_FROM:
352 return matcherprop_string_match(prop, info->from);
353 case MATCHCRITERIA_NOT_FROM:
354 return !matcherprop_string_match(prop, info->from);
355 case MATCHCRITERIA_TO:
356 return matcherprop_string_match(prop, info->to);
357 case MATCHCRITERIA_NOT_TO:
358 return !matcherprop_string_match(prop, info->to);
359 case MATCHCRITERIA_CC:
360 return matcherprop_string_match(prop, info->cc);
361 case MATCHCRITERIA_NOT_CC:
362 return !matcherprop_string_match(prop, info->cc);
363 case MATCHCRITERIA_TO_OR_CC:
364 return matcherprop_string_match(prop, info->to)
365 || matcherprop_string_match(prop, info->cc);
366 case MATCHCRITERIA_NOT_TO_AND_NOT_CC:
367 return !(matcherprop_string_match(prop, info->to)
368 || matcherprop_string_match(prop, info->cc));
369 case MATCHCRITERIA_AGE_GREATER:
371 return ((t - info->date_t) / (60 * 60 * 24)) >= prop->value;
372 case MATCHCRITERIA_AGE_LOWER:
374 return ((t - info->date_t) / (60 * 60 * 24)) <= prop->value;
375 case MATCHCRITERIA_SCORE_GREATER:
376 return info->score >= prop->value;
377 case MATCHCRITERIA_SCORE_LOWER:
378 return info->score <= prop->value;
379 case MATCHCRITERIA_SCORE_EQUAL:
380 return info->score == prop->value;
381 case MATCHCRITERIA_SIZE_GREATER:
382 /* FIXME: info->size is an off_t */
383 return info->size > (off_t) prop->value;
384 case MATCHCRITERIA_SIZE_EQUAL:
385 /* FIXME: info->size is an off_t */
386 return info->size == (off_t) prop->value;
387 case MATCHCRITERIA_SIZE_SMALLER:
388 /* FIXME: info->size is an off_t */
389 return info->size < (off_t) prop->value;
390 case MATCHCRITERIA_NEWSGROUPS:
391 return matcherprop_string_match(prop, info->newsgroups);
392 case MATCHCRITERIA_NOT_NEWSGROUPS:
393 return !matcherprop_string_match(prop, info->newsgroups);
394 case MATCHCRITERIA_INREPLYTO:
395 return matcherprop_string_match(prop, info->inreplyto);
396 case MATCHCRITERIA_NOT_INREPLYTO:
397 return !matcherprop_string_match(prop, info->inreplyto);
398 case MATCHCRITERIA_REFERENCES:
399 return matcherprop_string_match(prop, info->references);
400 case MATCHCRITERIA_NOT_REFERENCES:
401 return !matcherprop_string_match(prop, info->references);
402 case MATCHCRITERIA_EXECUTE:
403 return matcherprop_match_execute(prop, info);
404 case MATCHCRITERIA_NOT_EXECUTE:
405 return !matcherprop_match_execute(prop, info);
411 /* ********************* MatcherList *************************** */
414 MatcherList * matcherlist_new(GSList * matchers, gboolean bool_and)
418 cond = g_new0(MatcherList, 1);
420 cond->matchers = matchers;
421 cond->bool_and = bool_and;
426 void matcherlist_free(MatcherList * cond)
430 for(l = cond->matchers ; l != NULL ; l = g_slist_next(l)) {
431 matcherprop_free((MatcherProp *) l->data);
440 static void matcherlist_skip_headers(FILE *fp)
444 while (procheader_get_one_field(buf, sizeof(buf), fp, NULL) != -1) {
449 matcherprop_match_one_header
450 returns TRUE if buf matchs the MatchersProp criteria
453 static gboolean matcherprop_match_one_header(MatcherProp * matcher,
459 switch(matcher->criteria) {
460 case MATCHCRITERIA_HEADER:
461 case MATCHCRITERIA_NOT_HEADER:
462 header = procheader_parse_header(buf);
465 if (procheader_headername_equal(header->name,
467 if (matcher->criteria == MATCHCRITERIA_HEADER)
468 result = matcherprop_string_match(matcher, header->body);
470 result = !matcherprop_string_match(matcher, header->body);
471 procheader_header_free(header);
475 procheader_header_free(header);
478 case MATCHCRITERIA_HEADERS_PART:
479 case MATCHCRITERIA_MESSAGE:
480 return matcherprop_string_match(matcher, buf);
481 case MATCHCRITERIA_NOT_MESSAGE:
482 case MATCHCRITERIA_NOT_HEADERS_PART:
483 return !matcherprop_string_match(matcher, buf);
489 matcherprop_criteria_header
490 returns TRUE if the headers must be matched
493 static gboolean matcherprop_criteria_headers(MatcherProp * matcher)
495 switch(matcher->criteria) {
496 case MATCHCRITERIA_HEADER:
497 case MATCHCRITERIA_NOT_HEADER:
498 case MATCHCRITERIA_HEADERS_PART:
499 case MATCHCRITERIA_NOT_HEADERS_PART:
506 static gboolean matcherprop_criteria_message(MatcherProp * matcher)
508 switch(matcher->criteria) {
509 case MATCHCRITERIA_MESSAGE:
510 case MATCHCRITERIA_NOT_MESSAGE:
518 matcherlist_match_one_header
519 returns TRUE if match should stop
522 static gboolean matcherlist_match_one_header(MatcherList * matchers,
527 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
528 MatcherProp * matcher = (MatcherProp *) l->data;
530 if (matcherprop_criteria_headers(matcher) ||
531 matcherprop_criteria_message(matcher)) {
532 if (matcherprop_match_one_header(matcher, buf)) {
533 matcher->result = TRUE;
537 if (matcherprop_criteria_headers(matcher)) {
538 if (matcher->result) {
539 if (!matchers->bool_and)
549 matcherlist_match_headers
550 returns TRUE if one of the headers matchs the MatcherList criteria
553 static gboolean matcherlist_match_headers(MatcherList * matchers, FILE * fp)
557 while (procheader_get_one_field(buf, sizeof(buf), fp, NULL) != -1)
558 if (matcherlist_match_one_header(matchers, buf))
565 matcherprop_criteria_body
566 returns TRUE if the body must be matched
569 static gboolean matcherprop_criteria_body(MatcherProp * matcher)
571 switch(matcher->criteria) {
572 case MATCHCRITERIA_BODY_PART:
573 case MATCHCRITERIA_NOT_BODY_PART:
581 matcherprop_match_line
582 returns TRUE if the string matchs the MatcherProp criteria
585 static gboolean matcherprop_match_line(MatcherProp * matcher, gchar * line)
587 switch(matcher->criteria) {
588 case MATCHCRITERIA_BODY_PART:
589 case MATCHCRITERIA_MESSAGE:
590 return matcherprop_string_match(matcher, line);
591 case MATCHCRITERIA_NOT_BODY_PART:
592 case MATCHCRITERIA_NOT_MESSAGE:
593 return !matcherprop_string_match(matcher, line);
599 matcherlist_match_line
600 returns TRUE if the string matchs the MatcherList criteria
603 static gboolean matcherlist_match_line(MatcherList * matchers, gchar * line)
607 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
608 MatcherProp * matcher = (MatcherProp *) l->data;
610 if (matcherprop_criteria_body(matcher) ||
611 matcherprop_criteria_message(matcher)) {
612 if (matcherprop_match_line(matcher, line)) {
613 matcher->result = TRUE;
617 if (matcher->result) {
618 if (!matchers->bool_and)
626 matcherlist_match_body
627 returns TRUE if one line of the body matchs the MatcherList criteria
630 static gboolean matcherlist_match_body(MatcherList * matchers, FILE * fp)
634 while (fgets(buf, sizeof(buf), fp) != NULL)
635 if (matcherlist_match_line(matchers, buf))
641 gboolean matcherlist_match_file(MatcherList * matchers, MsgInfo * info,
644 gboolean read_headers;
650 /* file need to be read ? */
652 read_headers = FALSE;
654 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
655 MatcherProp * matcher = (MatcherProp *) l->data;
657 if (matcherprop_criteria_headers(matcher))
659 if (matcherprop_criteria_body(matcher))
661 if (matcherprop_criteria_message(matcher)) {
665 matcher->result = FALSE;
668 if (!read_headers && !read_body)
671 file = procmsg_get_message_file(info);
675 if ((fp = fopen(file, "rb")) == NULL) {
676 FILE_OP_ERROR(file, "fopen");
681 /* read the headers */
684 if (matcherlist_match_headers(matchers, fp))
688 matcherlist_skip_headers(fp);
693 matcherlist_match_body(matchers, fp);
696 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
697 MatcherProp * matcher = (MatcherProp *) l->data;
699 if (matcherprop_criteria_headers(matcher) ||
700 matcherprop_criteria_body(matcher) ||
701 matcherprop_criteria_message(matcher)) {
702 if (matcher->result) {
703 if (!matchers->bool_and) {
709 if (matchers->bool_and) {
724 /* test a list of condition */
726 gboolean matcherlist_match(MatcherList * matchers, MsgInfo * info)
731 if (matchers->bool_and)
736 /* test the cached elements */
738 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
739 MatcherProp * matcher = (MatcherProp *) l->data;
741 switch(matcher->criteria) {
742 case MATCHCRITERIA_ALL:
743 case MATCHCRITERIA_UNREAD:
744 case MATCHCRITERIA_NOT_UNREAD:
745 case MATCHCRITERIA_NEW:
746 case MATCHCRITERIA_NOT_NEW:
747 case MATCHCRITERIA_MARKED:
748 case MATCHCRITERIA_NOT_MARKED:
749 case MATCHCRITERIA_DELETED:
750 case MATCHCRITERIA_NOT_DELETED:
751 case MATCHCRITERIA_REPLIED:
752 case MATCHCRITERIA_NOT_REPLIED:
753 case MATCHCRITERIA_FORWARDED:
754 case MATCHCRITERIA_NOT_FORWARDED:
755 case MATCHCRITERIA_SUBJECT:
756 case MATCHCRITERIA_NOT_SUBJECT:
757 case MATCHCRITERIA_FROM:
758 case MATCHCRITERIA_NOT_FROM:
759 case MATCHCRITERIA_TO:
760 case MATCHCRITERIA_NOT_TO:
761 case MATCHCRITERIA_CC:
762 case MATCHCRITERIA_NOT_CC:
763 case MATCHCRITERIA_TO_OR_CC:
764 case MATCHCRITERIA_NOT_TO_AND_NOT_CC:
765 case MATCHCRITERIA_AGE_GREATER:
766 case MATCHCRITERIA_AGE_LOWER:
767 case MATCHCRITERIA_NEWSGROUPS:
768 case MATCHCRITERIA_NOT_NEWSGROUPS:
769 case MATCHCRITERIA_INREPLYTO:
770 case MATCHCRITERIA_NOT_INREPLYTO:
771 case MATCHCRITERIA_REFERENCES:
772 case MATCHCRITERIA_NOT_REFERENCES:
773 case MATCHCRITERIA_SCORE_GREATER:
774 case MATCHCRITERIA_SCORE_LOWER:
775 case MATCHCRITERIA_SCORE_EQUAL:
776 case MATCHCRITERIA_SIZE_GREATER:
777 case MATCHCRITERIA_SIZE_SMALLER:
778 case MATCHCRITERIA_SIZE_EQUAL:
779 case MATCHCRITERIA_EXECUTE:
780 case MATCHCRITERIA_NOT_EXECUTE:
781 if (matcherprop_match(matcher, info)) {
782 if (!matchers->bool_and) {
787 if (matchers->bool_and) {
794 /* test the condition on the file */
796 if (matcherlist_match_file(matchers, info, result)) {
797 if (!matchers->bool_and)
801 if (matchers->bool_and)
809 gchar * matcherprop_to_string(MatcherProp * matcher)
811 gchar * matcher_str = NULL;
812 gchar * criteria_str;
813 gchar * matchtype_str;
821 for(i = 0 ; i < (int) (sizeof(matchparser_tab) / sizeof(MatchParser)) ;
823 if (matchparser_tab[i].id == matcher->criteria)
824 criteria_str = matchparser_tab[i].str;
826 if (criteria_str == NULL)
829 switch(matcher->criteria) {
830 case MATCHCRITERIA_AGE_GREATER:
831 case MATCHCRITERIA_AGE_LOWER:
832 case MATCHCRITERIA_SCORE_GREATER:
833 case MATCHCRITERIA_SCORE_LOWER:
834 case MATCHCRITERIA_SCORE_EQUAL:
835 case MATCHCRITERIA_SIZE_GREATER:
836 case MATCHCRITERIA_SIZE_SMALLER:
837 case MATCHCRITERIA_SIZE_EQUAL:
838 return g_strdup_printf("%s %i", criteria_str, matcher->value);
839 case MATCHCRITERIA_ALL:
840 case MATCHCRITERIA_UNREAD:
841 case MATCHCRITERIA_NOT_UNREAD:
842 case MATCHCRITERIA_NEW:
843 case MATCHCRITERIA_NOT_NEW:
844 case MATCHCRITERIA_MARKED:
845 case MATCHCRITERIA_NOT_MARKED:
846 case MATCHCRITERIA_DELETED:
847 case MATCHCRITERIA_NOT_DELETED:
848 case MATCHCRITERIA_REPLIED:
849 case MATCHCRITERIA_NOT_REPLIED:
850 case MATCHCRITERIA_FORWARDED:
851 case MATCHCRITERIA_NOT_FORWARDED:
852 return g_strdup(criteria_str);
853 case MATCHCRITERIA_EXECUTE:
854 case MATCHCRITERIA_NOT_EXECUTE:
855 return g_strdup_printf("%s \"%s\"", criteria_str, matcher->expr);
858 matchtype_str = NULL;
859 for(i = 0 ; i < (int) (sizeof(matchparser_tab) / sizeof(MatchParser)) ;
861 if (matchparser_tab[i].id == matcher->matchtype)
862 matchtype_str = matchparser_tab[i].str;
865 if (matchtype_str == NULL)
868 switch (matcher->matchtype) {
869 case MATCHTYPE_MATCH:
870 case MATCHTYPE_MATCHCASE:
871 case MATCHTYPE_REGEXP:
872 case MATCHTYPE_REGEXPCASE:
875 g_strdup_printf("%s \"%s\" %s \"%s\"",
876 criteria_str, matcher->header,
877 matchtype_str, matcher->expr);
880 g_strdup_printf("%s %s \"%s\"", criteria_str,
881 matchtype_str, matcher->expr);
888 gchar * matcherlist_to_string(MatcherList * matchers)
896 count = g_slist_length(matchers->matchers);
897 vstr = g_new(gchar *, count + 1);
899 for (l = matchers->matchers, cur_str = vstr ; l != NULL ;
900 l = g_slist_next(l), cur_str ++) {
901 *cur_str = matcherprop_to_string((MatcherProp *) l->data);
902 if (*cur_str == NULL)
907 if (matchers->bool_and)
908 result = g_strjoinv(" & ", vstr);
910 result = g_strjoinv(" | ", vstr);
912 for(cur_str = vstr ; *cur_str != NULL ; cur_str ++)
919 /* matching_build_command() - preferably cmd should be unescaped */
920 gchar * matching_build_command(gchar * cmd, MsgInfo * info)
923 gchar * filename = NULL;
924 gchar * processed_cmd;
928 size = strlen(cmd) + 1;
936 case 's': /* subject */
937 size += strlen(info->subject) - 2;
940 size += strlen(info->from) - 2;
943 size += strlen(info->to) - 2;
946 size += strlen(info->cc) - 2;
949 size += strlen(info->date) - 2;
951 case 'i': /* message-id */
952 size += strlen(info->msgid) - 2;
954 case 'n': /* newsgroups */
955 size += strlen(info->newsgroups) - 2;
957 case 'r': /* references */
958 size += strlen(info->references) - 2;
961 filename = folder_item_fetch_msg(info->folder,
964 if (filename == NULL) {
965 g_warning(_("filename is not set"));
969 size += strlen(filename) - 2;
978 processed_cmd = g_new0(gchar, size);
990 case 's': /* subject */
991 if (info->subject != NULL)
992 strcpy(p, info->subject);
994 strcpy(p, _("(none)"));
998 if (info->from != NULL)
999 strcpy(p, info->from);
1001 strcpy(p, _("(none)"));
1005 if (info->to != NULL)
1006 strcpy(p, info->to);
1008 strcpy(p, _("(none)"));
1012 if (info->cc != NULL)
1013 strcpy(p, info->cc);
1015 strcpy(p, _("(none)"));
1018 case 'd': /* date */
1019 if (info->date != NULL)
1020 strcpy(p, info->date);
1022 strcpy(p, _("(none)"));
1025 case 'i': /* message-id */
1026 if (info->msgid != NULL)
1027 strcpy(p, info->msgid);
1029 strcpy(p, _("(none)"));
1032 case 'n': /* newsgroups */
1033 if (info->newsgroups != NULL)
1034 strcpy(p, info->newsgroups);
1036 strcpy(p, _("(none)"));
1039 case 'r': /* references */
1040 if (info->references != NULL)
1041 strcpy(p, info->references);
1043 strcpy(p, _("(none)"));
1046 case 'F': /* file */
1047 strcpy(p, filename);
1066 debug_print("*** exec string \"%s\"\n", processed_cmd);
1067 return processed_cmd;
1070 /* ************************************************************ */
1072 static void prefs_scoring_write(FILE * fp, GSList * prefs_scoring)
1076 for (cur = prefs_scoring; cur != NULL; cur = cur->next) {
1080 prop = (ScoringProp *) cur->data;
1081 scoring_str = scoringprop_to_string(prop);
1082 if (fputs(scoring_str, fp) == EOF ||
1083 fputc('\n', fp) == EOF) {
1084 FILE_OP_ERROR("scoring config", "fputs || fputc");
1085 g_free(scoring_str);
1088 g_free(scoring_str);
1092 static void prefs_filtering_write(FILE * fp, GSList * prefs_scoring)
1096 for (cur = prefs_scoring; cur != NULL; cur = cur->next) {
1097 gchar *filtering_str;
1098 FilteringProp * prop;
1100 if (NULL == (prop = (FilteringProp *) cur->data))
1103 if (NULL == (filtering_str = filteringprop_to_string(prop)))
1106 if (fputs(filtering_str, fp) == EOF ||
1107 fputc('\n', fp) == EOF) {
1108 FILE_OP_ERROR("filtering config", "fputs || fputc");
1109 g_free(filtering_str);
1112 g_free(filtering_str);
1116 static gboolean prefs_matcher_write_func(GNode *node, gpointer data)
1121 GSList * prefs_scoring;
1122 GSList * prefs_filtering;
1126 /* prevent from the warning */
1127 if (item->path == NULL)
1129 id = folder_item_get_identifier(item);
1132 prefs_scoring = item->prefs->scoring;
1133 prefs_filtering = item->prefs->processing;
1137 id = g_strdup("global"); /* because it is g_freed */
1138 prefs_scoring = global_scoring;
1139 prefs_filtering = global_processing;
1142 if (prefs_filtering != NULL || prefs_scoring != NULL) {
1143 fprintf(fp, "[%s]\n", id);
1145 prefs_filtering_write(fp, prefs_filtering);
1146 prefs_scoring_write(fp, prefs_scoring);
1156 static void prefs_matcher_save(FILE * fp)
1160 for (cur = folder_get_list() ; cur != NULL ; cur = g_list_next(cur)) {
1163 folder = (Folder *) cur->data;
1164 g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1165 prefs_matcher_write_func, fp);
1167 prefs_matcher_write_func(NULL, fp);
1171 void prefs_matcher_write_config(void)
1178 debug_print(_("Writing matcher configuration...\n"));
1180 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
1183 if ((pfile = prefs_write_open(rcpath)) == NULL) {
1184 g_warning(_("failed to write configuration to file\n"));
1190 prefs_matcher_save(pfile->fp);
1194 if (prefs_write_close(pfile) < 0) {
1195 g_warning(_("failed to write configuration to file\n"));
1200 /* ******************************************************************* */
1202 void prefs_matcher_read_config(void)
1207 prefs_scoring_clear();
1208 prefs_filtering_clear();
1210 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, MATCHER_RC, NULL);
1211 f = fopen(rcpath, "rb");
1215 matcher_parser_start_parsing(f);
1219 /* previous version compatibily */
1221 /* printf("reading filtering\n"); */
1222 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
1223 FILTERING_RC, NULL);
1224 f = fopen(rcpath, "rb");
1228 matcher_parser_start_parsing(f);
1229 fclose(matcher_parserin);
1232 /* printf("reading scoring\n"); */
1233 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
1235 f = fopen(rcpath, "rb");
1239 matcher_parser_start_parsing(f);
1240 fclose(matcher_parserin);