2006-07-31 [wwp] 2.4.0cvs3
[claws.git] / src / matcher_parser_parse.y
index 7cfa758a16cdeed797f52f318823e083ecbe9912..b9ca4a89b4ba3b92f3211bd7bfcf23dd18894fe0 100644 (file)
  *
  * You should have received a copy of the GNU General Public License
  * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  */
 
 #include "defs.h"
 
 #include <glib.h>
+#include <glib/gi18n.h>
 
-#include "intl.h"
 #include "utils.h"
 #include "filtering.h"
 #include "matcher.h"
@@ -43,6 +43,9 @@ static MatcherProp *prop;
 
 static GSList *matchers_list = NULL;
 
+static gboolean enabled = TRUE;
+static gchar *name = NULL;
+static gint account_id = 0;
 static MatcherList *cond;
 static GSList *action_list = NULL;
 static FilteringAction *action = NULL;
@@ -55,6 +58,9 @@ static int enable_compatibility = 0;
 enum {
         MATCHER_PARSE_FILE,
         MATCHER_PARSE_NO_EOL,
+       MATCHER_PARSE_ENABLED,
+       MATCHER_PARSE_NAME,
+       MATCHER_PARSE_ACCOUNT,
         MATCHER_PARSE_CONDITION,
         MATCHER_PARSE_FILTERING_ACTION,
 };
@@ -63,10 +69,17 @@ static int matcher_parse_op = MATCHER_PARSE_FILE;
 
 
 /* ******************************************************************** */
+/* redeclarations to avoid warnings */
+void matcher_parserrestart(FILE *input_file);
+void matcher_parser_init(void);
+void matcher_parser_switch_to_buffer(void * new_buffer);
+void matcher_parser_delete_buffer(void * b);
+int matcher_parserlex(void);
 
 void matcher_parser_start_parsing(FILE *f)
 {
        matcher_parserrestart(f);
+       account_id = 0;
        matcher_parserparse();
 }
 
@@ -76,6 +89,13 @@ void * matcher_parser_scan_string(const char * str);
 FilteringProp *matcher_parser_get_filtering(gchar *str)
 {
        void *bufstate;
+       void *tmp_str = NULL;
+       
+       /* little hack to allow passing rules with no names */
+       if (!strncmp(str, "rulename ", 9))
+               tmp_str = g_strdup(str);
+       else 
+               tmp_str = g_strconcat("rulename \"\" ", str, NULL);
 
        /* bad coding to enable the sub-grammar matching
           in yacc */
@@ -83,12 +103,13 @@ FilteringProp *matcher_parser_get_filtering(gchar *str)
        matcher_parse_op = MATCHER_PARSE_NO_EOL;
        matcher_parserrestart(NULL);
         matcher_parser_init();
-       bufstate = matcher_parser_scan_string((const char *) str);
+       bufstate = matcher_parser_scan_string((const char *) tmp_str);
         matcher_parser_switch_to_buffer(bufstate);
        if (matcher_parserparse() != 0)
                filtering = NULL;
        matcher_parse_op = MATCHER_PARSE_FILE;
        matcher_parser_delete_buffer(bufstate);
+       g_free(tmp_str);
        return filtering;
 }
 
@@ -111,6 +132,72 @@ static gboolean check_quote_symetry(gchar *str)
        return !(ret % 2);
 }
 
+MatcherList *matcher_parser_get_name(gchar *str)
+{
+       void *bufstate;
+
+       if (!check_quote_symetry(str)) {
+               cond = NULL;
+               return cond;
+       }
+       
+       /* bad coding to enable the sub-grammar matching
+          in yacc */
+       matcher_parserlineno = 1;
+       matcher_parse_op = MATCHER_PARSE_NAME;
+       matcher_parserrestart(NULL);
+        matcher_parser_init();
+       bufstate = matcher_parser_scan_string(str);
+       matcher_parserparse();
+       matcher_parse_op = MATCHER_PARSE_FILE;
+       matcher_parser_delete_buffer(bufstate);
+       return cond;
+}
+
+MatcherList *matcher_parser_get_enabled(gchar *str)
+{
+       void *bufstate;
+
+       if (!check_quote_symetry(str)) {
+               cond = NULL;
+               return cond;
+       }
+       
+       /* bad coding to enable the sub-grammar matching
+          in yacc */
+       matcher_parserlineno = 1;
+       matcher_parse_op = MATCHER_PARSE_ENABLED;
+       matcher_parserrestart(NULL);
+       matcher_parser_init();
+       bufstate = matcher_parser_scan_string(str);
+       matcher_parserparse();
+       matcher_parse_op = MATCHER_PARSE_FILE;
+       matcher_parser_delete_buffer(bufstate);
+       return cond;
+}
+
+MatcherList *matcher_parser_get_account(gchar *str)
+{
+       void *bufstate;
+
+       if (!check_quote_symetry(str)) {
+               cond = NULL;
+               return cond;
+       }
+       
+       /* bad coding to enable the sub-grammar matching
+          in yacc */
+       matcher_parserlineno = 1;
+       matcher_parse_op = MATCHER_PARSE_ACCOUNT;
+       matcher_parserrestart(NULL);
+       matcher_parser_init();
+       bufstate = matcher_parser_scan_string(str);
+       matcher_parserparse();
+       matcher_parse_op = MATCHER_PARSE_FILE;
+       matcher_parser_delete_buffer(bufstate);
+       return cond;
+}
+
 MatcherList *matcher_parser_get_cond(gchar *str)
 {
        void *bufstate;
@@ -208,7 +295,6 @@ int matcher_parserwrap(void)
        char *str;
        int value;
 }
