1 files changed, 106 insertions, 0 deletions
diff --git a/src/interfaces/ecpg/preproc/ecpg.c b/src/interfaces/ecpg/preproc/ecpg.c
new file mode 100644
index 00000000000..08f4a395250
--- /dev/null
+++ b/src/interfaces/ecpg/preproc/ecpg.c
@@ -0,0 +1,106 @@
+/* New main for ecpg, the PostgreSQL embedded SQL precompiler. */
+/* (C) Michael Meskes <meskes@debian.org> Feb 5th, 1998 */
+/* Placed under the same copyright as PostgresSQL */
+
+#include <stdio.h>
+#include <getopt.h>
+#include <stdlib.h>
+#include <strings.h>
+
+extern void lex_init(void);
+extern FILE *yyin, *yyout;
+extern char * input_filename;
+extern int yyparse(void);
+
+static void
+usage(char *progname)
+{
+	fprintf(stderr, "Usage: %s: [ -o outout file name] file1 [file2] ...\n", progname);
+}
+
+int
+main(int argc, char *const argv[])
+{
+	char		c,
+				out_option = 0;
+	int			fnr;
+
+	while ((c = getopt(argc, argv, "o:")) != EOF)
+	{
+		switch (c)
+		{
+			case 'o':
+				yyout = fopen(optarg, "w");
+				if (yyout == NULL)
+					perror(optarg);
+				else
+					out_option = 1;
+				break;
+			default:
+				usage(argv[0]);
+		}
+	}
+
+	/* after the options there must not be anything but filenames */
+	for (fnr = optind; fnr < argc; fnr++)
+	{
+		char	   *filename,
+				   *ptr2ext;
+
+		filename = malloc(strlen(argv[fnr]) + 2);
+		if (filename == NULL)
+		{
+			perror("malloc");
+			continue;
+		}
+
+		strcpy(filename, argv[fnr]);
+
+		ptr2ext = strrchr(filename, '.');
+		/* no extension or extension not equal .pgc */
+		if (ptr2ext == NULL || strcmp(ptr2ext, ".pgc") != 0)
+		{
+			ptr2ext = filename + strlen(filename);
+			ptr2ext[0] = '.';
+		}
+
+		/* make extension = .c */
+		ptr2ext[1] = 'c';
+		ptr2ext[2] = '\0';
+
+		if (out_option == 0)	/* calculate the output name */
+		{
+			yyout = fopen(filename, "w");
+			if (yyout == NULL)
+			{
+				perror(filename);
+				free(filename);
+				continue;
+			}
+		}
+
+		yyin = fopen(input_filename = argv[fnr], "r");
+		if (yyin == NULL)
+		{
+			perror(argv[fnr]);
+		}
+		else
+		{
+			/* initialize lex */
+			lex_init();
+
+			/* we need two includes everytime */
+			fprintf(yyout, "/* These two include files are added by the preprocessor */\n#include <ecpgtype.h>\n#include <ecpglib.h>\n");
+
+			/* and parse the source */
+			yyparse();
+
+			fclose(yyin);
+			if (out_option == 0)
+				fclose(yyout);
+		}
+
+		free(filename);
+	}
+	return (0);
+}