Use openssl and musl versions in the runtime cache keys

Author: doawoo

lib/burrito.ex

@@ -3,17 +3,29 @@ defmodule Burrito do
   alias Burrito.Builder.Log
 
   @zig_version_expected %Version{major: 0, minor: 14, patch: 1}
+  @openssl_version %Version{major: 3, minor: 5, patch: 1}
+  @musl_version %Version{major: 1, minor: 2, patch: 5}
 
   @spec wrap(Mix.Release.t()) :: Mix.Release.t()
   def wrap(%Mix.Release{} = release) do
     pre_check()
     Builder.build(release)
   end
 
+  @spec register_erts_resolver(module()) :: :ok
   def register_erts_resolver(module) when is_atom(module) do
     Application.put_env(:burrito, :erts_resolver, module)
   end
 
+  @spec get_versions() :: map()
+  def get_versions() do
+    %{
+      zig: @zig_version_expected,
+      openssl: @openssl_version,
+      musl: @musl_version
+    }
+  end
+
   defp pre_check() do
     if Enum.any?(~w(zig xz), &(System.find_executable(&1) == nil)) do
       Log.error(

lib/util/erts_universal_machine_fetcher.ex

@@ -15,10 +15,10 @@ defmodule Burrito.Util.ERTSUniversalMachineFetcher do
     final_url =
       case os do
         :darwin ->
-          @mac_url <> @please_do_not_abuse_these_downloads_bandwidth_costs_money
+          @mac_url <> @please_do_not_abuse_these_downloads_bandwidth_costs_money <> append_versions()
 
         :linux ->
-          @linux_url <> @please_do_not_abuse_these_downloads_bandwidth_costs_money
+          @linux_url <> @please_do_not_abuse_these_downloads_bandwidth_costs_money <> append_versions()
 
         :windows ->
           @windows_url
@@ -30,4 +30,10 @@ defmodule Burrito.Util.ERTSUniversalMachineFetcher do
 
     URI.parse(final_url)
   end
+
+  defp append_versions() do
+    # These are used to cache-bust when openssl or musl versions are changed upstream in the BEAM Machine build server
+    versions = Burrito.get_versions()
+    "&openssl=#{to_string(versions.openssl)}&musl=#{to_string(versions.musl)}"
+  end
 end