defmodule Openstack.Nova do

  import Openstack, only: :macros

  defresource "server", "compute", "/servers", "server", update: {:put, "/:id"}
  defresource "server_action", "compute", "/servers/:id/action", nil, only: [:create]

  defresource "server_detail", "compute", "/servers/detail", "server", only: [:list]

  def server_vnc_console(token, region, id, params \\ []) do
    case server_action_create(token, region, id, %{"os-getVNCConsole": %{type: Dict.get(params, :type, "novnc")}}) do
      {:ok, result} -> {:ok, Dict.get(result, "console")}
      x -> x
    end
  end

  def server_reset_state(token, region, id, state) do
    server_action_create(token, region, id, %{"os-resetState": %{state: state}})
  end

  def server_create_image(token, region, id, params) do
    server_action_create(token, region, id, %{"createImage": params})
  end

  defresource "flavor", "compute", "/flavors", "flavor", update: {:put, "/:id"}
  defresource "flavor_detail", "compute", "/flavors/detail", "flavor", only: [:list]

end