-
 %token MATCHER_ALL MATCHER_UNREAD  MATCHER_NOT_UNREAD 
 %token MATCHER_NEW  MATCHER_NOT_NEW  MATCHER_MARKED
 %token MATCHER_NOT_MARKED  MATCHER_DELETED  MATCHER_NOT_DELETED
@@ -224,7 +310,7 @@ int matcher_parserwrap(void)
 %token MATCHER_NOT_MESSAGE  MATCHER_BODY_PART  MATCHER_NOT_BODY_PART
 %token MATCHER_TEST  MATCHER_NOT_TEST  MATCHER_MATCHCASE  MATCHER_MATCH
 %token MATCHER_REGEXPCASE  MATCHER_REGEXP  MATCHER_SCORE  MATCHER_MOVE
-%token MATCHER_ANY_IN_ADDRESSBOOK MATCHER_ALL_IN_ADDRESSBOOK
+%token MATCHER_FOUND_IN_ADDRESSBOOK MATCHER_NOT_FOUND_IN_ADDRESSBOOK MATCHER_IN
 %token MATCHER_COPY  MATCHER_DELETE  MATCHER_MARK  MATCHER_UNMARK
 %token MATCHER_LOCK MATCHER_UNLOCK
 %token MATCHER_EXECUTE
@@ -238,10 +324,13 @@ int matcher_parserwrap(void)
 %token MATCHER_COLORLABEL MATCHER_NOT_COLORLABEL
 %token MATCHER_IGNORE_THREAD MATCHER_NOT_IGNORE_THREAD
 %token MATCHER_CHANGE_SCORE MATCHER_SET_SCORE
-%token MATCHER_STOP MATCHER_HIDE
+%token MATCHER_STOP MATCHER_HIDE MATCHER_IGNORE
 
 %start file
 
+%token MATCHER_ENABLED MATCHER_DISABLED
+%token MATCHER_RULENAME
+%token MATCHER_ACCOUNT
 %token <str> MATCHER_STRING
 %token <str> MATCHER_SECTION
 %token <str> MATCHER_INTEGER
@@ -306,13 +395,44 @@ MATCHER_SECTION MATCHER_EOL
 ;
 
 instruction:
-condition filtering MATCHER_EOL
-| condition filtering
+enabled name account condition filtering MATCHER_EOL
+| enabled name account condition filtering
+| enabled name condition filtering MATCHER_EOL
+| enabled name condition filtering
+| name condition filtering MATCHER_EOL
+| name condition filtering
 {
        if (matcher_parse_op == MATCHER_PARSE_NO_EOL)
                YYACCEPT;
        else {
-               matcher_parsererror("parse error");
+               matcher_parsererror("parse error [no eol]");
+               YYERROR;
+       }
+}
+| enabled
+{
+       if (matcher_parse_op == MATCHER_PARSE_ENABLED)
+               YYACCEPT;
+       else {
+               matcher_parsererror("parse error [enabled]");
+               YYERROR;
+       }
+}
+| account
+{
+       if (matcher_parse_op == MATCHER_PARSE_ACCOUNT)
+               YYACCEPT;
+       else {
+               matcher_parsererror("parse error [account]");
+               YYERROR;
+       }
+}
+| name
+{
+       if (matcher_parse_op == MATCHER_PARSE_NAME)
+               YYACCEPT;
+       else {
+               matcher_parsererror("parse error [name]");
                YYERROR;
        }
 }
