TechEmpower.FrameworkBenchmarks/frameworks/Elixir/phoenix/web/controllers/page_controller.ex

defmodule Hello.PageController do
  use Hello.Web, :controller
  alias Hello.World
  alias Hello.Fortune

  plug :action

  def index(conn, _params) do
    json conn, %{"TE Benchmarks\n" => "Started"}
  end

  # avoid namespace collision
  def _json(conn, _params) do
    json conn, %{message: "Hello, world!"}
  end

  def db(conn, _params) do
    json conn, Repo.get(World, :random.uniform(10000))
  end

  def queries(conn, _params) do
    q = try do
      case String.to_integer(_params["queries"]) do
        x when x < 1    -> 1
        x when x > 500  -> 500
        x               -> x
      end
    rescue
      ArgumentError -> 1
    end
    json conn, Enum.map(1..q, fn _ -> Repo.get(World, :random.uniform(10000)) end)
  end

  def fortunes(conn, _params) do
    fortunes = List.insert_at(Repo.all(Fortune), 0, %Fortune{:id => 0, :message  => "Additional fortune added at request time."})
    render conn, "fortunes.html", fortunes: Enum.sort(fortunes, fn f1, f2 -> f1.message < f2.message end)
  end

  def updates(conn, _params) do
    q = try do
      case String.to_integer(_params["queries"]) do
        x when x < 1    -> 1
        x when x > 500  -> 500
        x               -> x
      end
    rescue
      ArgumentError -> 1
    end
    json conn, Enum.map(1..q, fn _ ->
      w = Repo.get(World, :random.uniform(10000))
      changeset = World.changeset(w, %{randomNumber: :random.uniform(10000)})
      Repo.update(changeset)
      w end)
  end

  def plaintext(conn, _params) do
    text conn, "Hello, world!"
  end
end