]> Pileus Git - ~andy/fetchmail/blob - rcfile_l.l
More English-like keywords.
[~andy/fetchmail] / rcfile_l.l
1 %{
2
3 /* Copyright 1993-95 by Carl Harris, Jr. Copyright 1996 by Eric S. Raymond
4  * All rights reserved.
5  * For license terms, see the file COPYING in this directory.
6  */
7
8 /***********************************************************************
9   module:       rcfile_l.l
10   project:      fetchmail
11   programmer:   Carl Harris, ceharris@mal.com
12                 Extensively hacked by esr.
13   description:  configuration lexer
14
15  ***********************************************************************/
16
17 #include <config.h>
18 #include "fetchmail.h"
19 #include "rcfile_y.h"
20
21 int prc_lineno = 1;
22 %}
23
24 %%
25
26 defaults        { return DEFAULTS; }
27 server          { return SERVER; }
28 proto(col)?     { return PROTOCOL; }
29 port            { return PORT; }
30
31 user(name)?     { return USERNAME; }
32 pass(word)?     { return PASSWORD; }
33 remote(folder)? { return FOLDER; }
34 smtp(host)?     { return SMTPHOST; }
35 mda             { return MDA; }
36 is              { return IS; }
37 here            { return HERE; }
38 there           { return THERE; }
39
40 keep            { yylval.flag = FLAG_TRUE;  return KEEP; }
41 flush           { yylval.flag = FLAG_TRUE;  return FLUSH; }
42 fetchall        { yylval.flag = FLAG_TRUE;  return FETCHALL; }
43 rewrite         { yylval.flag = FLAG_FALSE; return REWRITE; }
44 skip            { yylval.flag = FLAG_TRUE;  return SKIP; }
45 nokeep          { yylval.flag = FLAG_FALSE; return KEEP; }
46 noflush         { yylval.flag = FLAG_FALSE; return FLUSH; }
47 nofetchall      { yylval.flag = FLAG_FALSE; return FETCHALL; }
48 norewrite       { yylval.flag = FLAG_TRUE;  return REWRITE; }
49 noskip          { yylval.flag = FLAG_FALSE; return SKIP; }
50
51 with            {/* EMPTY */}
52 and             {/* EMPTY */}
53 has             {/* EMPTY */}
54 options         {/* EMPTY */}
55 [;:,]           {/* EMPTY */}
56
57 (auto)|(AUTO)   { yylval.proto = P_AUTO;  return PROTO; }
58 (pop2)|(POP2)   { yylval.proto = P_POP2;  return PROTO; }
59 (pop3)|(POP3)   { yylval.proto = P_POP3;  return PROTO; }
60 (imap)|(IMAP)   { yylval.proto = P_IMAP;  return PROTO; }
61 (apop)|(APOP)   { yylval.proto = P_APOP;  return PROTO; }
62 (rpop)|(RPOP)   { yylval.proto = P_RPOP;  return PROTO; }
63
64 (#.*)?\\?\n     { prc_lineno++; }   /* newline is ignored */
65
66 \"[^\"]*\"      {
67                         yytext[strlen(yytext)-1] = '\0';
68                         yylval.sval = (char *) strdup(yytext+1);
69                         return STRING;
70                 }
71 [^ \t\r\n]+     { yylval.sval = (char *) strdup(yytext); return STRING; }
72
73 [ \t\r]+        ;       /* whitespace */
74