1 %{
2 /*
3  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
4  * Copyright (c) 2001-2014 by Hiroyuki Yamamoto & The Claws Mail Team
5  *
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 3 of the License, or
9  * (at your option) any later version.
10  *
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.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program. If not, see <http://www.gnu.org/licenses/>.
18  *
19  */
20 
21 #include "defs.h"
22 
23 #include <glib.h>
24 #include <glib/gi18n.h>
25 
26 #include "utils.h"
27 #include "filtering.h"
28 #include "procheader.h"
29 #include "matcher.h"
30 #include "matcher_parser.h"
31 #include "matcher_parser_lex.h"
32 #include "colorlabel.h"
33 #include "folder_item_prefs.h"
34 
35 static gint error = 0;
36 static gint bool_op = 0;
37 static gint match_type = 0;
38 static gchar *header = NULL;
39 
40 static MatcherProp *prop;
41 
42 static GSList *matchers_list = NULL;
43 
44 static gboolean enabled = TRUE;
45 static gchar *name = NULL;
46 static gint account_id = 0;
47 static MatcherList *cond;
48 static GSList *action_list = NULL;
49 static FilteringAction *action = NULL;
50 static gboolean matcher_is_fast = TRUE;
51 static gboolean disable_warnings = FALSE;
52 
53 static FilteringProp *filtering;
54 static gboolean filtering_ptr_externally_managed = FALSE;
55 
56 static GSList **prefs_filtering = NULL;
57 static int enable_compatibility = 0;
58 
59 enum {
60         MATCHER_PARSE_FILE,
61         MATCHER_PARSE_NO_EOL,
62 	MATCHER_PARSE_ENABLED,
63 	MATCHER_PARSE_NAME,
64 	MATCHER_PARSE_ACCOUNT,
65         MATCHER_PARSE_CONDITION,
66         MATCHER_PARSE_FILTERING_ACTION,
67 };
68 
69 static int matcher_parse_op = MATCHER_PARSE_FILE;
70 
71 
72 /* ******************************************************************** */
73 /* redeclarations to avoid warnings */
74 void matcher_parserrestart(FILE *input_file);
75 void matcher_parser_init(void);
76 void matcher_parser_switch_to_buffer(void * new_buffer);
77 void matcher_parser_delete_buffer(void * b);
78 void matcher_parserpop_buffer_state(void);
79 int matcher_parserlex(void);
80 
matcher_parser_disable_warnings(const gboolean disable)81 void matcher_parser_disable_warnings(const gboolean disable)
82 {
83 	disable_warnings = disable;
84 }
85 
matcher_parser_start_parsing(FILE * f)86 void matcher_parser_start_parsing(FILE *f)
87 {
88 	matcher_parserlineno = 1;
89 	matcher_parserrestart(f);
90 	account_id = 0;
91 	matcher_parserparse();
92 }
93 
94 
95 void * matcher_parser_scan_string(const char * str);
96 
matcher_parser_get_filtering(gchar * str)97 FilteringProp *matcher_parser_get_filtering(gchar *str)
98 {
99 	void *bufstate;
100 	void *tmp_str = NULL;
101 
102 	/* little hack to allow passing rules with no names */
103 	if (!strncmp(str, "rulename ", 9))
104 		tmp_str = g_strdup(str);
105 	else
106 		tmp_str = g_strconcat("rulename \"\" ", str, NULL);
107 
108 	/* bad coding to enable the sub-grammar matching
109 	   in yacc */
110 	matcher_parserlineno = 1;
111 	matcher_parse_op = MATCHER_PARSE_NO_EOL;
112 	matcher_parserrestart(NULL);
113 	matcher_parserpop_buffer_state();
114         matcher_parser_init();
115 	bufstate = matcher_parser_scan_string((const char *) tmp_str);
116         matcher_parser_switch_to_buffer(bufstate);
117 	/* Indicate that we will be using the global "filtering" pointer,
118 	 * so that yyparse does not free it in "filtering_action_list"
119 	 * section. */
120 	filtering_ptr_externally_managed = TRUE;
121 	if (matcher_parserparse() != 0)
122 		filtering = NULL;
123 	matcher_parse_op = MATCHER_PARSE_FILE;
124 	matcher_parser_delete_buffer(bufstate);
125 	g_free(tmp_str);
126 	filtering_ptr_externally_managed = FALSE; /* Return to normal. */
127 	return filtering;
128 }
129 
check_quote_symetry(gchar * str)130 static gboolean check_quote_symetry(gchar *str)
131 {
132 	const gchar *walk;
133 	int ret = 0;
134 
135 	if (str == NULL)
136 		return TRUE; /* heh, that's symetric */
137 	if (*str == '\0')
138 		return TRUE;
139 	for (walk = str; *walk; walk++) {
140 		if (*walk == '\"') {
141 			if (walk == str 	/* first char */
142 			|| *(walk - 1) != '\\') /* not escaped */
143 				ret ++;
144 		}
145 	}
146 	return !(ret % 2);
147 }
148 
matcher_parser_get_name(gchar * str)149 MatcherList *matcher_parser_get_name(gchar *str)
150 {
151 	void *bufstate;
152 
153 	if (!check_quote_symetry(str)) {
154 		cond = NULL;
155 		return cond;
156 	}
157 
158 	/* bad coding to enable the sub-grammar matching
159 	   in yacc */
160 	matcher_parserlineno = 1;
161 	matcher_parse_op = MATCHER_PARSE_NAME;
162 	matcher_parserrestart(NULL);
163 	matcher_parserpop_buffer_state();
164         matcher_parser_init();
165 	bufstate = matcher_parser_scan_string(str);
166 	matcher_parserparse();
167 	matcher_parse_op = MATCHER_PARSE_FILE;
168 	matcher_parser_delete_buffer(bufstate);
169 	return cond;
170 }
171 
matcher_parser_get_enabled(gchar * str)172 MatcherList *matcher_parser_get_enabled(gchar *str)
173 {
174 	void *bufstate;
175 
176 	if (!check_quote_symetry(str)) {
177 		cond = NULL;
178 		return cond;
179 	}
180 
181 	/* bad coding to enable the sub-grammar matching
182 	   in yacc */
183 	matcher_parserlineno = 1;
184 	matcher_parse_op = MATCHER_PARSE_ENABLED;
185 	matcher_parserrestart(NULL);
186 	matcher_parserpop_buffer_state();
187 	matcher_parser_init();
188 	bufstate = matcher_parser_scan_string(str);
189 	matcher_parserparse();
190 	matcher_parse_op = MATCHER_PARSE_FILE;
191 	matcher_parser_delete_buffer(bufstate);
192 	return cond;
193 }
194 
matcher_parser_get_account(gchar * str)195 MatcherList *matcher_parser_get_account(gchar *str)
196 {
197 	void *bufstate;
198 
199 	if (!check_quote_symetry(str)) {
200 		cond = NULL;
201 		return cond;
202 	}
203 
204 	/* bad coding to enable the sub-grammar matching
205 	   in yacc */
206 	matcher_parserlineno = 1;
207 	matcher_parse_op = MATCHER_PARSE_ACCOUNT;
208 	matcher_parserrestart(NULL);
209 	matcher_parserpop_buffer_state();
210 	matcher_parser_init();
211 	bufstate = matcher_parser_scan_string(str);
212 	matcher_parserparse();
213 	matcher_parse_op = MATCHER_PARSE_FILE;
214 	matcher_parser_delete_buffer(bufstate);
215 	return cond;
216 }
217 
matcher_parser_get_cond(gchar * str,gboolean * is_fast)218 MatcherList *matcher_parser_get_cond(gchar *str, gboolean *is_fast)
219 {
220 	void *bufstate;
221 
222 	if (!check_quote_symetry(str)) {
223 		cond = NULL;
224 		return cond;
225 	}
226 
227 	matcher_is_fast = TRUE;
228 	/* bad coding to enable the sub-grammar matching
229 	   in yacc */
230 	matcher_parserlineno = 1;
231 	matcher_parse_op = MATCHER_PARSE_CONDITION;
232 	matcher_parserrestart(NULL);
233 	matcher_parserpop_buffer_state();
234         matcher_parser_init();
235 	bufstate = matcher_parser_scan_string(str);
236 	matcher_parserparse();
237 	matcher_parse_op = MATCHER_PARSE_FILE;
238 	matcher_parser_delete_buffer(bufstate);
239 	if (is_fast)
240 		*is_fast = matcher_is_fast;
241 	return cond;
242 }
243 
matcher_parser_get_action_list(gchar * str)244 GSList *matcher_parser_get_action_list(gchar *str)
245 {
246 	void *bufstate;
247 
248 	if (!check_quote_symetry(str)) {
249 		action_list = NULL;
250 		return action_list;
251 	}
252 
253 	/* bad coding to enable the sub-grammar matching
254 	   in yacc */
255 	matcher_parserlineno = 1;
256 	matcher_parse_op = MATCHER_PARSE_FILTERING_ACTION;
257 	matcher_parserrestart(NULL);
258 	matcher_parserpop_buffer_state();
259         matcher_parser_init();
260 	bufstate = matcher_parser_scan_string(str);
261 	matcher_parserparse();
262 	matcher_parse_op = MATCHER_PARSE_FILE;
263 	matcher_parser_delete_buffer(bufstate);
264 	return action_list;
265 }
266 
matcher_parser_get_prop(gchar * str)267 MatcherProp *matcher_parser_get_prop(gchar *str)
268 {
269 	MatcherList *list;
270 	MatcherProp *prop;
271 
272 	matcher_parserlineno = 1;
273 	list = matcher_parser_get_cond(str, NULL);
274 	if (list == NULL)
275 		return NULL;
276 
277 	if (list->matchers == NULL)
278 		return NULL;
279 
280 	if (list->matchers->next != NULL)
281 		return NULL;
282 
283 	prop = list->matchers->data;
284 
285 	g_slist_free(list->matchers);
286 	g_free(list);
287 
288 	return prop;
289 }
290 
matcher_parsererror(char * str)291 void matcher_parsererror(char *str)
292 {
293 	GSList *l;
294 
295 	if (matchers_list) {
296 		for (l = matchers_list; l != NULL; l = g_slist_next(l)) {
297 			matcherprop_free((MatcherProp *)
298 					 l->data);
299 			l->data = NULL;
300 		}
301 		g_slist_free(matchers_list);
302 		matchers_list = NULL;
303 	}
304 	cond = NULL;
305 	if (!disable_warnings)
306 		g_warning("filtering parsing: %i: %s",
307 		  	matcher_parserlineno, str);
308 	error = 1;
309 }
310 
matcher_parserwrap(void)311 int matcher_parserwrap(void)
312 {
313 	return 1;
314 }
315 %}
316 
317 %union {
318 	char *str;
319 	int value;
320 }
321 %token MATCHER_ALL MATCHER_UNREAD  MATCHER_NOT_UNREAD
322 %token MATCHER_NEW  MATCHER_NOT_NEW  MATCHER_MARKED
323 %token MATCHER_NOT_MARKED  MATCHER_DELETED  MATCHER_NOT_DELETED
324 %token MATCHER_REPLIED  MATCHER_NOT_REPLIED  MATCHER_FORWARDED
325 %token MATCHER_NOT_FORWARDED  MATCHER_SUBJECT  MATCHER_NOT_SUBJECT
326 %token MATCHER_FROM  MATCHER_NOT_FROM  MATCHER_TO  MATCHER_NOT_TO
327 %token MATCHER_CC  MATCHER_NOT_CC  MATCHER_TO_OR_CC  MATCHER_NOT_TO_AND_NOT_CC
328 %token MATCHER_AGE_GREATER  MATCHER_AGE_LOWER  MATCHER_NEWSGROUPS
329 %token MATCHER_AGE_GREATER_HOURS  MATCHER_AGE_LOWER_HOURS
330 %token MATCHER_DATE_AFTER  MATCHER_DATE_BEFORE
331 %token MATCHER_NOT_NEWSGROUPS  MATCHER_INREPLYTO  MATCHER_NOT_INREPLYTO
332 %token MATCHER_MESSAGEID MATCHER_NOT_MESSAGEID
333 %token MATCHER_REFERENCES  MATCHER_NOT_REFERENCES  MATCHER_SCORE_GREATER
334 %token MATCHER_SCORE_LOWER  MATCHER_HEADER  MATCHER_NOT_HEADER
335 %token MATCHER_HEADERS_PART  MATCHER_NOT_HEADERS_PART  MATCHER_MESSAGE
336 %token MATCHER_HEADERS_CONT  MATCHER_NOT_HEADERS_CONT
337 %token MATCHER_NOT_MESSAGE  MATCHER_BODY_PART  MATCHER_NOT_BODY_PART
338 %token MATCHER_TEST  MATCHER_NOT_TEST  MATCHER_MATCHCASE  MATCHER_MATCH
339 %token MATCHER_REGEXPCASE  MATCHER_REGEXP  MATCHER_SCORE  MATCHER_MOVE
340 %token MATCHER_FOUND_IN_ADDRESSBOOK MATCHER_NOT_FOUND_IN_ADDRESSBOOK MATCHER_IN
341 %token MATCHER_COPY  MATCHER_DELETE  MATCHER_MARK  MATCHER_UNMARK
342 %token MATCHER_LOCK MATCHER_UNLOCK
343 %token MATCHER_EXECUTE
344 %token MATCHER_MARK_AS_READ  MATCHER_MARK_AS_UNREAD  MATCHER_FORWARD
345 %token MATCHER_MARK_AS_SPAM MATCHER_MARK_AS_HAM
346 %token MATCHER_FORWARD_AS_ATTACHMENT  MATCHER_EOL
347 %token MATCHER_OR MATCHER_AND
348 %token MATCHER_COLOR MATCHER_SCORE_EQUAL MATCHER_REDIRECT
349 %token MATCHER_SIZE_GREATER MATCHER_SIZE_SMALLER MATCHER_SIZE_EQUAL
350 %token MATCHER_LOCKED MATCHER_NOT_LOCKED
351 %token MATCHER_PARTIAL MATCHER_NOT_PARTIAL
352 %token MATCHER_COLORLABEL MATCHER_NOT_COLORLABEL
353 %token MATCHER_IGNORE_THREAD MATCHER_NOT_IGNORE_THREAD
354 %token MATCHER_WATCH_THREAD MATCHER_NOT_WATCH_THREAD
355 %token MATCHER_CHANGE_SCORE MATCHER_SET_SCORE
356 %token MATCHER_ADD_TO_ADDRESSBOOK
357 %token MATCHER_STOP MATCHER_HIDE MATCHER_IGNORE MATCHER_WATCH
358 %token MATCHER_SPAM MATCHER_NOT_SPAM
359 %token MATCHER_HAS_ATTACHMENT MATCHER_HAS_NO_ATTACHMENT
360 %token MATCHER_SIGNED MATCHER_NOT_SIGNED
361 %token MATCHER_TAG MATCHER_NOT_TAG MATCHER_SET_TAG MATCHER_UNSET_TAG
362 %token MATCHER_TAGGED MATCHER_NOT_TAGGED MATCHER_CLEAR_TAGS
363 
364 %start file
365 
366 %token MATCHER_ENABLED MATCHER_DISABLED
367 %token MATCHER_RULENAME
368 %token MATCHER_ACCOUNT
369 %token <str> MATCHER_STRING
370 %token <str> MATCHER_SECTION
371 %token <str> MATCHER_INTEGER
372 
373 %%
374 
375 file:
376 {
377 	if (matcher_parse_op == MATCHER_PARSE_FILE) {
378 		prefs_filtering = &pre_global_processing;
379 	}
380 }
381 file_line_list;
382 
383 file_line_list:
384 file_line
385 file_line_list
386 | file_line
387 ;
388 
389 file_line:
390 section_notification
391 |
392 { action_list = NULL; }
393 instruction
394 | error MATCHER_EOL
395 {
396 	yyerrok;
397 };
398 
399 section_notification:
400 MATCHER_SECTION MATCHER_EOL
401 {
402 	gchar *folder = $1;
403 	FolderItem *item = NULL;
404 
405 	if (matcher_parse_op == MATCHER_PARSE_FILE) {
406                 enable_compatibility = 0;
407 		if (!strcmp(folder, "global")) {
408                         /* backward compatibility */
409                         enable_compatibility = 1;
410                 }
411 		else if (!strcmp(folder, "preglobal")) {
412 			prefs_filtering = &pre_global_processing;
413                 }
414 		else if (!strcmp(folder, "postglobal")) {
415 			prefs_filtering = &post_global_processing;
416                 }
417 		else if (!strcmp(folder, "filtering")) {
418                         prefs_filtering = &filtering_rules;
419 		}
420                 else {
421 			item = folder_find_item_from_identifier(folder);
422 			if (item != NULL) {
423 				prefs_filtering = &item->prefs->processing;
424 			} else {
425 				prefs_filtering = NULL;
426 			}
427 		}
428 	}
429 }
430 ;
431 
432 instruction:
433 enabled name account condition filtering MATCHER_EOL
434 | enabled name account condition filtering
435 | enabled name condition filtering MATCHER_EOL
436 | enabled name condition filtering
437 | name condition filtering MATCHER_EOL
438 | name condition filtering
439 {
440 	if (matcher_parse_op == MATCHER_PARSE_NO_EOL)
441 		YYACCEPT;
442 	else {
443 		matcher_parsererror("parse error [no eol]");
444 		YYERROR;
445 	}
446 }
447 | enabled
448 {
449 	if (matcher_parse_op == MATCHER_PARSE_ENABLED)
450 		YYACCEPT;
451 	else {
452 		matcher_parsererror("parse error [enabled]");
453 		YYERROR;
454 	}
455 }
456 | account
457 {
458 	if (matcher_parse_op == MATCHER_PARSE_ACCOUNT)
459 		YYACCEPT;
460 	else {
461 		matcher_parsererror("parse error [account]");
462 		YYERROR;
463 	}
464 }
465 | name
466 {
467 	if (matcher_parse_op == MATCHER_PARSE_NAME)
468 		YYACCEPT;
469 	else {
470 		matcher_parsererror("parse error [name]");
471 		YYERROR;
472 	}
473 }
474 | condition
475 {
476 	if (matcher_parse_op == MATCHER_PARSE_CONDITION)
477 		YYACCEPT;
478 	else {
479 		matcher_parsererror("parse error [condition]");
480 		YYERROR;
481 	}
482 }
483 | filtering_action_list
484 {
485 	if (matcher_parse_op == MATCHER_PARSE_FILTERING_ACTION)
486 		YYACCEPT;
487 	else {
488 		matcher_parsererror("parse error [filtering action]");
489 		YYERROR;
490 	}
491 }
492 | MATCHER_EOL
493 ;
494 
495 enabled:
496 MATCHER_ENABLED
497 {
498 	enabled = TRUE;
499 }
500 | MATCHER_DISABLED
501 {
502 	enabled = FALSE;
503 }
504 ;
505 
506 name:
507 MATCHER_RULENAME MATCHER_STRING
508 {
509 	name = g_strdup($2);
510 }
511 ;
512 
513 account:
514 MATCHER_ACCOUNT MATCHER_INTEGER
515 {
516 	account_id = strtol($2, NULL, 10);
517 }
518 ;
519 
520 filtering:
521 filtering_action_list
522 {
523 	filtering = filteringprop_new(enabled, name, account_id, cond, action_list);
524 	enabled = TRUE;
525 	account_id = 0;
526 	g_free(name);
527 	name = NULL;
528         if (enable_compatibility) {
529                 prefs_filtering = &filtering_rules;
530                 if (action_list != NULL) {
531                         FilteringAction * first_action;
532 
533                         first_action = action_list->data;
534 
535                         if (first_action->type == MATCHACTION_CHANGE_SCORE)
536                                 prefs_filtering = &pre_global_processing;
537                 }
538         }
539 
540 	cond = NULL;
541 	action_list = NULL;
542 
543 	if ((matcher_parse_op == MATCHER_PARSE_FILE) &&
544             (prefs_filtering != NULL)) {
545 		*prefs_filtering = g_slist_append(*prefs_filtering,
546 						  filtering);
547 		filtering = NULL;
548 	} else if (!filtering_ptr_externally_managed) {
549 		/* If filtering_ptr_externally_managed was TRUE, it
550 		 * would mean that some function higher in the stack is
551 		 * interested in the data "filtering" is pointing at, so
552 		 * we would not free it. That function has to free it itself.
553 		 * At the time of writing this, the only function that
554 		 * does this is matcher_parser_get_filtering(). */
555 		filteringprop_free(filtering);
556 		filtering = NULL;
557 	}
558 }
559 ;
560 
561 filtering_action_list:
562 filtering_action_b filtering_action_list
563 | filtering_action_b
564 ;
565 
566 filtering_action_b:
567 filtering_action
568 {
569         action_list = g_slist_append(action_list, action);
570         action = NULL;
571 }
572 ;
573 
574 match_type:
575 MATCHER_MATCHCASE
576 {
577 	match_type = MATCHTYPE_MATCHCASE;
578 }
579 | MATCHER_MATCH
580 {
581 	match_type = MATCHTYPE_MATCH;
582 }
583 | MATCHER_REGEXPCASE
584 {
585 	match_type = MATCHTYPE_REGEXPCASE;
586 }
587 | MATCHER_REGEXP
588 {
589 	match_type = MATCHTYPE_REGEXP;
590 }
591 ;
592 
593 condition:
594 condition_list
595 {
596 	cond = matcherlist_new(matchers_list, (bool_op == MATCHERBOOL_AND));
597 	matchers_list = NULL;
598 }
599 ;
600 
601 condition_list:
602 condition_list bool_op one_condition
603 {
604 	matchers_list = g_slist_append(matchers_list, prop);
605 }
606 | one_condition
607 {
608 	matchers_list = NULL;
609 	matchers_list = g_slist_append(matchers_list, prop);
610 }
611 ;
612 
613 bool_op:
614 MATCHER_AND
615 {
616 	bool_op = MATCHERBOOL_AND;
617 }
618 | MATCHER_OR
619 {
620 	bool_op = MATCHERBOOL_OR;
621 }
622 ;
623 
624 one_condition:
625 MATCHER_ALL
626 {
627 	gint criteria = 0;
628 
629 	criteria = MATCHCRITERIA_ALL;
630 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
631 }
632 | MATCHER_UNREAD
633 {
634 	gint criteria = 0;
635 
636 	criteria = MATCHCRITERIA_UNREAD;
637 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
638 }
639 | MATCHER_NOT_UNREAD
640 {
641 	gint criteria = 0;
642 
643 	criteria = MATCHCRITERIA_NOT_UNREAD;
644 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
645 }
646 | MATCHER_NEW
647 {
648 	gint criteria = 0;
649 
650 	criteria = MATCHCRITERIA_NEW;
651 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
652 }
653 | MATCHER_NOT_NEW
654 {
655 	gint criteria = 0;
656 
657 	criteria = MATCHCRITERIA_NOT_NEW;
658 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
659 }
660 | MATCHER_MARKED
661 {
662 	gint criteria = 0;
663 
664 	criteria = MATCHCRITERIA_MARKED;
665 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
666 }
667 | MATCHER_NOT_MARKED
668 {
669 	gint criteria = 0;
670 
671 	criteria = MATCHCRITERIA_NOT_MARKED;
672 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
673 }
674 | MATCHER_DELETED
675 {
676 	gint criteria = 0;
677 
678 	criteria = MATCHCRITERIA_DELETED;
679 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
680 }
681 | MATCHER_NOT_DELETED
682 {
683 	gint criteria = 0;
684 
685 	criteria = MATCHCRITERIA_NOT_DELETED;
686 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
687 }
688 | MATCHER_REPLIED
689 {
690 	gint criteria = 0;
691 
692 	criteria = MATCHCRITERIA_REPLIED;
693 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
694 }
695 | MATCHER_NOT_REPLIED
696 {
697 	gint criteria = 0;
698 
699 	criteria = MATCHCRITERIA_NOT_REPLIED;
700 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
701 }
702 | MATCHER_FORWARDED
703 {
704 	gint criteria = 0;
705 
706 	criteria = MATCHCRITERIA_FORWARDED;
707 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
708 }
709 | MATCHER_NOT_FORWARDED
710 {
711 	gint criteria = 0;
712 
713 	criteria = MATCHCRITERIA_NOT_FORWARDED;
714 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
715 }
716 | MATCHER_LOCKED
717 {
718 	gint criteria = 0;
719 
720 	criteria = MATCHCRITERIA_LOCKED;
721 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
722 }
723 | MATCHER_NOT_LOCKED
724 {
725 	gint criteria = 0;
726 
727 	criteria = MATCHCRITERIA_NOT_LOCKED;
728 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
729 }
730 | MATCHER_SPAM
731 {
732 	gint criteria = 0;
733 
734 	criteria = MATCHCRITERIA_SPAM;
735 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
736 }
737 | MATCHER_NOT_SPAM
738 {
739 	gint criteria = 0;
740 
741 	criteria = MATCHCRITERIA_NOT_SPAM;
742 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
743 }
744 | MATCHER_HAS_ATTACHMENT
745 {
746 	gint criteria = 0;
747 
748 	criteria = MATCHCRITERIA_HAS_ATTACHMENT;
749 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
750 }
751 | MATCHER_HAS_NO_ATTACHMENT
752 {
753 	gint criteria = 0;
754 
755 	criteria = MATCHCRITERIA_HAS_NO_ATTACHMENT;
756 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
757 }
758 | MATCHER_SIGNED
759 {
760 	gint criteria = 0;
761 
762 	criteria = MATCHCRITERIA_SIGNED;
763 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
764 }
765 | MATCHER_NOT_SIGNED
766 {
767 	gint criteria = 0;
768 
769 	criteria = MATCHCRITERIA_NOT_SIGNED;
770 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
771 }
772 | MATCHER_PARTIAL
773 {
774 	gint criteria = 0;
775 
776 	criteria = MATCHCRITERIA_PARTIAL;
777 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
778 }
779 | MATCHER_NOT_PARTIAL
780 {
781 	gint criteria = 0;
782 
783 	criteria = MATCHCRITERIA_NOT_PARTIAL;
784 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
785 }
786 | MATCHER_COLORLABEL MATCHER_INTEGER
787 {
788 	gint criteria = 0;
789 	gint value = 0;
790 
791 	criteria = MATCHCRITERIA_COLORLABEL;
792 	value = strtol($2, NULL, 10);
793 	if (value < 0) value = 0;
794 	else if (value > COLORLABELS) value = COLORLABELS;
795 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
796 }
797 | MATCHER_NOT_COLORLABEL MATCHER_INTEGER
798 {
799 	gint criteria = 0;
800 	gint value = 0;
801 
802 	criteria = MATCHCRITERIA_NOT_COLORLABEL;
803 	value = strtol($2, NULL, 0);
804 	if (value < 0) value = 0;
805 	else if (value > COLORLABELS) value = COLORLABELS;
806 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
807 }
808 | MATCHER_IGNORE_THREAD
809 {
810 	gint criteria = 0;
811 
812 	criteria = MATCHCRITERIA_IGNORE_THREAD;
813 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
814 }
815 | MATCHER_NOT_IGNORE_THREAD
816 {
817 	gint criteria = 0;
818 
819 	criteria = MATCHCRITERIA_NOT_IGNORE_THREAD;
820 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
821 }
822 | MATCHER_WATCH_THREAD
823 {
824 	gint criteria = 0;
825 
826 	criteria = MATCHCRITERIA_WATCH_THREAD;
827 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
828 }
829 | MATCHER_NOT_WATCH_THREAD
830 {
831 	gint criteria = 0;
832 
833 	criteria = MATCHCRITERIA_NOT_WATCH_THREAD;
834 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
835 }
836 | MATCHER_SUBJECT match_type MATCHER_STRING
837 {
838 	gint criteria = 0;
839 	gchar *expr = NULL;
840 
841 	criteria = MATCHCRITERIA_SUBJECT;
842 	expr = $3;
843 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
844 }
845 | MATCHER_NOT_SUBJECT match_type MATCHER_STRING
846 {
847 	gint criteria = 0;
848 	gchar *expr = NULL;
849 
850 	criteria = MATCHCRITERIA_NOT_SUBJECT;
851 	expr = $3;
852 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
853 }
854 | MATCHER_FROM match_type MATCHER_STRING
855 {
856 	gint criteria = 0;
857 	gchar *expr = NULL;
858 
859 	criteria = MATCHCRITERIA_FROM;
860 	expr = $3;
861 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
862 }
863 | MATCHER_NOT_FROM match_type MATCHER_STRING
864 {
865 	gint criteria = 0;
866 	gchar *expr = NULL;
867 
868 	criteria = MATCHCRITERIA_NOT_FROM;
869 	expr = $3;
870 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
871 }
872 | MATCHER_TO match_type MATCHER_STRING
873 {
874 	gint criteria = 0;
875 	gchar *expr = NULL;
876 
877 	criteria = MATCHCRITERIA_TO;
878 	expr = $3;
879 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
880 }
881 | MATCHER_NOT_TO match_type MATCHER_STRING
882 {
883 	gint criteria = 0;
884 	gchar *expr = NULL;
885 
886 	criteria = MATCHCRITERIA_NOT_TO;
887 	expr = $3;
888 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
889 }
890 | MATCHER_CC match_type MATCHER_STRING
891 {
892 	gint criteria = 0;
893 	gchar *expr = NULL;
894 
895 	criteria = MATCHCRITERIA_CC;
896 	expr = $3;
897 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
898 }
899 | MATCHER_NOT_CC match_type MATCHER_STRING
900 {
901 	gint criteria = 0;
902 	gchar *expr = NULL;
903 
904 	criteria = MATCHCRITERIA_NOT_CC;
905 	expr = $3;
906 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
907 }
908 | MATCHER_TO_OR_CC match_type MATCHER_STRING
909 {
910 	gint criteria = 0;
911 	gchar *expr = NULL;
912 
913 	criteria = MATCHCRITERIA_TO_OR_CC;
914 	expr = $3;
915 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
916 }
917 | MATCHER_NOT_TO_AND_NOT_CC match_type MATCHER_STRING
918 {
919 	gint criteria = 0;
920 	gchar *expr = NULL;
921 
922 	criteria = MATCHCRITERIA_NOT_TO_AND_NOT_CC;
923 	expr = $3;
924 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
925 }
926 | MATCHER_TAG match_type MATCHER_STRING
927 {
928 	gint criteria = 0;
929 	gchar *expr = NULL;
930 
931 	criteria = MATCHCRITERIA_TAG;
932 	expr = $3;
933 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
934 }
935 | MATCHER_NOT_TAG match_type MATCHER_STRING
936 {
937 	gint criteria = 0;
938 	gchar *expr = NULL;
939 
940 	criteria = MATCHCRITERIA_NOT_TAG;
941 	expr = $3;
942 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
943 }
944 | MATCHER_TAGGED
945 {
946 	gint criteria = 0;
947 
948 	criteria = MATCHCRITERIA_TAGGED;
949 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
950 }
951 | MATCHER_NOT_TAGGED
952 {
953 	gint criteria = 0;
954 
955 	criteria = MATCHCRITERIA_NOT_TAGGED;
956 	prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
957 }
958 | MATCHER_AGE_GREATER MATCHER_INTEGER
959 {
960 	gint criteria = 0;
961 	gint value = 0;
962 
963 	criteria = MATCHCRITERIA_AGE_GREATER;
964 	value = strtol($2, NULL, 0);
965 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
966 }
967 | MATCHER_AGE_LOWER MATCHER_INTEGER
968 {
969 	gint criteria = 0;
970 	gint value = 0;
971 
972 	criteria = MATCHCRITERIA_AGE_LOWER;
973 	value = strtol($2, NULL, 0);
974 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
975 }
976 | MATCHER_AGE_GREATER_HOURS MATCHER_INTEGER
977 {
978 	gint criteria = 0;
979 	gint value = 0;
980 
981 	criteria = MATCHCRITERIA_AGE_GREATER_HOURS;
982 	value = strtol($2, NULL, 0);
983 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
984 }
985 | MATCHER_AGE_LOWER_HOURS MATCHER_INTEGER
986 {
987 	gint criteria = 0;
988 	gint value = 0;
989 
990 	criteria = MATCHCRITERIA_AGE_LOWER_HOURS;
991 	value = strtol($2, NULL, 0);
992 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
993 }
994 | MATCHER_DATE_AFTER MATCHER_STRING
995 {
996 	gint criteria = 0;
997 	gchar *expr = NULL;
998 	time_t value;
999 
1000 	criteria = MATCHCRITERIA_DATE_AFTER;
1001 	expr = $2;
1002 	value = procheader_date_parse(NULL, expr, 0);
1003 	prop = matcherprop_new(criteria, NULL, 0, expr, value);
1004 }
1005 | MATCHER_DATE_BEFORE MATCHER_STRING
1006 {
1007 	gint criteria = 0;
1008 	gchar *expr = NULL;
1009 	time_t value;
1010 
1011 	criteria = MATCHCRITERIA_DATE_BEFORE;
1012 	expr = $2;
1013 	value = procheader_date_parse(NULL, expr, 0);
1014 	prop = matcherprop_new(criteria, NULL, 0, expr, value);
1015 }
1016 | MATCHER_NEWSGROUPS match_type MATCHER_STRING
1017 {
1018 	gint criteria = 0;
1019 	gchar *expr = NULL;
1020 
1021 	criteria = MATCHCRITERIA_NEWSGROUPS;
1022 	expr = $3;
1023 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1024 }
1025 | MATCHER_NOT_NEWSGROUPS match_type MATCHER_STRING
1026 {
1027 	gint criteria = 0;
1028 	gchar *expr = NULL;
1029 
1030 	criteria = MATCHCRITERIA_NOT_NEWSGROUPS;
1031 	expr = $3;
1032 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1033 }
1034 | MATCHER_MESSAGEID match_type MATCHER_STRING
1035 {
1036 	gint criteria = 0;
1037 	gchar *expr = NULL;
1038 
1039 	criteria = MATCHCRITERIA_MESSAGEID;
1040 	expr = $3;
1041 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1042 }
1043 | MATCHER_NOT_MESSAGEID match_type MATCHER_STRING
1044 {
1045 	gint criteria = 0;
1046 	gchar *expr = NULL;
1047 
1048 	criteria = MATCHCRITERIA_NOT_MESSAGEID;
1049 	expr = $3;
1050 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1051 }
1052 | MATCHER_INREPLYTO match_type MATCHER_STRING
1053 {
1054 	gint criteria = 0;
1055 	gchar *expr = NULL;
1056 
1057 	criteria = MATCHCRITERIA_INREPLYTO;
1058 	expr = $3;
1059 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1060 }
1061 | MATCHER_NOT_INREPLYTO match_type MATCHER_STRING
1062 {
1063 	gint criteria = 0;
1064 	gchar *expr = NULL;
1065 
1066 	criteria = MATCHCRITERIA_NOT_INREPLYTO;
1067 	expr = $3;
1068 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1069 }
1070 | MATCHER_REFERENCES match_type MATCHER_STRING
1071 {
1072 	gint criteria = 0;
1073 	gchar *expr = NULL;
1074 
1075 	criteria = MATCHCRITERIA_REFERENCES;
1076 	expr = $3;
1077 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1078 }
1079 | MATCHER_NOT_REFERENCES match_type MATCHER_STRING
1080 {
1081 	gint criteria = 0;
1082 	gchar *expr = NULL;
1083 
1084 	criteria = MATCHCRITERIA_NOT_REFERENCES;
1085 	expr = $3;
1086 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1087 }
1088 | MATCHER_SCORE_GREATER MATCHER_INTEGER
1089 {
1090 	gint criteria = 0;
1091 	gint value = 0;
1092 
1093 	criteria = MATCHCRITERIA_SCORE_GREATER;
1094 	value = strtol($2, NULL, 0);
1095 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
1096 }
1097 | MATCHER_SCORE_LOWER MATCHER_INTEGER
1098 {
1099 	gint criteria = 0;
1100 	gint value = 0;
1101 
1102 	criteria = MATCHCRITERIA_SCORE_LOWER;
1103 	value = strtol($2, NULL, 0);
1104 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
1105 }
1106 | MATCHER_SCORE_EQUAL MATCHER_INTEGER
1107 {
1108 	gint criteria = 0;
1109 	gint value = 0;
1110 
1111 	criteria = MATCHCRITERIA_SCORE_EQUAL;
1112 	value = strtol($2, NULL, 0);
1113 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
1114 }
1115 | MATCHER_SIZE_GREATER MATCHER_INTEGER
1116 {
1117 	gint criteria = 0;
1118 	gint value    = 0;
1119 	criteria = MATCHCRITERIA_SIZE_GREATER;
1120 	value = strtol($2, NULL, 0);
1121 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
1122 }
1123 | MATCHER_SIZE_SMALLER MATCHER_INTEGER
1124 {
1125 	gint criteria = 0;
1126 	gint value    = 0;
1127 	criteria = MATCHCRITERIA_SIZE_SMALLER;
1128 	value = strtol($2, NULL, 0);
1129 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
1130 }
1131 | MATCHER_SIZE_EQUAL MATCHER_INTEGER
1132 {
1133 	gint criteria = 0;
1134 	gint value    = 0;
1135 	criteria = MATCHCRITERIA_SIZE_EQUAL;
1136 	value = strtol($2, NULL, 0);
1137 	prop = matcherprop_new(criteria, NULL, 0, NULL, value);
1138 }
1139 | MATCHER_HEADER MATCHER_STRING
1140 {
1141 	header = g_strdup($2);
1142 } match_type MATCHER_STRING
1143 {
1144 	gint criteria = 0;
1145 	gchar *expr = NULL;
1146 	matcher_is_fast = FALSE;
1147 	criteria = MATCHCRITERIA_HEADER;
1148 	expr = $2;
1149 	prop = matcherprop_new(criteria, header, match_type, expr, 0);
1150 	g_free(header);
1151 }
1152 | MATCHER_NOT_HEADER MATCHER_STRING
1153 {
1154 	header = g_strdup($2);
1155 } match_type MATCHER_STRING
1156 {
1157 	gint criteria = 0;
1158 	gchar *expr = NULL;
1159 	matcher_is_fast = FALSE;
1160 	criteria = MATCHCRITERIA_NOT_HEADER;
1161 	expr = $2;
1162 	prop = matcherprop_new(criteria, header, match_type, expr, 0);
1163 	g_free(header);
1164 }
1165 | MATCHER_HEADERS_PART match_type MATCHER_STRING
1166 {
1167 	gint criteria = 0;
1168 	gchar *expr = NULL;
1169 	matcher_is_fast = FALSE;
1170 	criteria = MATCHCRITERIA_HEADERS_PART;
1171 	expr = $3;
1172 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1173 }
1174 | MATCHER_NOT_HEADERS_PART match_type MATCHER_STRING
1175 {
1176 	gint criteria = 0;
1177 	gchar *expr = NULL;
1178 	matcher_is_fast = FALSE;
1179 	criteria = MATCHCRITERIA_NOT_HEADERS_PART;
1180 	expr = $3;
1181 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1182 }
1183 | MATCHER_HEADERS_CONT match_type MATCHER_STRING
1184 {
1185 	gint criteria = 0;
1186 	gchar *expr = NULL;
1187 	matcher_is_fast = FALSE;
1188 	criteria = MATCHCRITERIA_HEADERS_CONT;
1189 	expr = $3;
1190 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1191 }
1192 | MATCHER_NOT_HEADERS_CONT match_type MATCHER_STRING
1193 {
1194 	gint criteria = 0;
1195 	gchar *expr = NULL;
1196 	matcher_is_fast = FALSE;
1197 	criteria = MATCHCRITERIA_NOT_HEADERS_CONT;
1198 	expr = $3;
1199 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1200 }
1201 | MATCHER_FOUND_IN_ADDRESSBOOK MATCHER_STRING
1202 {
1203 	header = g_strdup($2);
1204 } MATCHER_IN MATCHER_STRING
1205 {
1206 	gint criteria = 0;
1207 	gchar *expr = NULL;
1208 
1209 	criteria = MATCHCRITERIA_FOUND_IN_ADDRESSBOOK;
1210 	expr = $2;
1211 	prop = matcherprop_new(criteria, header, match_type, expr, 0);
1212 	g_free(header);
1213 }
1214 | MATCHER_NOT_FOUND_IN_ADDRESSBOOK MATCHER_STRING
1215 {
1216 	header = g_strdup($2);
1217 } MATCHER_IN MATCHER_STRING
1218 {
1219 	gint criteria = 0;
1220 	gchar *expr = NULL;
1221 
1222 	criteria = MATCHCRITERIA_NOT_FOUND_IN_ADDRESSBOOK;
1223 	expr = $2;
1224 	prop = matcherprop_new(criteria, header, match_type, expr, 0);
1225 	g_free(header);
1226 }
1227 | MATCHER_MESSAGE match_type MATCHER_STRING
1228 {
1229 	gint criteria = 0;
1230 	gchar *expr = NULL;
1231 	matcher_is_fast = FALSE;
1232 	criteria = MATCHCRITERIA_MESSAGE;
1233 	expr = $3;
1234 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1235 }
1236 | MATCHER_NOT_MESSAGE match_type MATCHER_STRING
1237 {
1238 	gint criteria = 0;
1239 	gchar *expr = NULL;
1240 	matcher_is_fast = FALSE;
1241 	criteria = MATCHCRITERIA_NOT_MESSAGE;
1242 	expr = $3;
1243 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1244 }
1245 | MATCHER_BODY_PART match_type MATCHER_STRING
1246 {
1247 	gint criteria = 0;
1248 	gchar *expr = NULL;
1249 	matcher_is_fast = FALSE;
1250 	criteria = MATCHCRITERIA_BODY_PART;
1251 	expr = $3;
1252 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1253 }
1254 | MATCHER_NOT_BODY_PART match_type MATCHER_STRING
1255 {
1256 	gint criteria = 0;
1257 	gchar *expr = NULL;
1258 	matcher_is_fast = FALSE;
1259 	criteria = MATCHCRITERIA_NOT_BODY_PART;
1260 	expr = $3;
1261 	prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
1262 }
1263 | MATCHER_TEST MATCHER_STRING
1264 {
1265 	gint criteria = 0;
1266 	gchar *expr = NULL;
1267 	matcher_is_fast = FALSE;
1268 	criteria = MATCHCRITERIA_TEST;
1269 	expr = $2;
1270 	prop = matcherprop_new(criteria, NULL, MATCHTYPE_MATCH, expr, 0);
1271 }
1272 | MATCHER_NOT_TEST MATCHER_STRING
1273 {
1274 	gint criteria = 0;
1275 	gchar *expr = NULL;
1276 	matcher_is_fast = FALSE;
1277 	criteria = MATCHCRITERIA_NOT_TEST;
1278 	expr = $2;
1279 	prop = matcherprop_new(criteria, NULL, MATCHTYPE_MATCH, expr, 0);
1280 }
1281 ;
1282 
1283 filtering_action:
1284 MATCHER_EXECUTE MATCHER_STRING
1285 {
1286 	gchar *cmd = NULL;
1287 	gint action_type = 0;
1288 
1289 	action_type = MATCHACTION_EXECUTE;
1290 	cmd = $2;
1291 	action = filteringaction_new(action_type, 0, cmd, 0, 0, NULL);
1292 }
1293 | MATCHER_MOVE MATCHER_STRING
1294 {
1295 	gchar *destination = NULL;
1296 	gint action_type = 0;
1297 
1298 	action_type = MATCHACTION_MOVE;
1299 	destination = $2;
1300 	action = filteringaction_new(action_type, 0, destination, 0, 0, NULL);
1301 }
1302 | MATCHER_SET_TAG MATCHER_STRING
1303 {
1304 	gchar *destination = NULL;
1305 	gint action_type = 0;
1306 
1307 	action_type = MATCHACTION_SET_TAG;
1308 	destination = $2;
1309 	action = filteringaction_new(action_type, 0, destination, 0, 0, NULL);
1310 }
1311 | MATCHER_UNSET_TAG MATCHER_STRING
1312 {
1313 	gchar *destination = NULL;
1314 	gint action_type = 0;
1315 
1316 	action_type = MATCHACTION_UNSET_TAG;
1317 	destination = $2;
1318 	action = filteringaction_new(action_type, 0, destination, 0, 0, NULL);
1319 }
1320 | MATCHER_CLEAR_TAGS
1321 {
1322 	gint action_type = 0;
1323 
1324 	action_type = MATCHACTION_CLEAR_TAGS;
1325 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1326 }
1327 | MATCHER_COPY MATCHER_STRING
1328 {
1329 	gchar *destination = NULL;
1330 	gint action_type = 0;
1331 
1332 	action_type = MATCHACTION_COPY;
1333 	destination = $2;
1334 	action = filteringaction_new(action_type, 0, destination, 0, 0, NULL);
1335 }
1336 | MATCHER_DELETE
1337 {
1338 	gint action_type = 0;
1339 
1340 	action_type = MATCHACTION_DELETE;
1341 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1342 }
1343 | MATCHER_MARK
1344 {
1345 	gint action_type = 0;
1346 
1347 	action_type = MATCHACTION_MARK;
1348 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1349 }
1350 | MATCHER_UNMARK
1351 {
1352 	gint action_type = 0;
1353 
1354 	action_type = MATCHACTION_UNMARK;
1355 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1356 }
1357 | MATCHER_LOCK
1358 {
1359 	gint action_type = 0;
1360 
1361 	action_type = MATCHACTION_LOCK;
1362 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1363 }
1364 | MATCHER_UNLOCK
1365 {
1366 	gint action_type = 0;
1367 
1368 	action_type = MATCHACTION_UNLOCK;
1369 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1370 }
1371 | MATCHER_MARK_AS_READ
1372 {
1373 	gint action_type = 0;
1374 
1375 	action_type = MATCHACTION_MARK_AS_READ;
1376 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1377 }
1378 | MATCHER_MARK_AS_UNREAD
1379 {
1380 	gint action_type = 0;
1381 
1382 	action_type = MATCHACTION_MARK_AS_UNREAD;
1383 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1384 }
1385 | MATCHER_MARK_AS_SPAM
1386 {
1387 	gint action_type = 0;
1388 
1389 	action_type = MATCHACTION_MARK_AS_SPAM;
1390 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1391 }
1392 | MATCHER_MARK_AS_HAM
1393 {
1394 	gint action_type = 0;
1395 
1396 	action_type = MATCHACTION_MARK_AS_HAM;
1397 	action = filteringaction_new(action_type, 0, NULL, 0, 0, NULL);
1398 }
1399 | MATCHER_FORWARD MATCHER_INTEGER MATCHER_STRING
1400 {
1401 	gchar *destination = NULL;
1402 	gint action_type = 0;
1403 	gint account_id = 0;
1404 
1405 	action_type = MATCHACTION_FORWARD;
1406 	account_id = strtol($2, NULL, 10);
1407 	destination = $3;
1408 	action = filteringaction_new(action_type,
1409             account_id, destination, 0, 0, NULL);
1410 }
1411 | MATCHER_FORWARD_AS_ATTACHMENT MATCHER_INTEGER MATCHER_STRING
1412 {
1413 	gchar *destination = NULL;
1414 	gint action_type = 0;
1415 	gint account_id = 0;
1416 
1417 	action_type = MATCHACTION_FORWARD_AS_ATTACHMENT;
1418 	account_id = strtol($2, NULL, 10);
1419 	destination = $3;
1420 	action = filteringaction_new(action_type,
1421             account_id, destination, 0, 0, NULL);
1422 }
1423 | MATCHER_REDIRECT MATCHER_INTEGER MATCHER_STRING
1424 {
1425 	gchar *destination = NULL;
1426 	gint action_type = 0;
1427 	gint account_id = 0;
1428 
1429 	action_type = MATCHACTION_REDIRECT;
1430 	account_id = strtol($2, NULL, 10);
1431 	destination = $3;
1432 	action = filteringaction_new(action_type,
1433             account_id, destination, 0, 0, NULL);
1434 }
1435 | MATCHER_COLOR MATCHER_INTEGER
1436 {
1437 	gint action_type = 0;
1438 	gint color = 0;
1439 
1440 	action_type = MATCHACTION_COLOR;
1441 	color = strtol($2, NULL, 10);
1442 	action = filteringaction_new(action_type, 0, NULL, color, 0, NULL);
1443 }
1444 | MATCHER_CHANGE_SCORE MATCHER_INTEGER
1445 {
1446         gint score = 0;
1447 
1448         score = strtol($2, NULL, 10);
1449 	action = filteringaction_new(MATCHACTION_CHANGE_SCORE, 0,
1450 				     NULL, 0, score, NULL);
1451 }
1452 /* backward compatibility */
1453 | MATCHER_SCORE MATCHER_INTEGER
1454 {
1455         gint score = 0;
1456 
1457         score = strtol($2, NULL, 10);
1458 	action = filteringaction_new(MATCHACTION_CHANGE_SCORE, 0,
1459 				     NULL, 0, score, NULL);
1460 }
1461 | MATCHER_SET_SCORE MATCHER_INTEGER
1462 {
1463         gint score = 0;
1464 
1465         score = strtol($2, NULL, 10);
1466 	action = filteringaction_new(MATCHACTION_SET_SCORE, 0,
1467 				     NULL, 0, score, NULL);
1468 }
1469 | MATCHER_HIDE
1470 {
1471 	action = filteringaction_new(MATCHACTION_HIDE, 0, NULL, 0, 0, NULL);
1472 }
1473 | MATCHER_IGNORE
1474 {
1475 	action = filteringaction_new(MATCHACTION_IGNORE, 0, NULL, 0, 0, NULL);
1476 }
1477 | MATCHER_WATCH
1478 {
1479 	action = filteringaction_new(MATCHACTION_WATCH, 0, NULL, 0, 0, NULL);
1480 }
1481 | MATCHER_ADD_TO_ADDRESSBOOK MATCHER_STRING
1482 {
1483 	header = g_strdup($2);
1484 } MATCHER_STRING
1485 {
1486 	gchar *addressbook = NULL;
1487 	gint action_type = 0;
1488 
1489 	action_type = MATCHACTION_ADD_TO_ADDRESSBOOK;
1490 	addressbook = $2;
1491 	action = filteringaction_new(action_type, 0, addressbook, 0, 0, header);
1492 	g_free(header);
1493 }
1494 | MATCHER_STOP
1495 {
1496 	action = filteringaction_new(MATCHACTION_STOP, 0, NULL, 0, 0, NULL);
1497 }
1498 ;
1499