# First, we define our infrastructure using the Infra DSL
defmodule Infra do
  use MonkeyScript.Scripting.Infra

  name "app-server" do
    # The host is used to access the server for command and control (SSH)
    hosts domain: "hackthenorth.com"

    service "mysql", port: 5432
    service "nginx", port: 80
  end

  monkeyscript_finish()
end

# Include test and monkeyscript networking libraries
use ExUnit.Case
import MonkeyScript.Scripts.Networking

# Our custom code to restart the systems
def restart_worker(...) do
  ...
end

# Our monkey script resiliency tests, in the form of standard unit tests
test "can still hit homepage if mysql is down" do
  block_port(Infra, "app-server", service: "mysql") do
    assert true == ping(Infra, "app-server")
  end
end

test "web worker restarts if mysql is down" do
  block_port(Infra, "app-server", service: "mysql") do
    restart_worker(Infra, "app-server")
    :timer.sleep(:timer.seconds(10))
    assert true == ping(Infra, "app-server")
  end
end

def deps do
  [{:monkey_script, "~> 0.1.0"}]
end