Add mht2htmcl

5 files changed, 77 insertions, 1 deletions

diff --git a/default.nix b/default.nix
index d537768..225f552 100644
--- a/default.nix
+++ b/default.nix
@@ -13,4 +13,6 @@ rec {
   commit-mono = pkgs.callPackage ./pkgs/commit-mono/package.nix {};
 
   idafree = pkgs.callPackage ./pkgs/idafree/package.nix {};
+
+  mht2htmcl = pkgs.callPackage ./pkgs/mht2htmcl/package.nix {};
 }
diff --git a/overlay.nix b/overlay.nix
index 54e95c9..537b3e6 100644
--- a/overlay.nix
+++ b/overlay.nix
@@ -3,5 +3,5 @@ let
   simon = prev.callPackage ./. {};
 in
 {
-  inherit (simon) miasm msynth passwdqc sddm-theme-sugar-light senpai-nightly commit-mono;
+  inherit (simon) miasm msynth passwdqc sddm-theme-sugar-light senpai-nightly commit-mono mht2htmcl;
 }
diff --git a/pkgs/mht2htmcl/01-fix-current-lazarus-compat.patch b/pkgs/mht2htmcl/01-fix-current-lazarus-compat.patch
new file mode 100644
index 0000000..4441a4b
--- /dev/null
+++ b/pkgs/mht2htmcl/01-fix-current-lazarus-compat.patch
@@ -0,0 +1,30 @@
+diff -ruN a/mht2htmcl.lpi b/mht2htmcl.lpi
+--- a/mht2htmcl.lpi     2016-04-05 00:37:14.000000000 +0200
++++ b/mht2htmcl.lpi     2024-02-16 11:03:22.615248368 +0100
+@@ -30,10 +30,13 @@
+         <CommandLineParams Value="&quot;c:\Radni\programi\mht2htm\command line\*.mht&quot;"/>

+       </local>

+     </RunParams>

+-    <RequiredPackages Count="1">

++    <RequiredPackages Count="2">

+       <Item1>

+         <PackageName Value="LCL"/>

+       </Item1>

++      <Item2>

++        <PackageName Value="LazUtils"/>

++      </Item2>

+     </RequiredPackages>

+     <Units Count="5">

+       <Unit0>

+diff -ruN a/mht2htmcl.lpr b/mht2htmcl.lpr
+--- a/mht2htmcl.lpr     2016-04-07 17:36:48.000000000 +0200
++++ b/mht2htmcl.lpr     2024-02-16 11:03:42.096651425 +0100
+@@ -29,7 +29,7 @@
+   cthreads,

+   {$ENDIF}{$ENDIF}

+   Classes, SysUtils, CustApp, constants, languages, mechanism,

+-  fileutil

++  fileutil, LazUTF8, LazFileUtils

+ 

+   { you can add units after this };

+ 

diff --git a/pkgs/mht2htmcl/README.md b/pkgs/mht2htmcl/README.md
new file mode 100644
index 0000000..9acb3e4
--- /dev/null
+++ b/pkgs/mht2htmcl/README.md
@@ -0,0 +1,4 @@
+## mht2htmcl - convert Microsoft Packed HTML files to regular loose file HTML
+
+- Website: https://pgm.bpalanka.com/mht2htm.html
+- Built with Lazarus and Pascal
diff --git a/pkgs/mht2htmcl/package.nix b/pkgs/mht2htmcl/package.nix
new file mode 100644
index 0000000..b9ad176
--- /dev/null
+++ b/pkgs/mht2htmcl/package.nix
@@ -0,0 +1,40 @@
+{ stdenv
+, fetchzip
+, lazarus
+, fpc
+}:
+stdenv.mkDerivation {
+  pname = "mht2htmcl";
+  version = "1.8.1.35";
+
+  src = fetchzip {
+    # url = "https://sourceforge.net/settings/mirror_choices?projectname=mht2htm&filename=mht2htm/1.8.1%20%2805.apr.2016%29/mht2htmcl-1.8.1.35_07.apr.2016.source.zip&selected=master";
+    url = "mirror://sourceforge/mht2htm/mht2htm/1.8.1%20%2805.apr.2016%29/mht2htmcl-1.8.1.35_07.apr.2016.source.zip";
+    hash = "sha256-XtUuCR7j6vE6DoVy1crQAjBj6RpG8yl3gOVKgxPQhmM=";
+    stripRoot = false;
+  };
+
+  nativeBuildInputs = [ lazarus fpc ];
+
+  patches = [
+    ./01-fix-current-lazarus-compat.patch
+  ];
+
+  buildPhase = ''
+    runHook preBuild
+
+    lazbuild --lazarusdir=${lazarus}/share/lazarus \
+      mht2htmcl.lpi
+
+    runHook postBuild
+  '';
+
+  installPhase = ''
+    runHook preInstall
+
+    mkdir -p $out/bin
+    cp mht2htmcl $out/bin/
+
+    runHook postInstall
+  '';
+}