From: Christopher Baines <mail@cbaines.net>
To: Adam Kandur <adam.mohidin.kandur@gmail.com>
Cc: 65784@debbugs.gnu.org
Subject: [bug#65784] [PATCH] gnu: Add woeusb.
Date: Fri, 20 Oct 2023 10:42:59 +0100 [thread overview]
Message-ID: <87lebx4oj6.fsf@cbaines.net> (raw)
In-Reply-To: <20230906130103.3121-1-adam.mohidin.kandur@gmail.com>
[-- Attachment #1: Type: text/plain, Size: 4002 bytes --]
Adam Kandur <adam.mohidin.kandur@gmail.com> writes:
> * gnu/packages/admin.scm (woeusb): New variable.
> ---
> gnu/packages/admin.scm | 65 ++++++++++++++++++++++++++++++++++++++++++
> 1 file changed, 65 insertions(+)
>
> diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
> index 604cd70..6b971e8 100644
> --- a/gnu/packages/admin.scm
> +++ b/gnu/packages/admin.scm
> @@ -2388,6 +2388,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")
Hi Adam,
Does this build for you locally? According to QA, grub is undefined, so
maybe there's an import missing.
Thanks,
Chris
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 987 bytes --]
next prev parent reply other threads:[~2023-10-20 9:44 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2023-09-06 13:01 [bug#65784] [PATCH] gnu: Add woeusb Adam Kandur
2023-10-20 9:42 ` Christopher Baines [this message]
2023-10-26 0:17 ` Adam
2023-10-26 0:19 ` Adam Kandur
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87lebx4oj6.fsf@cbaines.net \
--to=mail@cbaines.net \
--cc=65784@debbugs.gnu.org \
--cc=adam.mohidin.kandur@gmail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/guix.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.