cask/artifact: check the bundle version when using --adopt.

This makes `--adopt` considerably faster and more useful for application
bundles by checking the bundle version before failing to adopt the
bundle.

This could be further extended by e.g. checking if auto-updates are
enabled.

While we're here, also allow `adopt` to act a bit more like `force` in
a few other places assuming this initial check passes.

Library/Homebrew/cask/artifact/moved.rb

@@ -52,12 +52,34 @@ def move(adopt: false, force: false, verbose: false, predecessor: nil, reinstall
           else
             if adopt
               ohai "Adopting existing #{self.class.english_name} at '#{target}'"
-              same = command.run(
-                "/usr/bin/diff",
-                args:         ["--recursive", "--brief", source, target],
-                verbose:,
-                print_stdout: verbose,
-              ).success?
+
+              source_plist = Pathname("#{source}/Contents/Info.plist")
+              target_plist = Pathname("#{target}/Contents/Info.plist")
+              same = if source_plist.exist? &&
+                        (source_bundle_version = Homebrew::BundleVersion.from_info_plist(source_plist)) &&
+                        target_plist.exist? &&
+                        (target_bundle_version = Homebrew::BundleVersion.from_info_plist(target_plist))
+                if source_bundle_version.short_version == target_bundle_version.short_version
+                  if source_bundle_version.version == target_bundle_version.version
+                    true
+                  else
+                    onoe "The bundle version of #{source} is #{source_bundle_version.version} but " \
+                         "is #{target_bundle_version.version} for #{target}!"
+                    false
+                  end
+                else
+                  onoe "The bundle short version of #{source} is #{source_bundle_version.short_version} but " \
+                       "is #{target_bundle_version.short_version} for #{target}!"
+                  false
+                end
+              else
+                command.run(
+                  "/usr/bin/diff",
+                  args:         ["--recursive", "--brief", source, target],
+                  verbose:,
+                  print_stdout: verbose,
+                ).success?
+              end
 
               unless same
                 raise CaskError,
@@ -73,7 +95,7 @@ def move(adopt: false, force: false, verbose: false, predecessor: nil, reinstall
 
             message = "It seems there is already #{self.class.english_article} " \
                       "#{self.class.english_name} at '#{target}'"
-            raise CaskError, "#{message}." unless force
+            raise CaskError, "#{message}." if !force && !adopt
 
             opoo "#{message}; overwriting."
             delete(target, force:, command:, **options)
@@ -120,13 +142,13 @@ def matching_artifact?(cask)
         end
       end
 
-      def move_back(skip: false, force: false, command: nil, **options)
+      def move_back(skip: false, force: false, adopt: false, command: nil, **options)
         FileUtils.rm source if source.symlink? && source.dirname.join(source.readlink) == target
 
         if Utils.path_occupied?(source)
           message = "It seems there is already #{self.class.english_article} " \
                     "#{self.class.english_name} at '#{source}'"
-          raise CaskError, "#{message}." unless force
+          raise CaskError, "#{message}." if !force && !adopt
 
           opoo "#{message}; overwriting."
           delete(source, force:, command:, **options)

Library/Homebrew/cask/artifact/symlinked.rb

@@ -43,7 +43,7 @@ def summarize_installed
 
       private
 
-      def link(force: false, command: nil, **_options)
+      def link(force: false, adopt: false, command: nil, **_options)
         unless source.exist?
           raise CaskError,
                 "It seems the #{self.class.link_type_english_name.downcase} " \
@@ -54,7 +54,7 @@ def link(force: false, command: nil, **_options)
           message = "It seems there is already #{self.class.english_article} " \
                     "#{self.class.english_name} at '#{target}'"
 
-          if force && target.symlink? &&
+          if (force || adopt) && target.symlink? &&
              (target.realpath == source.realpath || target.realpath.to_s.start_with?("#{cask.caskroom_path}/"))
             opoo "#{message}; overwriting."
             Utils.gain_permissions_remove(target, command:)