From patchwork Thu Oct 26 00:19:37 2023 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: Adam Kandur X-Patchwork-Id: 55369 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id EEC6E27BBE9; Thu, 26 Oct 2023 01:39:45 +0100 (BST) X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-2.7 required=5.0 tests=BAYES_00,DKIM_ADSP_CUSTOM_MED, DKIM_INVALID,DKIM_SIGNED,FREEMAIL_FROM,MAILING_LIST_MULTI, SPF_HELO_PASS autolearn=ham autolearn_force=no version=3.4.6 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTPS id 4F0FD27BBE2 for ; Thu, 26 Oct 2023 01:39:45 +0100 (BST) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1qvo72-0002O1-2r; Wed, 25 Oct 2023 20:20:36 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1qvo6y-0002KH-8g for guix-patches@gnu.org; Wed, 25 Oct 2023 20:20:33 -0400 Received: from debbugs.gnu.org ([2001:470:142:5::43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1qvo6y-0007nJ-0j for guix-patches@gnu.org; Wed, 25 Oct 2023 20:20:32 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1qvo7S-0003Nc-E6 for guix-patches@gnu.org; Wed, 25 Oct 2023 20:21:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#65784] [PATCH] gnu: Add woeusb. References: <20230906130103.3121-1-adam.mohidin.kandur@gmail.com> In-Reply-To: <20230906130103.3121-1-adam.mohidin.kandur@gmail.com> Resent-From: Adam Kandur Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Thu, 26 Oct 2023 00:21:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 65784 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 65784@debbugs.gnu.org Cc: Adam Kandur Received: via spool by 65784-submit@debbugs.gnu.org id=B65784.169827963712945 (code B ref 65784); Thu, 26 Oct 2023 00:21:02 +0000 Received: (at 65784) by debbugs.gnu.org; 26 Oct 2023 00:20:37 +0000 Received: from localhost ([127.0.0.1]:60266 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qvo73-0003Mj-0E for submit@debbugs.gnu.org; Wed, 25 Oct 2023 20:20:37 -0400 Received: from mail-lj1-x232.google.com ([2a00:1450:4864:20::232]:59738) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qvo6y-0003MN-PY for 65784@debbugs.gnu.org; Wed, 25 Oct 2023 20:20:35 -0400 Received: by mail-lj1-x232.google.com with SMTP id 38308e7fff4ca-2c5028e5b88so4337441fa.3 for <65784@debbugs.gnu.org>; Wed, 25 Oct 2023 17:20:02 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20230601; t=1698279595; x=1698884395; darn=debbugs.gnu.org; h=content-transfer-encoding:mime-version:message-id:date:subject:cc :to:from:from:to:cc:subject:date:message-id:reply-to; bh=n5xuUNLcf8zh0w/MqRcSEF0ChnScHBVdC8q5Qxa4TGc=; b=aHu7ZKC9lwIIoTxmYZhJpb8bHVwsnLVSWqlfchzgCvabdSX5g06S/Na3Fou1kRbiur Qk+7AbyfHIz6vAjYtX/0U81f7mPSuAd0iWA/0ybFS7fb7HlzwcrTMyCaMc3YMAykgQXh T8MZrNRsabGINDOU0HRU/QN7J9g1+eCC5Lgt01ivHKKm1yap4w/bOvCUT6LM+nqgBmM4 CDCMYOKDzm7503py+VmCayMEhI2/kgKoredy86n+bJent7bRIwPYLHxm+OzNbYDnAWNk P64ZTcMwDk5/kDw+eCfQH34B7eJLWDNMjkJHjxp/jOsKefP1I8Ok1wQOwXBVMQeunS0L ajgQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20230601; t=1698279595; x=1698884395; h=content-transfer-encoding:mime-version:message-id:date:subject:cc :to:from:x-gm-message-state:from:to:cc:subject:date:message-id :reply-to; bh=n5xuUNLcf8zh0w/MqRcSEF0ChnScHBVdC8q5Qxa4TGc=; b=cfmlrivL3hbPiHQP2+pSRUbHZZEvKfzO8EjdkH9GVSWXeuOVx36PvpsWmQXPGl+Syi s6JFCyuIuDXm6TFL2OdlviX5eufWNKm5FCSOrooS0KK8COOnvVzFd0gLwdlzfX9F8SB4 tEOaYb94PjWnX/nx9omrS3kk+1dOcN3ynmFIgh6Xp6GDvf4HaNKpGRt6LH3FHNGxYX0M FiPdJ+e/jmQwB1atjNN1pTrPbG/vkueNThKivb2i/sgW1uhZOQ40dHXgB+cOjtIs/fTb bqDZA9/hgZOv3tNHykpaLwMCAsewdWaSBl+6CcPPdfboi+uRj55Yozt+9LEYPmJYNhMl 5oog== X-Gm-Message-State: AOJu0YxGv0Z8cFt0jZZ6hvmrDZ0mBAqJr6Oy809J3nBWSw0oD/KZTbt9 QbPXIfXhyvjyiuRM/qJs2IhXciUiZJMUCw== X-Google-Smtp-Source: AGHT+IGs7s1VSgNV6ReuYKNMpAgGNlq1ZC5WByn6xXI5cegQO/Gm/OsM8CA2+0A/we7VrpG7sLiGyg== X-Received: by 2002:a2e:8656:0:b0:2c5:1c9d:7f81 with SMTP id i22-20020a2e8656000000b002c51c9d7f81mr12671480ljj.32.1698279595293; Wed, 25 Oct 2023 17:19:55 -0700 (PDT) Received: from localhost.localdomain ([2a00:1370:8188:4fd4:4b9b:14fd:7390:f045]) by smtp.googlemail.com with ESMTPSA id e15-20020a2e984f000000b002c51077cba1sm2537511ljj.105.2023.10.25.17.19.54 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Wed, 25 Oct 2023 17:19:55 -0700 (PDT) From: Adam Kandur Date: Thu, 26 Oct 2023 03:19:37 +0300 Message-ID: <20231026001939.13847-1-adam.mohidin.kandur@gmail.com> X-Mailer: git-send-email 2.41.0 MIME-Version: 1.0 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org X-getmail-retrieved-from-mailbox: Patches * gnu/packages/admin.scm (woeusb): New variable. --- gnu/packages/admin.scm | 68 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 68 insertions(+) diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index 8f72b0e..2c35562 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -102,10 +102,12 @@ (define-module (gnu packages admin) #:use-module (gnu packages algebra) #:use-module (gnu packages attr) #:use-module (gnu packages autotools) + #:use-module (gnu packages backup) #:use-module (gnu packages base) #:use-module (gnu packages bash) #:use-module (gnu packages bison) #:use-module (gnu packages boost) + #:use-module (gnu packages bootloaders) #:use-module (gnu packages c) #:use-module (gnu packages check) #:use-module (gnu packages compression) @@ -116,6 +118,7 @@ (define-module (gnu packages admin) #:use-module (gnu packages curl) #:use-module (gnu packages cyrus-sasl) #:use-module (gnu packages datastructures) + #:use-module (gnu packages disk) #:use-module (gnu packages dns) #:use-module (gnu packages elf) #:use-module (gnu packages file) @@ -2437,6 +2440,71 @@ (define-public wakelan network, which causes enabled computers to power on.") (license license:gpl2+))) +(define-public woeusb + (let ((revision "0") + ;; named branch is outdated + (commit "34b400d99d3c4089f487e1d4f7d71970b2d4429e")) + (package + (name "woeusb") + (version (git-version "0.0.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/WoeUSB/WoeUSB.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "05ghja2rpn4kqak9yll398na54dscsfnm3z5f2pi54lan98wzimh")))) + (build-system trivial-build-system) + (inputs + (list ntfs-3g grub ncurses parted coreutils util-linux wimlib)) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + ;; copy source + (copy-recursively (assoc-ref %build-inputs "source") ".") + ;; patch source + (substitute* "sbin/woeusb" + (("tput sgr0") (string-append (assoc-ref %build-inputs "ncurses") + "/bin/tput" + " sgr0")) + (("parted --script") + (string-append (assoc-ref %build-inputs "parted") + "/sbin/parted --script")) + (("parted \\\\") + (string-append (assoc-ref %build-inputs "parted") + "/sbin/parted \\")) + (("grub-install") (string-append (assoc-ref %build-inputs "grub") + "/sbin/grub-install")) + (("command -v mkntfs") (string-append + "command -v " + (assoc-ref %build-inputs "ntfs-3g") + "/sbin/mkntfs")) + (("command_mkntfs_ref=mkntfs") (string-append + "command_mkntfs_ref=" + (assoc-ref %build-inputs "ntfs-3g") + "/sbin/mkntfs")) + (("readlink \\\\") (string-append + (assoc-ref %build-inputs "coreutils") + "/bin/readlink \\")) + (("wimlib-imagex") (string-append + (assoc-ref %build-inputs "wimlib") + "/bin/wimlib-imagex")) + ;; could not find partprobe package + ;; as i see this command never used in the program + (("partprobe \\\\") "\\")) + ;; install phase + (install-file "sbin/woeusb" (string-append %output "/bin")) + #t))) + (home-page "https://github.com/WoeUSB/WoeUSB") + (synopsis "A Microsoft Windows® USB installation media preparer for GNU+Linux") + (description "Very usefull package for anyone who wants to make a bootable Windows® USB stick +using free and open source operating system.") + (license license:gpl3+)))) + (define-public dmidecode (package (name "dmidecode")