summaryrefslogtreecommitdiff
path: root/libsieve/sieve.y
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2002-11-07 14:48:23 +0000
committerSergey Poznyakoff <gray@gnu.org.ua>2002-11-07 14:48:23 +0000
commit740b1c8401ec6139449ab717b83232afcb60620b (patch)
tree883acb0cafd3ca057290fd14884812d52467f034 /libsieve/sieve.y
parenta250bc91a29211e4792f2098769363a820b16823 (diff)
downloadmailutils-740b1c8401ec6139449ab717b83232afcb60620b.tar.gz
mailutils-740b1c8401ec6139449ab717b83232afcb60620b.tar.bz2
Added to the repository
Diffstat (limited to 'libsieve/sieve.y')
-rw-r--r--libsieve/sieve.y119
1 files changed, 119 insertions, 0 deletions
diff --git a/libsieve/sieve.y b/libsieve/sieve.y
new file mode 100644
index 000000000..1341a5c0c
--- /dev/null
+++ b/libsieve/sieve.y
@@ -0,0 +1,119 @@
+%{
+/* GNU mailutils - a suite of utilities for electronic mail
+ Copyright (C) 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2, or (at your option)
+ any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ 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., 675 Mass Ave, Cambridge, MA 02139, USA. */
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+#include <stdio.h>
+#include <assert.h>
+#include <sieve.h>
+
+%}
+
+%token IDENT TAG NUMBER STRING MULTILINE
+%token REQUIRE IF ELSIF ELSE ANYOF ALLOF TRUE FALSE NOT
+%%
+
+input : /* empty */
+ | list
+ ;
+
+list : statement
+ | list statement
+ ;
+
+statement : REQUIRE stringlist ';'
+ | action ';'
+ | IF cond block maybe_elsif maybe_else
+ ;
+
+maybe_elsif : /* empty */
+ | elsif
+ ;
+
+elsif : ELSIF cond block
+ | elsif ELSIF cond block
+ ;
+
+maybe_else : /* empty */
+ | ELSE block
+ ;
+
+block : '{' list '}'
+ ;
+
+
+testlist : test
+ | testlist ',' test
+ ;
+
+cond : test
+ | ANYOF '(' testlist ')'
+ | ALLOF '(' testlist ')'
+ | NOT cond
+ ;
+
+test : FALSE
+ | TRUE
+ | command
+ ;
+
+command : IDENT maybe_arglist
+ ;
+
+action : command
+ ;
+
+maybe_arglist: /* empty */
+ | arglist
+ ;
+
+arglist : arg
+ | arglist arg
+ ;
+
+arg : stringlist
+ | MULTILINE
+ | NUMBER
+ | TAG
+ ;
+
+stringlist : STRING
+ | '[' slist ']'
+ ;
+
+slist : STRING
+ | slist ',' STRING
+ ;
+
+%%
+
+int
+yyerror (char *s)
+{
+ fprintf (stderr, "%s:%d: ", sieve_filename, sieve_line_num);
+ fprintf (stderr, "%s\n", s);
+}
+
+int
+sieve_parse (const char *name)
+{
+ sieve_open_source (name);
+ return yyparse ();
+}
+

Return to:

Send suggestions and report system problems to the System administrator.