@@ -321,7 +441,7 @@ condition filtering MATCHER_EOL
        if (matcher_parse_op == MATCHER_PARSE_CONDITION)
                YYACCEPT;
        else {
-               matcher_parsererror("parse error");
+               matcher_parsererror("parse error [condition]");
                YYERROR;
        }
 }
@@ -330,18 +450,48 @@ condition filtering MATCHER_EOL
        if (matcher_parse_op == MATCHER_PARSE_FILTERING_ACTION)
                YYACCEPT;
        else {
-               matcher_parsererror("parse error");
+               matcher_parsererror("parse error [filtering action]");
                YYERROR;
        }
 }
 | MATCHER_EOL
 ;
 
+enabled:
+MATCHER_ENABLED
+{
+       enabled = TRUE;
+}
+| MATCHER_DISABLED
+{
+       enabled = FALSE;
+}
+;
+
+name:
+MATCHER_RULENAME MATCHER_STRING
+{
+       name = g_strdup($2);
+}
+;
+
+account:
+MATCHER_ACCOUNT MATCHER_INTEGER
+{
+       account_id = strtol($2, NULL, 10);
+fprintf(stderr, "parser %d\n", account_id);
+fflush(stderr);
+}
+;
+
 filtering:
 filtering_action_list
 {
-       filtering = filteringprop_new(cond, action_list);
-        
+       filtering = filteringprop_new(enabled, name, account_id, cond, action_list);
+       enabled = TRUE;
+       account_id = 0;
+       g_free(name);
+       name = NULL;
         if (enable_compatibility) {
                 prefs_filtering = &filtering_rules;
                 if (action_list != NULL) {
@@ -396,14 +546,6 @@ MATCHER_MATCHCASE
 {
        match_type = MATCHTYPE_REGEXP;
 }
-| MATCHER_ANY_IN_ADDRESSBOOK
-{
-       match_type = MATCHTYPE_ANY_IN_ADDRESSBOOK;
-}
-| MATCHER_ALL_IN_ADDRESSBOOK
-{
-       match_type = MATCHTYPE_ALL_IN_ADDRESSBOOK;
-}
 ;
 
 condition:
@@ -548,14 +690,14 @@ MATCHER_ALL
        gint criteria = 0;
 
        criteria = MATCHCRITERIA_PARTIAL;
-       prop = matcherprop_new(criteria, NULL, MATCHTYPE_MATCH, "SC-Partially-Retrieved", 0);
+       prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
 }
 | MATCHER_NOT_PARTIAL
 {
        gint criteria = 0;
 
        criteria = MATCHCRITERIA_NOT_PARTIAL;
-       prop = matcherprop_new(criteria, NULL, MATCHTYPE_MATCH, "SC-Partially-Retrieved", 0);
+       prop = matcherprop_new(criteria, NULL, 0, NULL, 0);
 }
 | MATCHER_COLORLABEL MATCHER_INTEGER
 {
@@ -850,6 +992,32 @@ MATCHER_ALL
        expr = $3;
        prop = matcherprop_new(criteria, NULL, match_type, expr, 0);
 }
+| MATCHER_FOUND_IN_ADDRESSBOOK MATCHER_STRING
+{
+       header = g_strdup($2);
+} MATCHER_IN MATCHER_STRING
+{
+       gint criteria = 0;
+       gchar *expr = NULL;
+
+       criteria = MATCHCRITERIA_FOUND_IN_ADDRESSBOOK;
+       expr = $2;
+       prop = matcherprop_new(criteria, header, match_type, expr, 0);
+       g_free(header);
+}
+| MATCHER_NOT_FOUND_IN_ADDRESSBOOK MATCHER_STRING
+{
+       header = g_strdup($2);
+} MATCHER_IN MATCHER_STRING
+{
+       gint criteria = 0;
+       gchar *expr = NULL;
+
+       criteria = MATCHCRITERIA_NOT_FOUND_IN_ADDRESSBOOK;
+       expr = $2;
+       prop = matcherprop_new(criteria, header, match_type, expr, 0);
+       g_free(header);
+}
 | MATCHER_MESSAGE match_type MATCHER_STRING
 {
        gint criteria = 0;
@@ -1057,6 +1225,10 @@ MATCHER_EXECUTE MATCHER_STRING
 {
        action = filteringaction_new(MATCHACTION_HIDE, 0, NULL, 0, 0);
 }
+| MATCHER_IGNORE
+{
+       action = filteringaction_new(MATCHACTION_IGNORE, 0, NULL, 0, 0);
+}
 | MATCHER_STOP
 {
        action = filteringaction_new(MATCHACTION_STOP, 0, NULL, 0, 0);