alex

defmodule Alex.ROM do
  @moduledoc """
  Convenience functions for finding, verifying, and loading ROMs.
  """

  @doc """
  Returns all supported ROMs.

  Returns `Map`.
  """
  def supported_roms do
    %{
      "35be55426c1fec32dfb503b4f0651572" => "air_raid.bin",
      "f1a0a23e6464d954e3a9579c4ccd01c8" => "alien.bin",
      "acb7750b4d0c4bd34969802a7deb2990" => "amidar.bin",
      "de78b3a064d374390ac0710f95edde92" => "assault.bin",
      "89a68746eff7f266bbf08de2483abe55" => "asterix.bin",
      "ccbd36746ed4525821a8083b0d6d2c2c" => "asteroids.bin",
      "9ad36e699ef6f45d9eb6c4cf90475c9f" => "atlantis.bin",
      "00ce0bdd43aed84a983bef38fe7f5ee3" => "bank_heist.bin",
      "41f252a66c6301f1e8ab3612c19bc5d4" => "battle_zone.bin",
      "79ab4123a83dc11d468fb2108ea09e2e" => "beam_rider.bin",
      "136f75c4dd02c29283752b7e5799f978" => "berzerk.bin",
      "c9b7afad3bfd922e006a6bfc1d4f3fe7" => "bowling.bin",
      "c3ef5c4653212088eda54dc91d787870" => "boxing.bin",
      "f34f08e5eb96e500e851a80be3277a56" => "breakout.bin",
      "028024fb8e5e5f18ea586652f9799c96" => "carnival.bin",
      "91c2098e88a6b13f977af8c003e0bca5" => "centipede.bin",
      "c1cb228470a87beb5f36e90ac745da26" => "chopper_command.bin",
      "55ef7b65066428367844342ed59f956c" => "crazy_climber.bin",
      "0f643c34e40e3f1daafd9c524d3ffe64" => "defender.bin",
      "f0e0addc07971561ab80d9abe1b8d333" => "demon_attack.bin",
      "368d88a6c071caba60b4f778615aae94" => "double_dunk.bin",
      "71f8bacfbdca019113f3f0801849057e" => "elevator_action.bin",
      "36b20c427975760cb9cf4a47e41369e4" => "donkey_kong.bin",
      "94b92a882f6dbaa6993a46e2dcc58402" => "enduro.bin",
      "b8865f05676e64f3bec72b9defdacfa7" => "fishing_derby.bin",
      "8e0ab801b1705a740b476b7f588c6d16" => "freeway.bin",
      "081e2c114c9c20b61acf25fc95c71bf4" => "frogger.bin",
      "4ca73eb959299471788f0b685c3ba0b5" => "frostbite.bin",
      "211774f4c5739042618be8ff67351177" => "galaxian.bin",
      "c16c79aad6272baffb8aae9a7fff0864" => "gopher.bin",
      "8ac18076d01a6b63acf6e2cab4968940" => "gravitar.bin",
      "fca4a5be1251927027f2c24774a02160" => "hero.bin",
      "a4c08c4994eb9d24fb78be1793e82e26" => "ice_hockey.bin",
      "e51030251e440cffaab1ac63438b44ae" => "jamesbond.bin",
      "718ae62c70af4e5fd8e932fee216948a" => "journey_escape.bin",
      "5428cdfada281c569c74c7308c7f2c26" => "kaboom.bin",
      "4326edb70ff20d0ee5ba58fa5cb09d60" => "kangaroo.bin",
      "6c1f3f2e359dbf55df462ccbcdd2f6bf" => "keystone_kapers.bin",
      "0dd4c69b5f9a7ae96a7a08329496779a" => "king_kong.bin",
      "534e23210dd1993c828d944c6ac4d9fb" => "koolaid.bin",
      "4baada22435320d185c95b7dd2bcdb24" => "krull.bin",
      "5b92a93b23523ff16e2789b820e2a4c5" => "kung_fu_master.bin",
      "8e4cd60d93fcde8065c1a2b972a26377" => "laser_gates.bin",
      "2d76c5d1aad506442b9e9fb67765e051" => "lost_luggage.bin",
      "3347a6dd59049b15a38394aa2dafa585" => "montezuma_revenge.bin",
      "aa7bb54d2c189a31bb1fa20099e42859" => "mr_do.bin",
      "87e79cd41ce136fd4f72cc6e2c161bee" => "ms_pacman.bin",
      "36306070f0c90a72461551a7a4f3a209" => "name_this_game.bin",
      "fc2233fc116faef0d3c31541717ca2db" => "pacman.bin",
      "7e52a95074a66640fcfde124fffd491a" => "phoenix.bin",
      "3e90cf23106f2e08b2781e41299de556" => "pitfall.bin",
      "60e0ea3cbe0913d39803477945e9e5ec" => "pong.bin",
      "4799a40b6e889370b7ee55c17ba65141" => "pooyan.bin",
      "ef3a4f64b6494ba770862768caf04b86" => "private_eye.bin",
      "484b0076816a104875e00467d431c2d2" => "qbert.bin",
      "393948436d1f4cc3192410bb918f9724" => "riverraid.bin",
      "2bd00beefdb424fa39931a75e890695d" => "road_runner.bin",
      "4f618c2429138e0280969193ed6c107e" => "robotank.bin",
      "240bfbac5163af4df5ae713985386f92" => "seaquest.bin",
      "dd0cbe5351551a538414fb9e37fc56e8" => "sir_lancelot.bin",
      "b76fbadc8ffb1f83e2ca08b6fb4d6c9f" => "skiing.bin",
      "e72eb8d4410152bdcb69e7fba327b420" => "solaris.bin",
      "72ffbef6504b75e69ee1045af9075f66" => "space_invaders.bin",
      "a3c1c70024d7aabb41381adbfb6d3b25" => "star_gunner.bin",
      "4d7517ae69f95cfbc053be01312b7dba" => "surround.bin",
      "42cdd6a9e42a3639e190722b8ea3fc51" => "tennis.bin",
      "b0e1ee07fbc73493eac5651a52f90f00" => "tetris.bin",
      "fc2104dd2dadf9a6176c1c1c8f87ced9" => "time_pilot.bin",
      "fb27afe896e7c928089307b32e5642ee" => "trondead.bin",
      "085322bae40d904f53bdcc56df0593fc" => "tutankham.bin",
      "a499d720e7ee35c62424de882a3351b6" => "up_n_down.bin",
      "3e899eba0ca8cd2972da1ae5479b4f0d" => "venture.bin",
      "107cc025334211e6d29da0b6be46aec7" => "video_pinball.bin",
      "7e8aa18bc9502eb57daaf5e7c1e94da7" => "wizard_of_wor.bin",
      "c5930d0e8cdae3e037349bfa08e871be" => "yars_revenge.bin",
      "eea0da9b987d661264cce69a7c13c3bd" => "zaxxon.bin"
    }
  end

  @doc """
  Check if the specified ROM exists.

  Returns `:ok` or `{:error, err}`.

  # Parameters

    - `path_to_rom`: Path to ROM file.
  """
  def rom_exists?(path_to_rom) do
    if File.exists?(path_to_rom) do
      :ok
    else
      {:error, "Could not find ROM File: `#{path_to_rom}`."}
    end
  end

  @doc """
  Check if the specified ROM is supported.

  Returns `:ok` or `{:error, err}`.

  # Parameters

    - `path_to_rom`: Path to ROM file.
  """
  def rom_supported?(path_to_rom) do
    hash =
      path_to_rom
      |> File.stream!()
      |> Enum.reduce(
        :crypto.hash_init(:md5),
        fn chunk, prev ->
          :crypto.hash_update(prev, chunk)
        end
      )
      |> :crypto.hash_final()
      |> Base.encode16()
      |> String.downcase()

    if Map.has_key?(supported_roms(), hash) do
      :ok
    else
      {:error, "Unsupported ROM: `#{path_to_rom}`."}
    end
  end
end