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_BOUNCE, "bounce"},
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)
298 file = procmsg_get_message_file(info);
302 cmd = matching_build_command(prop->unesc_expr, info);
306 return (system(cmd) == 0);
309 /* match a message and his headers, hlist can be NULL if you don't
310 want to use headers */
312 gboolean matcherprop_match(MatcherProp * prop, MsgInfo * info)
316 switch(prop->criteria) {
317 case MATCHCRITERIA_ALL:
319 case MATCHCRITERIA_UNREAD:
320 return MSG_IS_UNREAD(info->flags);
321 case MATCHCRITERIA_NOT_UNREAD:
322 return !MSG_IS_UNREAD(info->flags);
323 case MATCHCRITERIA_NEW:
324 return MSG_IS_NEW(info->flags);
325 case MATCHCRITERIA_NOT_NEW:
326 return !MSG_IS_NEW(info->flags);
327 case MATCHCRITERIA_MARKED:
328 return MSG_IS_MARKED(info->flags);
329 case MATCHCRITERIA_NOT_MARKED:
330 return !MSG_IS_MARKED(info->flags);
331 case MATCHCRITERIA_DELETED:
332 return MSG_IS_DELETED(info->flags);
333 case MATCHCRITERIA_NOT_DELETED:
334 return !MSG_IS_DELETED(info->flags);
335 case MATCHCRITERIA_REPLIED:
336 return MSG_IS_REPLIED(info->flags);
337 case MATCHCRITERIA_NOT_REPLIED:
338 return !MSG_IS_REPLIED(info->flags);
339 case MATCHCRITERIA_FORWARDED:
340 return MSG_IS_FORWARDED(info->flags);
341 case MATCHCRITERIA_NOT_FORWARDED:
342 return !MSG_IS_FORWARDED(info->flags);
343 case MATCHCRITERIA_SUBJECT:
344 return matcherprop_string_match(prop, info->subject);
345 case MATCHCRITERIA_NOT_SUBJECT:
346 return !matcherprop_string_match(prop, info->subject);
347 case MATCHCRITERIA_FROM:
348 return matcherprop_string_match(prop, info->from);
349 case MATCHCRITERIA_NOT_FROM:
350 return !matcherprop_string_match(prop, info->from);
351 case MATCHCRITERIA_TO:
352 return matcherprop_string_match(prop, info->to);
353 case MATCHCRITERIA_NOT_TO:
354 return !matcherprop_string_match(prop, info->to);
355 case MATCHCRITERIA_CC:
356 return matcherprop_string_match(prop, info->cc);
357 case MATCHCRITERIA_NOT_CC:
358 return !matcherprop_string_match(prop, info->cc);
359 case MATCHCRITERIA_TO_OR_CC:
360 return matcherprop_string_match(prop, info->to)
361 || matcherprop_string_match(prop, info->cc);
362 case MATCHCRITERIA_NOT_TO_AND_NOT_CC:
363 return !(matcherprop_string_match(prop, info->to)
364 || matcherprop_string_match(prop, info->cc));
365 case MATCHCRITERIA_AGE_GREATER:
367 return ((t - info->date_t) / (60 * 60 * 24)) >= prop->value;
368 case MATCHCRITERIA_AGE_LOWER:
370 return ((t - info->date_t) / (60 * 60 * 24)) <= prop->value;
371 case MATCHCRITERIA_SCORE_GREATER:
372 return info->score >= prop->value;
373 case MATCHCRITERIA_SCORE_LOWER:
374 return info->score <= prop->value;
375 case MATCHCRITERIA_SCORE_EQUAL:
376 return info->score == prop->value;
377 case MATCHCRITERIA_SIZE_GREATER:
378 /* FIXME: info->size is an off_t */
379 return info->size > (off_t) prop->value;
380 case MATCHCRITERIA_SIZE_EQUAL:
381 /* FIXME: info->size is an off_t */
382 return info->size == (off_t) prop->value;
383 case MATCHCRITERIA_SIZE_SMALLER:
384 /* FIXME: info->size is an off_t */
385 return info->size < (off_t) prop->value;
386 case MATCHCRITERIA_NEWSGROUPS:
387 return matcherprop_string_match(prop, info->newsgroups);
388 case MATCHCRITERIA_NOT_NEWSGROUPS:
389 return !matcherprop_string_match(prop, info->newsgroups);
390 case MATCHCRITERIA_INREPLYTO:
391 return matcherprop_string_match(prop, info->inreplyto);
392 case MATCHCRITERIA_NOT_INREPLYTO:
393 return !matcherprop_string_match(prop, info->inreplyto);
394 case MATCHCRITERIA_REFERENCES:
395 return matcherprop_string_match(prop, info->references);
396 case MATCHCRITERIA_NOT_REFERENCES:
397 return !matcherprop_string_match(prop, info->references);
398 case MATCHCRITERIA_EXECUTE:
399 return matcherprop_match_execute(prop, info);
400 case MATCHCRITERIA_NOT_EXECUTE:
401 return !matcherprop_match_execute(prop, info);
407 /* ********************* MatcherList *************************** */
410 MatcherList * matcherlist_new(GSList * matchers, gboolean bool_and)
414 cond = g_new0(MatcherList, 1);
416 cond->matchers = matchers;
417 cond->bool_and = bool_and;
422 void matcherlist_free(MatcherList * cond)
426 for(l = cond->matchers ; l != NULL ; l = g_slist_next(l)) {
427 matcherprop_free((MatcherProp *) l->data);
436 static void matcherlist_skip_headers(FILE *fp)
440 while (procheader_get_one_field(buf, sizeof(buf), fp, NULL) != -1) {
445 matcherprop_match_one_header
446 returns TRUE if buf matchs the MatchersProp criteria
449 static gboolean matcherprop_match_one_header(MatcherProp * matcher,
455 switch(matcher->criteria) {
456 case MATCHCRITERIA_HEADER:
457 case MATCHCRITERIA_NOT_HEADER:
458 header = procheader_parse_header(buf);
461 if (procheader_headername_equal(header->name,
463 if (matcher->criteria == MATCHCRITERIA_HEADER)
464 result = matcherprop_string_match(matcher, header->body);
466 result = !matcherprop_string_match(matcher, header->body);
467 procheader_header_free(header);
471 procheader_header_free(header);
474 case MATCHCRITERIA_HEADERS_PART:
475 case MATCHCRITERIA_MESSAGE:
476 return matcherprop_string_match(matcher, buf);
477 case MATCHCRITERIA_NOT_MESSAGE:
478 case MATCHCRITERIA_NOT_HEADERS_PART:
479 return !matcherprop_string_match(matcher, buf);
485 matcherprop_criteria_header
486 returns TRUE if the headers must be matched
489 static gboolean matcherprop_criteria_headers(MatcherProp * matcher)
491 switch(matcher->criteria) {
492 case MATCHCRITERIA_HEADER:
493 case MATCHCRITERIA_NOT_HEADER:
494 case MATCHCRITERIA_HEADERS_PART:
495 case MATCHCRITERIA_NOT_HEADERS_PART:
502 static gboolean matcherprop_criteria_message(MatcherProp * matcher)
504 switch(matcher->criteria) {
505 case MATCHCRITERIA_MESSAGE:
506 case MATCHCRITERIA_NOT_MESSAGE:
514 matcherlist_match_one_header
515 returns TRUE if match should stop
518 static gboolean matcherlist_match_one_header(MatcherList * matchers,
523 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
524 MatcherProp * matcher = (MatcherProp *) l->data;
526 if (matcherprop_criteria_headers(matcher) ||
527 matcherprop_criteria_message(matcher)) {
528 if (matcherprop_match_one_header(matcher, buf)) {
529 matcher->result = TRUE;
533 if (matcherprop_criteria_headers(matcher)) {
534 if (matcher->result) {
535 if (!matchers->bool_and)
545 matcherlist_match_headers
546 returns TRUE if one of the headers matchs the MatcherList criteria
549 static gboolean matcherlist_match_headers(MatcherList * matchers, FILE * fp)
553 while (procheader_get_one_field(buf, sizeof(buf), fp, NULL) != -1)
554 if (matcherlist_match_one_header(matchers, buf))
561 matcherprop_criteria_body
562 returns TRUE if the body must be matched
565 static gboolean matcherprop_criteria_body(MatcherProp * matcher)
567 switch(matcher->criteria) {
568 case MATCHCRITERIA_BODY_PART:
569 case MATCHCRITERIA_NOT_BODY_PART:
577 matcherprop_match_line
578 returns TRUE if the string matchs the MatcherProp criteria
581 static gboolean matcherprop_match_line(MatcherProp * matcher, gchar * line)
583 switch(matcher->criteria) {
584 case MATCHCRITERIA_BODY_PART:
585 case MATCHCRITERIA_MESSAGE:
586 return matcherprop_string_match(matcher, line);
587 case MATCHCRITERIA_NOT_BODY_PART:
588 case MATCHCRITERIA_NOT_MESSAGE:
589 return !matcherprop_string_match(matcher, line);
595 matcherlist_match_line
596 returns TRUE if the string matchs the MatcherList criteria
599 static gboolean matcherlist_match_line(MatcherList * matchers, gchar * line)
603 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
604 MatcherProp * matcher = (MatcherProp *) l->data;
606 if (matcherprop_criteria_body(matcher) ||
607 matcherprop_criteria_message(matcher)) {
608 if (matcherprop_match_line(matcher, line)) {
609 matcher->result = TRUE;
613 if (matcher->result) {
614 if (!matchers->bool_and)
622 matcherlist_match_body
623 returns TRUE if one line of the body matchs the MatcherList criteria
626 static gboolean matcherlist_match_body(MatcherList * matchers, FILE * fp)
630 while (fgets(buf, sizeof(buf), fp) != NULL)
631 if (matcherlist_match_line(matchers, buf))
637 gboolean matcherlist_match_file(MatcherList * matchers, MsgInfo * info,
640 gboolean read_headers;
646 /* file need to be read ? */
648 read_headers = FALSE;
650 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
651 MatcherProp * matcher = (MatcherProp *) l->data;
653 if (matcherprop_criteria_headers(matcher))
655 if (matcherprop_criteria_body(matcher))
657 if (matcherprop_criteria_message(matcher)) {
661 matcher->result = FALSE;
664 if (!read_headers && !read_body)
667 file = procmsg_get_message_file(info);
671 if ((fp = fopen(file, "rb")) == NULL) {
672 FILE_OP_ERROR(file, "fopen");
677 /* read the headers */
680 if (matcherlist_match_headers(matchers, fp))
684 matcherlist_skip_headers(fp);
689 matcherlist_match_body(matchers, fp);
692 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
693 MatcherProp * matcher = (MatcherProp *) l->data;
695 if (matcherprop_criteria_headers(matcher) ||
696 matcherprop_criteria_body(matcher) ||
697 matcherprop_criteria_message(matcher)) {
698 if (matcher->result) {
699 if (!matchers->bool_and) {
705 if (matchers->bool_and) {
720 /* test a list of condition */
722 gboolean matcherlist_match(MatcherList * matchers, MsgInfo * info)
727 if (matchers->bool_and)
732 /* test the cached elements */
734 for(l = matchers->matchers ; l != NULL ; l = g_slist_next(l)) {
735 MatcherProp * matcher = (MatcherProp *) l->data;
737 switch(matcher->criteria) {
738 case MATCHCRITERIA_ALL:
739 case MATCHCRITERIA_UNREAD:
740 case MATCHCRITERIA_NOT_UNREAD:
741 case MATCHCRITERIA_NEW:
742 case MATCHCRITERIA_NOT_NEW:
743 case MATCHCRITERIA_MARKED:
744 case MATCHCRITERIA_NOT_MARKED:
745 case MATCHCRITERIA_DELETED:
746 case MATCHCRITERIA_NOT_DELETED:
747 case MATCHCRITERIA_REPLIED:
748 case MATCHCRITERIA_NOT_REPLIED:
749 case MATCHCRITERIA_FORWARDED:
750 case MATCHCRITERIA_NOT_FORWARDED:
751 case MATCHCRITERIA_SUBJECT:
752 case MATCHCRITERIA_NOT_SUBJECT:
753 case MATCHCRITERIA_FROM:
754 case MATCHCRITERIA_NOT_FROM:
755 case MATCHCRITERIA_TO:
756 case MATCHCRITERIA_NOT_TO:
757 case MATCHCRITERIA_CC:
758 case MATCHCRITERIA_NOT_CC:
759 case MATCHCRITERIA_TO_OR_CC:
760 case MATCHCRITERIA_NOT_TO_AND_NOT_CC:
761 case MATCHCRITERIA_AGE_GREATER:
762 case MATCHCRITERIA_AGE_LOWER:
763 case MATCHCRITERIA_NEWSGROUPS:
764 case MATCHCRITERIA_NOT_NEWSGROUPS:
765 case MATCHCRITERIA_INREPLYTO:
766 case MATCHCRITERIA_NOT_INREPLYTO:
767 case MATCHCRITERIA_REFERENCES:
768 case MATCHCRITERIA_NOT_REFERENCES:
769 case MATCHCRITERIA_SCORE_GREATER:
770 case MATCHCRITERIA_SCORE_LOWER:
771 case MATCHCRITERIA_SCORE_EQUAL:
772 case MATCHCRITERIA_SIZE_GREATER:
773 case MATCHCRITERIA_SIZE_SMALLER:
774 case MATCHCRITERIA_SIZE_EQUAL:
775 case MATCHCRITERIA_EXECUTE:
776 case MATCHCRITERIA_NOT_EXECUTE:
777 if (matcherprop_match(matcher, info)) {
778 if (!matchers->bool_and) {
783 if (matchers->bool_and) {
790 /* test the condition on the file */
792 if (matcherlist_match_file(matchers, info, result)) {
793 if (!matchers->bool_and)
797 if (matchers->bool_and)
805 gchar * matcherprop_to_string(MatcherProp * matcher)
807 gchar * matcher_str = NULL;
808 gchar * criteria_str;
809 gchar * matchtype_str;
817 for(i = 0 ; i < (int) (sizeof(matchparser_tab) / sizeof(MatchParser)) ;
819 if (matchparser_tab[i].id == matcher->criteria)
820 criteria_str = matchparser_tab[i].str;
822 if (criteria_str == NULL)
825 switch(matcher->criteria) {
826 case MATCHCRITERIA_AGE_GREATER:
827 case MATCHCRITERIA_AGE_LOWER:
828 case MATCHCRITERIA_SCORE_GREATER:
829 case MATCHCRITERIA_SCORE_LOWER:
830 case MATCHCRITERIA_SCORE_EQUAL:
831 case MATCHCRITERIA_SIZE_GREATER:
832 case MATCHCRITERIA_SIZE_SMALLER:
833 case MATCHCRITERIA_SIZE_EQUAL:
834 return g_strdup_printf("%s %i", criteria_str, matcher->value);
835 case MATCHCRITERIA_ALL:
836 case MATCHCRITERIA_UNREAD:
837 case MATCHCRITERIA_NOT_UNREAD:
838 case MATCHCRITERIA_NEW:
839 case MATCHCRITERIA_NOT_NEW:
840 case MATCHCRITERIA_MARKED:
841 case MATCHCRITERIA_NOT_MARKED:
842 case MATCHCRITERIA_DELETED:
843 case MATCHCRITERIA_NOT_DELETED:
844 case MATCHCRITERIA_REPLIED:
845 case MATCHCRITERIA_NOT_REPLIED:
846 case MATCHCRITERIA_FORWARDED:
847 case MATCHCRITERIA_NOT_FORWARDED:
848 return g_strdup(criteria_str);
851 matchtype_str = NULL;
852 for(i = 0 ; i < (int) (sizeof(matchparser_tab) / sizeof(MatchParser)) ;
854 if (matchparser_tab[i].id == matcher->matchtype)
855 matchtype_str = matchparser_tab[i].str;
858 if (matchtype_str == NULL)
861 switch (matcher->matchtype) {
862 case MATCHTYPE_MATCH:
863 case MATCHTYPE_MATCHCASE:
864 case MATCHTYPE_REGEXP:
865 case MATCHTYPE_REGEXPCASE:
868 g_strdup_printf("%s \"%s\" %s \"%s\"",
869 criteria_str, matcher->header,
870 matchtype_str, matcher->expr);
873 g_strdup_printf("%s %s \"%s\"", criteria_str,
874 matchtype_str, matcher->expr);
881 gchar * matcherlist_to_string(MatcherList * matchers)
889 count = g_slist_length(matchers->matchers);
890 vstr = g_new(gchar *, count + 1);
892 for (l = matchers->matchers, cur_str = vstr ; l != NULL ;
893 l = g_slist_next(l), cur_str ++) {
894 *cur_str = matcherprop_to_string((MatcherProp *) l->data);
895 if (*cur_str == NULL)
900 if (matchers->bool_and)
901 result = g_strjoinv(" & ", vstr);
903 result = g_strjoinv(" | ", vstr);
905 for(cur_str = vstr ; *cur_str != NULL ; cur_str ++)
912 /* matching_build_command() - preferably cmd should be unescaped */
913 gchar * matching_build_command(gchar * cmd, MsgInfo * info)
916 gchar * filename = NULL;
917 gchar * processed_cmd;
921 size = strlen(cmd) + 1;
929 case 's': /* subject */
930 size += strlen(info->subject) - 2;
933 size += strlen(info->from) - 2;
936 size += strlen(info->to) - 2;
939 size += strlen(info->cc) - 2;
942 size += strlen(info->date) - 2;
944 case 'i': /* message-id */
945 size += strlen(info->msgid) - 2;
947 case 'n': /* newsgroups */
948 size += strlen(info->newsgroups) - 2;
950 case 'r': /* references */
951 size += strlen(info->references) - 2;
954 filename = folder_item_fetch_msg(info->folder,
957 if (filename == NULL) {
958 g_warning(_("filename is not set"));
962 size += strlen(filename) - 2;
971 processed_cmd = g_new0(gchar, size);
983 case 's': /* subject */
984 if (info->subject != NULL)
985 strcpy(p, info->subject);
987 strcpy(p, _("(none)"));
991 if (info->from != NULL)
992 strcpy(p, info->from);
994 strcpy(p, _("(none)"));
998 if (info->to != NULL)
1001 strcpy(p, _("(none)"));
1005 if (info->cc != NULL)
1006 strcpy(p, info->cc);
1008 strcpy(p, _("(none)"));
1011 case 'd': /* date */
1012 if (info->date != NULL)
1013 strcpy(p, info->date);
1015 strcpy(p, _("(none)"));
1018 case 'i': /* message-id */
1019 if (info->msgid != NULL)
1020 strcpy(p, info->msgid);
1022 strcpy(p, _("(none)"));
1025 case 'n': /* newsgroups */
1026 if (info->newsgroups != NULL)
1027 strcpy(p, info->newsgroups);
1029 strcpy(p, _("(none)"));
1032 case 'r': /* references */
1033 if (info->references != NULL)
1034 strcpy(p, info->references);
1036 strcpy(p, _("(none)"));
1039 case 'F': /* file */
1040 strcpy(p, filename);
1059 debug_print("*** exec string \"%s\"\n", processed_cmd);
1060 return processed_cmd;
1063 /* ************************************************************ */
1065 static void prefs_scoring_write(FILE * fp, GSList * prefs_scoring)
1069 for (cur = prefs_scoring; cur != NULL; cur = cur->next) {
1073 prop = (ScoringProp *) cur->data;
1074 scoring_str = scoringprop_to_string(prop);
1075 if (fputs(scoring_str, fp) == EOF ||
1076 fputc('\n', fp) == EOF) {
1077 FILE_OP_ERROR("scoring config", "fputs || fputc");
1078 g_free(scoring_str);
1081 g_free(scoring_str);
1085 static void prefs_filtering_write(FILE * fp, GSList * prefs_scoring)
1089 for (cur = prefs_scoring; cur != NULL; cur = cur->next) {
1090 gchar *filtering_str;
1091 FilteringProp * prop;
1093 if (NULL == (prop = (FilteringProp *) cur->data))
1096 if (NULL == (filtering_str = filteringprop_to_string(prop)))
1099 if (fputs(filtering_str, fp) == EOF ||
1100 fputc('\n', fp) == EOF) {
1101 FILE_OP_ERROR("filtering config", "fputs || fputc");
1102 g_free(filtering_str);
1105 g_free(filtering_str);
1109 static gboolean prefs_matcher_write_func(GNode *node, gpointer data)
1114 GSList * prefs_scoring;
1115 GSList * prefs_filtering;
1119 /* prevent from the warning */
1120 if (item->path == NULL)
1122 id = folder_item_get_identifier(item);
1125 prefs_scoring = item->prefs->scoring;
1126 prefs_filtering = item->prefs->processing;
1130 id = g_strdup("global"); /* because it is g_freed */
1131 prefs_scoring = global_scoring;
1132 prefs_filtering = global_processing;
1135 if (prefs_filtering != NULL || prefs_scoring != NULL) {
1136 fprintf(fp, "[%s]\n", id);
1138 prefs_filtering_write(fp, prefs_filtering);
1139 prefs_scoring_write(fp, prefs_scoring);
1149 static void prefs_matcher_save(FILE * fp)
1153 for (cur = folder_get_list() ; cur != NULL ; cur = g_list_next(cur)) {
1156 folder = (Folder *) cur->data;
1157 g_node_traverse(folder->node, G_PRE_ORDER, G_TRAVERSE_ALL, -1,
1158 prefs_matcher_write_func, fp);
1160 prefs_matcher_write_func(NULL, fp);
1164 void prefs_matcher_write_config(void)
1171 debug_print(_("Writing matcher configuration...\n"));
1173 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
1176 if ((pfile = prefs_write_open(rcpath)) == NULL) {
1177 g_warning(_("failed to write configuration to file\n"));
1183 prefs_matcher_save(pfile->fp);
1187 if (prefs_write_close(pfile) < 0) {
1188 g_warning(_("failed to write configuration to file\n"));
1193 /* ******************************************************************* */
1195 void prefs_matcher_read_config(void)
1200 prefs_scoring_clear();
1201 prefs_filtering_clear();
1203 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, MATCHER_RC, NULL);
1204 f = fopen(rcpath, "rb");
1208 matcher_parser_start_parsing(f);
1210 /* previous version compatibily */
1212 /* printf("reading filtering\n"); */
1213 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
1214 FILTERING_RC, NULL);
1215 f = fopen(rcpath, "rb");
1219 matcher_parser_start_parsing(f);
1220 fclose(matcher_parserin);
1223 /* printf("reading scoring\n"); */
1224 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
1226 f = fopen(rcpath, "rb");
1230 matcher_parser_start_parsing(f);
1231 fclose(matcher_parserin);