Patch wine to fix addDllDirectory

Fixes errors like this when trying to load DLLs into template haskell code with GHC 9.4 and above:

```
iserv-proxy-interpreter.exe: addLibrarySearchPath: \\?\Z:\nix\store\gjsf5jazfbfv21hvvgf1amd5rdx3ycf3-x86_64-w64-mingw32-ghc-9.4.3\lib\x86_64-windows-ghc-9.4.3\ghc-bignum-1.3 (Win32 error 87): Invalid parameter.
```

These errors arise with GHC 9.4 and above because it uses UNC paths to avoid limits on path length.  The `RtlDetermineDosPathNameType_U` function classifies these as a `DEVICE_PATH` and `LdrAddDllDirectory` gives up at that point.

Author: angerman

overlays/patches/wine-add-dll-directory.patch

@@ -0,0 +1,13 @@
+diff --git a/dlls/ntdll/loader.c b/dlls/ntdll/loader.c
+index 85eb2976807..36d92b32d1c 100644
+--- a/dlls/ntdll/loader.c
++++ b/dlls/ntdll/loader.c
+@@ -4015,7 +4015,7 @@ NTSTATUS WINAPI LdrAddDllDirectory( const UNICODE_STRING *dir, void **cookie )
+     struct dll_dir_entry *ptr;
+     DOS_PATHNAME_TYPE type = RtlDetermineDosPathNameType_U( dir->Buffer );
+ 
+-    if (type != ABSOLUTE_PATH && type != ABSOLUTE_DRIVE_PATH)
++    if (type != ABSOLUTE_PATH && type != ABSOLUTE_DRIVE_PATH && type != DEVICE_PATH )
+         return STATUS_INVALID_PARAMETER;
+ 
+     status = RtlDosPathNameToNtPathName_U_WithStatus( dir->Buffer, &nt_name, NULL, NULL );

overlays/wine.nix

@@ -2,21 +2,10 @@
 # files from TH code) for GHC built with msvcrt (ghc<9.6).
 # This will inevitably replace *any* wine version. Thus this might not really be what we ultimately want.
 # Wine 5.4 does not build on macOS so that is not pinned and TH code will probably break.
-final: prev:
-prev.lib.optionalAttrs (!prev.stdenv.hostPlatform.isDarwin) {
-    winePackages = prev.winePackages // {
-        minimal = prev.winePackages.minimal.overrideAttrs (oldAttrs: {
-            name = "wine-5.4";
-            version = "5.4";
-            src = prev.fetchurl {
-              url = "https://dl.winehq.org/wine/source/5.x/wine-5.4.tar.xz";
-              sha256 = "sha256-Sz4rD/pUFfGZVA5gUcKMOXb86R6lv7LPSgmcJXMXBSw=";
-            };
-            patches = [];
-            # Turning off the tests as there is a problem with the `schedsvc` test.
-            # With recent nixpkgs both the IDL files generate `_c.c` files with
-            # `handle_t rpc_handle` and that results in a linker error (duplicate symbols).
-            configureFlags = oldAttrs.configureFlags or [] ++ ["--disable-tests"];
-        });
-    };
+final: prev: {
+  winePackages = prev.winePackages // {
+    minimal = prev.winePackages.minimal.overrideAttrs (oldAttrs: {
+      patches = oldAttrs.patches or [] ++ [ ./patches/wine-add-dll-directory.patch ];
+    });
+  };
 }