blob: b158d2ade688f46cb3bdd624d56e8baaf80b2a82 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
|
%{
/* Copyright 1993-95 by Carl Harris, Jr. Copyright 1996 by Eric S. Raymond
* All rights reserved.
* For license terms, see the file COPYING in this directory.
*/
/***********************************************************************
module: poprc_l.l
project: popclient
programmer: Carl Harris, ceharris@mal.com
Extensively hacked by esr.
description: .poprc lexer
***********************************************************************/
#include <config.h>
#include "poproto.h"
#include "poprc_y.h"
int prc_lineno = 1;
%}
%%
defaults { return KW_DEFAULTS; }
server { return KW_SERVER; }
proto(col)? { return KW_PROTOCOL; }
user(name)? { return KW_USERNAME; }
pass(word)? { return KW_PASSWORD; }
remote(folder)? { return KW_REMOTEFOLDER; }
local(folder)? { return KW_LOCALFOLDER; }
smtp(host)? { return KW_SMTPHOST; }
mda { return KW_MDA; }
keep { yylval.flag = TRUE; return KW_KEEP; }
flush { yylval.flag = TRUE; return KW_FLUSH; }
fetchall { yylval.flag = TRUE; return KW_FETCHALL; }
rewrite { yylval.flag = TRUE; return KW_REWRITE; }
nokeep { yylval.flag = FALSE; return KW_KEEP; }
noflush { yylval.flag = FALSE; return KW_FLUSH; }
nofetchall { yylval.flag = FALSE; return KW_FETCHALL; }
norewrite { yylval.flag = FALSE; return KW_REWRITE; }
(auto)|(AUTO) { yylval.proto = P_AUTO; return PROTO_AUTO; }
(pop2)|(POP2) { yylval.proto = P_POP2; return PROTO_POP2; }
(pop3)|(POP3) { yylval.proto = P_POP3; return PROTO_POP3; }
(imap)|(IMAP) { yylval.proto = P_IMAP; return PROTO_IMAP; }
(apop)|(APOP) { yylval.proto = P_APOP; return PROTO_APOP; }
(rpop)|(RPOP) { yylval.proto = P_RPOP; return PROTO_RPOP; }
(#.*)?\\\n { prc_lineno++; } /* escaped newline is ignored */
(#.*)?\n { prc_lineno++; return KW_EOL; }
\"[^\"]*\" {
yytext[strlen(yytext)-1] = '\0';
yylval.sval = (char *) strdup(yytext+1);
return PARAM_STRING;
}
[^ \t\r\n#]+ { yylval.sval = (char *) strdup(yytext); return PARAM_STRING; }
[ \t\r]+ ; /* whitespace */
|
