add parser

src/main.c

@@ -0,0 +1,87 @@
+/* Copyright 2014 Samsung Electronics Co., Ltd.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "error.h"
+#include "lexer.h"
+#include "parser.h"
+#include "pretty-printer.h"
+
+int
+main (int argc, char **argv)
+{
+  bool dump_tokens = false;
+  bool dump_ast = false;
+  const char *file_name = NULL;
+  FILE *file = NULL;
+
+  if (argc > 0)
+    for (int i = 1; i < argc; i++)
+      {
+        if (!strcmp ("-t", argv[i]))
+          dump_tokens = true;
+        else if (!strcmp ("-a", argv[i]))
+          dump_ast = true;
+        else if (file_name == NULL)
+          file_name = argv[i];
+        else
+          fatal (ERR_SEVERAL_FILES);
+      }
+
+  if (file_name == NULL)
+    fatal (ERR_NO_FILES);
+
+  if (dump_tokens && dump_ast)
+    fatal (ERR_SEVERAL_FILES);
+
+  file = fopen (file_name, "r");
+
+  if (file == NULL)
+    fatal (ERR_IO);
+
+  if (dump_tokens)
+    {
+      token tok;
+      lexer_set_file (file);
+      tok = lexer_next_token ();
+      pp_reset ();
+      while (tok.type != TOK_EOF)
+        {
+          pp_token (tok);
+          tok = lexer_next_token ();
+        }
+    }
+
+  if (dump_ast)
+    {
+      statement *st;
+      lexer_set_file (file);
+      parser_init ();
+      st = parser_parse_statement ();
+      assert (st);
+      while (st->type != STMT_EOF)
+        {
+          pp_statement (st);
+          st = parser_parse_statement ();
+          assert (st);
+        }
+      pp_finish ();
+    }
+
+  return 0;
+}