1 files changed, 116 insertions, 0 deletions
diff --git a/parser.y b/parser.y
new file mode 100644
index 0000000..5426675
--- /dev/null
+++ b/parser.y
@@ -0,0 +1,116 @@
+%{
+/*
+ * parser.y -- parser for the rcfile
+ */
+
+/*
+ * Adapted from fetchmail's rcfile_y.y by José Fonseca
+ */
+
+#include <errno.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include <libesmtp.h>
+
+/* parser reads these */
+char *rcfile = NULL;		/* path name of dot file */
+
+/* parser sets these */
+int yydebug;			/* in case we didn't generate with -- debug */
+
+extern char *host;
+extern char *user;
+extern char *pass;
+extern enum starttls_option starttls;
+extern char *certificate_passphrase;
+
+/* using Bison, this arranges that yydebug messages will show actual tokens */
+extern char * yytext;
+#define YYPRINT(fp, type, val)	fprintf(fp, " = \"%s\"", yytext)
+%}
+
+%union {
+  int number;
+  char *sval;
+}
+
+%token HOSTNAME USERNAME PASSWORD STARTTLS CERTIFICATE_PASSPHRASE 
+
+%token MAP
+
+%token DISABLED ENABLED REQUIRED
+%token <sval>  STRING
+%token <number> NUMBER
+
+%%
+
+rcfile		: /* empty */
+		| statement_list
+		;
+
+statement_list	: statement
+		| statement_list statement
+		;
+
+/* future global options should also have the form SET <name> optmap <value> */
+statement	: HOSTNAME MAP STRING	{ host = strdup($3); }
+		| USERNAME MAP STRING	{ user = strdup($3); }
+		| PASSWORD MAP STRING	{ pass = strdup($3); }
+		| STARTTLS MAP DISABLED	{ starttls = Starttls_DISABLED; }
+		| STARTTLS MAP ENABLED	{ starttls = Starttls_ENABLED; }
+		| STARTTLS MAP REQUIRED	{ starttls = Starttls_REQUIRED; }
+		| CERTIFICATE_PASSPHRASE MAP STRING	{ certificate_passphrase = strdup($3); }
+		;
+
+%%
+
+/* lexer interface */
+extern char *rcfile;
+extern int lineno;
+extern char *yytext;
+extern FILE *yyin;
+
+void yyerror (const char *s)
+/* report a syntax error */
+{
+    fprintf(stderr, "%s:%d: %s at %s\n", rcfile, lineno, s, 
+		   (yytext && yytext[0]) ? yytext : "end of input");
+}
+
+#define RCFILE ".esmtprc"
+void parse_rcfile (void)
+{
+    char *home;
+
+    /* Setup the rcfile name. */
+    if (!(home = getenv("HOME")))
+   	return;
+	
+    if (!(rcfile = malloc(strlen(home) + sizeof(RCFILE) + 2)))
+    	return;
+
+    strcpy(rcfile, home);
+    if (rcfile[strlen(rcfile) - 1] != '/')
+      strcat(rcfile, "/");
+    strcat(rcfile, RCFILE);
+  
+    /* Open the configuration file and feed it to the lexer. */
+    if (!(yyin = fopen(rcfile, "r"))) {
+    	if (errno != ENOENT) {
+	    fprintf(stderr, "open: %s: %s\n", rcfile, strerror(errno));
+	}
+    }
+    else 
+    {
+	yyparse();		/* parse entire file */
+
+	fclose(yyin);	/* not checking this should be safe, file mode was r */
+    }
+    
+    free(rcfile);
+}
+
+/* easier to do this than cope with variations in where the library lives */
+int yywrap(void) { return 1; }