Clean up of WebP variants of files replaced with WebP

Author: dtdesign

wcfsetup/install/files/lib/system/file/command/ReplaceFileSource.class.php

@@ -35,6 +35,7 @@ public function __invoke(): File
         $this->validatePathname($this->file->getPathnameWebp());
 
         $file = $this->replaceSource();
+        $file = $this->discardWebpVariantOfWebpFile($file);
         $this->regenerateExistingThumbnails($file);
 
         return $file;
@@ -131,6 +132,28 @@ private function replaceSource(): File
         }
     }
 
+    private function discardWebpVariantOfWebpFile(File $file): File
+    {
+        if ($file->mimeType !== 'image/webp') {
+            return $file;
+        }
+
+        $pathname = $file->getPathnameWebp();
+        if ($pathname === null) {
+            return $file;
+        }
+
+        if (\file_exists($pathname)) {
+            \unlink($file->getPathnameWebp());
+        }
+
+        (new FileEditor($file))->update([
+            'fileHashWebp' => null,
+        ]);
+
+        return new File($file->fileID);
+    }
+
     private function regenerateExistingThumbnails(File $file): void
     {
         $sql = "SELECT  COUNT(*)