renamed to ex_to_js. Updated cli

bryanjos · bryanjos · commit fd6a579b47d0 · 2015-02-01T15:09:42.000-06:00
diff --git a/.gitignore b/.gitignore
@@ -2,5 +2,6 @@
 /deps
 erl_crash.dump
 *.ez
-exjs
-node_modules
+ex2js
+node_modules
+priv/test_project/dest
diff --git a/lib/elixir_script.ex b/lib/elixir_script.ex
diff --git a/lib/elixir_script/cli.ex b/lib/elixir_script/cli.ex
diff --git a/lib/ex_2_js.ex b/lib/ex_2_js.ex
@@ -0,0 +1,63 @@
+defmodule ExToJS do
+  require Logger
+
+  defmodule ParseError do
+     defexception message: "Erroro while parsing SpiderMonkey JST"
+  end
+
+  def parse(ast) do
+    ExToJS.Parser.parse(ast)
+  end
+
+  def parse_elixir(ex_code) do
+    js_ast = ex_code
+    |> Code.string_to_quoted!
+    |> ExToJS.SpiderMonkey.parse
+    |> Poison.encode!
+
+    [{ js_ast, "output.json" }]
+  end
+
+  def parse_ex_files(path) do
+    path
+    |> Path.wildcard
+    |> Enum.map(fn(x) -> parse_ex_file(x) end)     
+  end
+
+  def parse_ex_file(path) do
+    js_ast = path
+    |> File.read!
+    |> Code.string_to_quoted!
+    |> ExToJS.SpiderMonkey.parse
+    |> Poison.encode!
+
+    { js_ast, Path.basename(path, ".ex") <> ".json" }
+  end
+
+  def convert_ast_to_js(js_ast) when is_list(js_ast) do
+    Enum.map(js_ast, &convert_ast_to_js(&1))
+  end
+
+  def convert_ast_to_js({ js_ast, path }) do
+    case System.cmd(System.cwd() <> "/escodegen", [js_ast]) do
+      {js_code, 0} ->
+        { js_code, Path.basename(path, ".json") <> ".js" }
+      {error, _} ->
+        raise ParseError, message: error
+    end
+  end
+
+  def write_to_files(list, destination) do
+    Enum.each(list, fn(x) -> write_to_file(x, destination) end)
+  end
+
+  def write_to_file({js, file_name}, destination) do
+    file_name = Path.join([destination, file_name])
+
+    if !File.exists?(destination) do
+      File.mkdir_p!(destination)
+    end
+
+    File.write!(file_name, js)
+  end
+end
diff --git a/lib/ex_to_js/cli.ex b/lib/ex_to_js/cli.ex
@@ -0,0 +1,84 @@
+defmodule ExToJS.CLI do
+  def main(argv) do
+    argv
+    |> parse_args
+    |> process
+  end
+
+  defp parse_args(args) do
+    switches = [ output: :binary, ast: :boolean, elixir: :boolean ]
+    aliases = [ o: :output, a: :ast, ex: :elixir ]
+    
+    parse = OptionParser.parse(args, switches: switches, aliases: aliases)
+
+    case parse do
+      { [ output: output, ast: true, elixir: true], [input], _ } -> { input, output, :ast, :elixir}
+      { [ output: output, ast: true], [input], _ } -> { input, output, :ast }
+      { [ ast: true ] , [input], _ } -> { input, :ast }
+
+      { [ output: output, elixir: true], [input], _ } -> { input, output, :elixir}
+      { [ output: output], [input], _ } -> { input, output }
+
+      { [elixir: true] , [input], _ } -> { input, :elixir }
+      { [] , [input], _ } -> { input }
+      _ -> :help
+    end
+
+  end
+
+  defp process({ input, output, :ast, :elixir }) do
+    input 
+    |> ExToJS.parse_elixir 
+    |> ExToJS.write_to_file(output)
+  end
+
+  defp process({ input, output, :ast }) do
+    input 
+    |> ExToJS.parse_ex_files 
+    |> ExToJS.write_to_files(output)
+  end
+
+  defp process({ input, :ast }) do
+    input 
+    |> ExToJS.parse_ex_files 
+    |> Enum.map(fn({ast, _path})-> IO.puts(ast) end)
+  end
+
+  defp process({ input, output, :elixir }) do
+    input 
+    |> ExToJS.parse_elixir
+    |> ExToJS.write_to_files(output)
+  end
+
+  defp process({ input, :elixir }) do
+    input 
+    |> ExToJS.parse_elixir
+    |> Enum.map(fn({js, _path})-> IO.puts(js) end)
+  end
+
+  defp process({ input, output }) do
+    input 
+    |> ExToJS.parse_ex_files 
+    |> ExToJS.convert_ast_to_js 
+    |> ExToJS.write_to_files(output)
+  end
+
+  defp process({ input }) do
+    input 
+    |> ExToJS.parse_ex_files 
+    |> ExToJS.convert_ast_to_js 
+    |> Enum.map(fn({js, _path})-> IO.puts(js) end)
+  end
+
+  defp process(:help) do
+    IO.puts """
+      usage: ex2js <input> [options]
+
+      options:
+
+      -o  --output   places output in the given directory or file
+      -a  --ast      shows only produced spider monkey ast
+      -ex --elixir  read input as elixir code string
+    """
+  end
+end
diff --git a/lib/ex_to_js/spider_monkey.ex b/lib/ex_to_js/spider_monkey.ex
@@ -1,5 +1,5 @@
-defmodule ElixirScript.SpiderMonkey do
-  alias ElixirScript.SpiderMonkey.Nodes
+defmodule ExToJS.SpiderMonkey do
+  alias ExToJS.SpiderMonkey.Nodes
   
   def parse(nil) do
     Nodes.literal(nil)
diff --git a/lib/ex_to_js/spider_monkey/nodes.ex b/lib/ex_to_js/spider_monkey/nodes.ex
@@ -1,5 +1,5 @@
-defmodule ElixirScript.SpiderMonkey.Nodes do
-  alias ElixirScript.SpiderMonkey
+defmodule ExToJS.SpiderMonkey.Nodes do
+  alias ExToJS.SpiderMonkey
   
   def literal(value) do
     %{ type: "Literal", value: value }
diff --git a/mix.exs b/mix.exs
@@ -2,7 +2,7 @@ defmodule ElixirScript.Mixfile do
   use Mix.Project
 
   def project do
-    [app: :elixir_script,
+    [app: :ex_to_js,
      version: "0.0.1",
      elixir: "~> 1.0",
      escript: escript_config,
@@ -21,7 +21,7 @@ defmodule ElixirScript.Mixfile do
   end
 
   defp escript_config do
-    [main_module: ElixirScript.CLI, name: "exjs"]
+    [main_module: ExToJS.CLI, name: "ex2js"]
   end
   
 end
diff --git a/priv/test_project/src/hello.js b/priv/test_project/src/hello.js
diff --git a/test/spider_monkey_test.exs b/test/spider_monkey_test.exs
@@ -1,7 +1,7 @@
-defmodule ElixirScript.SpiderMonkey.Test do
+defmodule ExToJS.SpiderMonkey.Test do
   use ExUnit.Case
-  alias ElixirScript.SpiderMonkey
-  alias ElixirScript.SpiderMonkey.Nodes
+  alias ExToJS.SpiderMonkey
+  alias ExToJS.SpiderMonkey.Nodes
 
   test "parse nil" do
     assert SpiderMonkey.parse(nil) == Nodes.literal(nil)
