02/73: gnu: zig-0.9: Update patches.

[guix-commits]

hako pushed a commit to branch wip-zig-bootstrap
in repository guix.

commit b1fae324a72d12115261145deed2019afe0c2219
Author: Hilton Chain <hako@ultrarare.space>
AuthorDate: Wed Nov 13 21:29:54 2024 +0800

    gnu: zig-0.9: Update patches.
    
    Use upstream version of system-paths patch, additionally support "CROSS_"
    environment variables.
    
    * gnu/packages/patches/zig-0.9-fix-runpath.patch: New file.
    * gnu/packages/patches/zig-use-baseline-cpu-by-default.patch: Rename to...
    * gnu/packages/patches/zig-0.9-use-baseline-cpu-by-default.patch: ...this.
    * gnu/packages/patches/zig-use-system-paths.patch: Rename to...
    * gnu/packages/patches/zig-0.9-use-system-paths.patch: ...this and update.
    * gnu/local.mk (dist_patch_DATA): Adjust accordingly.
    * gnu/packages/zig.scm (zig-0.9)[source]: Use zig-source.
    Add patches.
    (zig-0.10)[source]<patches>: Adjust patch name.
    
    Change-Id: I9c9dec911e00a797a959b83ab214c129743173fd
---
 gnu/local.mk                                       |   5 +-
 gnu/packages/patches/zig-0.9-fix-runpath.patch     |  27 ++++
 ...h => zig-0.9-use-baseline-cpu-by-default.patch} |   0
 .../patches/zig-0.9-use-system-paths.patch         | 140 +++++++++++++++++++
 gnu/packages/patches/zig-use-system-paths.patch    | 148 ---------------------
 gnu/packages/zig.scm                               |  20 +--
 6 files changed, 180 insertions(+), 160 deletions(-)

diff --git a/gnu/local.mk b/gnu/local.mk
index c89fd88282..116e9c8b48 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -2363,9 +2363,10 @@ dist_patch_DATA =                                        
        \
   %D%/packages/patches/xygrib-fix-finding-data.patch           \
   %D%/packages/patches/xygrib-newer-proj.patch                 \
   %D%/packages/patches/yggdrasil-extra-config.patch    \
+  %D%/packages/patches/zig-0.9-fix-runpath.patch               \
   %D%/packages/patches/zig-0.9-riscv-support.patch             \
-  %D%/packages/patches/zig-use-baseline-cpu-by-default.patch   \
-  %D%/packages/patches/zig-use-system-paths.patch              \
+  %D%/packages/patches/zig-0.9-use-baseline-cpu-by-default.patch       \
+  %D%/packages/patches/zig-0.9-use-system-paths.patch          \
   %D%/packages/patches/zsh-egrep-failing-test.patch            \
   %D%/packages/patches/zuo-bin-sh.patch
 
