src/matcher_parser_parse.y

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