diff --git a/gnu/packages/patches/zig-0.9-fix-runpath.patch 
b/gnu/packages/patches/zig-0.9-fix-runpath.patch
new file mode 100644
index 0000000000..65677f6b06
--- /dev/null
+++ b/gnu/packages/patches/zig-0.9-fix-runpath.patch
@@ -0,0 +1,27 @@
+From 97d6b38ee78941b96bfd30dc2c814fd9c38561e3 Mon Sep 17 00:00:00 2001
+From: Hilton Chain <hako@ultrarare.space>
+Date: Wed, 27 Nov 2024 11:55:44 +0800
+Subject: [PATCH] Fix RUNPATH issue.
+
+Add needed libraries and libc to RUNPATH when CROSS_LIBRARY_PATH or 
LIBRARY_PATH
+is set.
+---
+ src/Compilation.zig | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/src/Compilation.zig b/src/Compilation.zig
+index b44c7da78d..be28538e6a 100644
+--- a/src/Compilation.zig
++++ b/src/Compilation.zig
+@@ -1515,7 +1515,7 @@ pub fn create(gpa: Allocator, options: InitOptions) 
!*Compilation {
+             .llvm_cpu_features = llvm_cpu_features,
+             .skip_linker_dependencies = options.skip_linker_dependencies,
+             .parent_compilation_link_libc = 
options.parent_compilation_link_libc,
+-            .each_lib_rpath = options.each_lib_rpath orelse 
options.is_native_os,
++            .each_lib_rpath = std.zig.system.NativePaths.isGuix(arena) or 
options.each_lib_rpath orelse false,
+             .disable_lld_caching = options.disable_lld_caching,
+             .subsystem = options.subsystem,
+             .is_test = options.is_test,
+-- 
+2.46.0
+
diff --git a/gnu/packages/patches/zig-use-baseline-cpu-by-default.patch 
b/gnu/packages/patches/zig-0.9-use-baseline-cpu-by-default.patch
similarity index 100%
rename from gnu/packages/patches/zig-use-baseline-cpu-by-default.patch
rename to gnu/packages/patches/zig-0.9-use-baseline-cpu-by-default.patch
diff --git a/gnu/packages/patches/zig-0.9-use-system-paths.patch 
b/gnu/packages/patches/zig-0.9-use-system-paths.patch
new file mode 100644
index 0000000000..7d2c181160
--- /dev/null
+++ b/gnu/packages/patches/zig-0.9-use-system-paths.patch
@@ -0,0 +1,140 @@
+From 77d3e8bc20062c86c9999798f3fde936dc3303aa Mon Sep 17 00:00:00 2001
+From: Hilton Chain <hako@ultrarare.space>
+Date: Wed, 27 Nov 2024 11:54:51 +0800
+Subject: [PATCH] Use system paths.
+
+Prefer Guix search paths and support Guix cross builds.
+---
+ lib/std/zig/system/NativePaths.zig      | 61 +++++++++++++++++++++++++
+ lib/std/zig/system/NativeTargetInfo.zig | 25 ++++++++--
+ src/main.zig                            |  2 +-
+ 3 files changed, 83 insertions(+), 5 deletions(-)
+
+diff --git a/lib/std/zig/system/NativePaths.zig 
b/lib/std/zig/system/NativePaths.zig
+index 8e3e46e481..8e4a286283 100644
+--- a/lib/std/zig/system/NativePaths.zig
++++ b/lib/std/zig/system/NativePaths.zig
+@@ -26,6 +26,10 @@ pub fn detect(allocator: Allocator, native_info: 
NativeTargetInfo) !NativePaths
+     };
+     errdefer self.deinit();
+ 
++    if (isGuix(allocator)) {
++        try self.addGuixPaths(allocator);
++        return self;
++    }
+     var is_nix = false;
+     if (process.getEnvVarOwned(allocator, "NIX_CFLAGS_COMPILE")) 
|nix_cflags_compile| {
+         defer allocator.free(nix_cflags_compile);
+@@ -203,3 +207,60 @@ fn appendArray(self: *NativePaths, array: 
*ArrayList([:0]u8), s: []const u8) !vo
+     errdefer array.allocator.free(item);
+     try array.append(item);
+ }
++
++pub fn isCrossGuix(arena: Allocator) bool {
++    return process.hasEnvVar(arena, "CROSS_LIBRARY_PATH") catch false;
++}
++
++pub fn isGuix(arena: Allocator) bool {
++    return isCrossGuix(arena) or process.hasEnvVar(arena, "LIBRARY_PATH") 
catch false;
++}
++
++const guix_paths = [_][]const u8{ "C_INCLUDE_PATH", "CPLUS_INCLUDE_PATH", 
"LIBRARY_PATH" };
++const guix_cross_paths = [_][]const u8{ "CROSS_C_INCLUDE_PATH", 
"CROSS_CPLUS_INCLUDE_PATH", "CROSS_LIBRARY_PATH" };
++
++fn addGuixPaths(self: *NativePaths, arena: Allocator) !void {
++    for (guix_cross_paths[0..2]) |env_var| {
++        if (process.getEnvVarOwned(arena, env_var)) |dirs| {
++            var it = mem.tokenize(u8, dirs, ":");
++            while (it.next()) |dir|
++                try self.addIncludeDir(dir);
++        } else |err| switch (err) {
++            error.InvalidUtf8 => {},
++            error.EnvironmentVariableNotFound => {},
++            error.OutOfMemory => |e| return e,
++        }
++    }
++    if (process.getEnvVarOwned(arena, guix_cross_paths[2])) |dirs| {
++        var it = mem.tokenize(u8, dirs, ":");
++        while (it.next()) |dir|
++            try self.addLibDir(dir);
++    } else |err| switch (err) {
++        error.InvalidUtf8 => {},
++        error.EnvironmentVariableNotFound => {},
++        error.OutOfMemory => |e| return e,
++    }
++
++    if (!isCrossGuix(arena)) {
++        for (guix_paths[0..2]) |env_var| {
++            if (process.getEnvVarOwned(arena, env_var)) |dirs| {
++                var it = mem.tokenize(u8, dirs, ":");
++                while (it.next()) |dir|
++                    try self.addIncludeDir(dir);
++            } else |err| switch (err) {
++                error.InvalidUtf8 => {},
++                error.EnvironmentVariableNotFound => {},
++                error.OutOfMemory => |e| return e,
++            }
++        }
++        if (process.getEnvVarOwned(arena, guix_paths[2])) |dirs| {
++            var it = mem.tokenize(u8, dirs, ":");
++            while (it.next()) |dir|
++                try self.addLibDir(dir);
++        } else |err| switch (err) {
++            error.InvalidUtf8 => {},
++            error.EnvironmentVariableNotFound => {},
++            error.OutOfMemory => |e| return e,
++        }
++    }
++}
+diff --git a/lib/std/zig/system/NativeTargetInfo.zig 
b/lib/std/zig/system/NativeTargetInfo.zig
+index af41fc7905..46fa40d2bb 100644
+--- a/lib/std/zig/system/NativeTargetInfo.zig
++++ b/lib/std/zig/system/NativeTargetInfo.zig
+@@ -784,10 +784,27 @@ fn defaultAbiAndDynamicLinker(cpu: Target.Cpu, os: 
Target.Os, cross_target: Cros
+     };
+     return NativeTargetInfo{
+         .target = target,
+-        .dynamic_linker = if (cross_target.dynamic_linker.get() == null)
+-            target.standardDynamicLinkerPath()
+-        else
+-            cross_target.dynamic_linker,
++        .dynamic_linker = if (cross_target.dynamic_linker.get() == null) blk: 
{
++            var standard_linker = target.standardDynamicLinkerPath();
++            if (standard_linker.get()) |standard_linker_path| {
++                if (!(builtin.os.tag == .windows or (builtin.os.tag == .wasi 
and !builtin.link_libc))) {
++                    if (std.os.getenv("CROSS_LIBRARY_PATH") orelse 
std.os.getenv("LIBRARY_PATH")) |library_path| {
++                        const linker_basename = 
fs.path.basename(standard_linker_path);
++                        var buffer: [255]u8 = undefined;
++                        var it = mem.tokenize(u8, library_path, ":");
++                        while (it.next()) |dir| {
++                            const linker_fullpath = std.fmt.bufPrint(&buffer, 
"{s}{s}{s}", .{ dir, fs.path.sep_str, linker_basename }) catch "";
++                            const guix_linker_path = 
fs.cwd().realpath(linker_fullpath, &buffer) catch "";
++                            if (guix_linker_path.len != 0) {
++                                standard_linker.set(guix_linker_path);
++                                break;
++                            }
++                        }
++                    }
++                }
++            }
++            break :blk standard_linker;
++        } else cross_target.dynamic_linker,
+     };
+ }
+ 
+diff --git a/src/main.zig b/src/main.zig
+index 42daa95d3a..a29a07d467 100644
+--- a/src/main.zig
++++ b/src/main.zig
+@@ -2039,7 +2039,7 @@ fn buildOutputType(
+             want_native_include_dirs = true;
+     }
+ 
+-    if (sysroot == null and cross_target.isNativeOs() and 
(system_libs.count() != 0 or want_native_include_dirs)) {
++    if (std.zig.system.NativePaths.isCrossGuix(arena) or sysroot == null and 
cross_target.isNativeOs() and (system_libs.count() != 0 or 
want_native_include_dirs)) {
+         const paths = std.zig.system.NativePaths.detect(arena, target_info) 
catch |err| {
+             fatal("unable to detect native system paths: {s}", 
.{@errorName(err)});
+         };
+-- 
+2.46.0
+
diff --git a/gnu/packages/patches/zig-use-system-paths.patch 
b/gnu/packages/patches/zig-use-system-paths.patch
deleted file mode 100644
index a008beafc2..0000000000
--- a/gnu/packages/patches/zig-use-system-paths.patch
+++ /dev/null
@@ -1,148 +0,0 @@
-This patch replaces the OS-specific detection mechanism by one that solely
-relies on environment variables.  This has the benefit that said environment
-variables can be used as search paths in Guix.
-
-diff --git a/lib/std/zig/system/NativePaths.zig 
b/lib/std/zig/system/NativePaths.zig
-index 8e3e46e48..1ed9d3206 100644
---- a/lib/std/zig/system/NativePaths.zig
-+++ b/lib/std/zig/system/NativePaths.zig
-@@ -26,73 +26,42 @@ pub fn detect(allocator: Allocator, native_info: 
NativeTargetInfo) !NativePaths
-     };
-     errdefer self.deinit();
- 
--    var is_nix = false;
--    if (process.getEnvVarOwned(allocator, "NIX_CFLAGS_COMPILE")) 
|nix_cflags_compile| {
--        defer allocator.free(nix_cflags_compile);
--
--        is_nix = true;
--        var it = mem.tokenize(u8, nix_cflags_compile, " ");
-+    // TODO: Support cross-compile paths?
-+    if (process.getEnvVarOwned(allocator, "C_INCLUDE_PATH")) |c_include_path| 
{
-+        defer allocator.free(c_include_path);
-+        var it = mem.tokenize(u8, c_include_path, ":");
-         while (true) {
--            const word = it.next() orelse break;
--            if (mem.eql(u8, word, "-isystem")) {
--                const include_path = it.next() orelse {
--                    try self.addWarning("Expected argument after -isystem in 
NIX_CFLAGS_COMPILE");
--                    break;
--                };
--                try self.addIncludeDir(include_path);
--            } else {
--                if (mem.startsWith(u8, word, "-frandom-seed=")) {
--                    continue;
--                }
--                try self.addWarningFmt("Unrecognized C flag from 
NIX_CFLAGS_COMPILE: {s}", .{word});
--            }
-+            const dir = it.next() orelse break;
-+            try self.addIncludeDir(dir);
-         }
-     } else |err| switch (err) {
-         error.InvalidUtf8 => {},
-         error.EnvironmentVariableNotFound => {},
-         error.OutOfMemory => |e| return e,
-     }
--    if (process.getEnvVarOwned(allocator, "NIX_LDFLAGS")) |nix_ldflags| {
--        defer allocator.free(nix_ldflags);
--
--        is_nix = true;
--        var it = mem.tokenize(u8, nix_ldflags, " ");
-+    if (process.getEnvVarOwned(allocator, "CPLUS_INCLUDE_PATH")) 
|cplus_include_path| {
-+        defer allocator.free(cplus_include_path);
-+        var it = mem.tokenize(u8, cplus_include_path, ":");
-         while (true) {
--            const word = it.next() orelse break;
--            if (mem.eql(u8, word, "-rpath")) {
--                const rpath = it.next() orelse {
--                    try self.addWarning("Expected argument after -rpath in 
NIX_LDFLAGS");
--                    break;
--                };
--                try self.addRPath(rpath);
--            } else if (word.len > 2 and word[0] == '-' and word[1] == 'L') {
--                const lib_path = word[2..];
--                try self.addLibDir(lib_path);
--            } else {
--                try self.addWarningFmt("Unrecognized C flag from NIX_LDFLAGS: 
{s}", .{word});
--                break;
--            }
-+            const dir = it.next() orelse break;
-+            try self.addIncludeDir(dir);
-         }
-     } else |err| switch (err) {
-         error.InvalidUtf8 => {},
-         error.EnvironmentVariableNotFound => {},
-         error.OutOfMemory => |e| return e,
-     }
--    if (is_nix) {
--        return self;
--    }
--
--    if (comptime builtin.target.isDarwin()) {
--        try self.addIncludeDir("/usr/include");
--        try self.addIncludeDir("/usr/local/include");
--
--        try self.addLibDir("/usr/lib");
--        try self.addLibDir("/usr/local/lib");
--
--        try self.addFrameworkDir("/Library/Frameworks");
--        try self.addFrameworkDir("/System/Library/Frameworks");
--
--        return self;
-+    if (process.getEnvVarOwned(allocator, "LIBRARY_PATH")) |library_path| {
-+        defer allocator.free(library_path);
-+        var it = mem.tokenize(u8, library_path, ":");
-+        while (true) {
-+            const dir = it.next() orelse break;
-+            try self.addLibDir(dir);
-+        }
-+    } else |err| switch (err) {
-+        error.InvalidUtf8 => {},
-+        error.EnvironmentVariableNotFound => {},
-+        error.OutOfMemory => |e| return e,
-     }
- 
-     if (comptime native_target.os.tag == .solaris) {
-@@ -106,32 +75,17 @@ pub fn detect(allocator: Allocator, native_info: 
NativeTargetInfo) !NativePaths
-         return self;
-     }
- 
--    if (native_target.os.tag != .windows) {
--        const triple = try native_target.linuxTriple(allocator);
--        const qual = native_target.cpu.arch.ptrBitWidth();
--
--        // TODO: $ ld --verbose | grep SEARCH_DIR
--        // the output contains some paths that end with lib64, maybe include 
them too?
--        // TODO: what is the best possible order of things?
--        // TODO: some of these are suspect and should only be added on some 
systems. audit needed.
--
--        try self.addIncludeDir("/usr/local/include");
--        try self.addLibDirFmt("/usr/local/lib{d}", .{qual});
--        try self.addLibDir("/usr/local/lib");
--
--        try self.addIncludeDirFmt("/usr/include/{s}", .{triple});
--        try self.addLibDirFmt("/usr/lib/{s}", .{triple});
--
--        try self.addIncludeDir("/usr/include");
--        try self.addLibDirFmt("/lib{d}", .{qual});
--        try self.addLibDir("/lib");
--        try self.addLibDirFmt("/usr/lib{d}", .{qual});
--        try self.addLibDir("/usr/lib");
--
--        // example: on a 64-bit debian-based linux distro, with zlib 
installed from apt:
--        // zlib.h is in /usr/include (added above)
--        // libz.so.1 is in /lib/x86_64-linux-gnu (added here)
--        try self.addLibDirFmt("/lib/{s}", .{triple});
-+    if (process.getEnvVarOwned(allocator, "DYLD_FRAMEWORK_PATH")) 
|dyld_framework_path| {
-+        defer allocator.free(dyld_framework_path);
-+        var it = mem.tokenize(u8, dyld_framework_path, ":");
-+        while (true) {
-+            const dir = it.next() orelse break;
-+            try self.addFrameworkDir(dir);
-+        }
-+    } else |err| switch (err) {
-+        error.InvalidUtf8 => {},
-+        error.EnvironmentVariableNotFound => {},
-+        error.OutOfMemory => |e| return e,
-     }
- 
-     return self;
diff --git a/gnu/packages/zig.scm b/gnu/packages/zig.scm
index 1019793693..1036d60f0c 100644
--- a/gnu/packages/zig.scm
+++ b/gnu/packages/zig.scm
@@ -57,15 +57,15 @@
     (version "0.9.1")
     (source
      (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/ziglang/zig.git";)
-             (commit version)))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32 "0nfvgg23sw50ksy0z0ml6lkdsvmd0278mq29m23dbb2jsirkhry7"))
-       (patches (search-patches "zig-0.9-riscv-support.patch"
-                                "zig-use-system-paths.patch"))))
+       (inherit (zig-source
+                 version version
+                 "0nfvgg23sw50ksy0z0ml6lkdsvmd0278mq29m23dbb2jsirkhry7"))
+       (patches
+        (search-patches
+         "zig-0.9-riscv-support.patch"
+         "zig-0.9-use-baseline-cpu-by-default.patch"
+         "zig-0.9-use-system-paths.patch"
+         "zig-0.9-fix-runpath.patch"))))
     (build-system cmake-build-system)
     (arguments
      (list
@@ -167,7 +167,7 @@ toolchain.  Among other features it provides
        (file-name (git-file-name name version))
        (sha256
         (base32 "1sh5xjsksl52i4cfv1qj36sz5h0ln7cq4pdhgs3960mk8a90im7b"))
-       (patches (search-patches "zig-use-baseline-cpu-by-default.patch"))))
+       (patches (search-patches "zig-0.9-use-baseline-cpu-by-default.patch"))))
     (arguments
      (substitute-keyword-arguments (package-arguments zig-0.9)
        ((#:configure-flags flags ''())