Package: guix-patches;
Reported by: Adam Kandur <adam.mohidin.kandur <at> gmail.com>
Date: Wed, 6 Sep 2023 13:56:03 UTC
Severity: normal
Tags: patch
To reply to this bug, email your comments to 65784 AT debbugs.gnu.org.
Toggle the display of automated, internal messages from the tracker.
View this report as an mbox folder, status mbox, maintainer mbox
guix-patches <at> gnu.org:bug#65784; Package guix-patches.
(Wed, 06 Sep 2023 13:56:03 GMT) Full text and rfc822 format available.Adam Kandur <adam.mohidin.kandur <at> gmail.com>:guix-patches <at> gnu.org.
(Wed, 06 Sep 2023 13:56:03 GMT) Full text and rfc822 format available.Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):
From: Adam Kandur <adam.mohidin.kandur <at> gmail.com> To: guix-patches <at> gnu.org Cc: Adam Kandur <adam.mohidin.kandur <at> gmail.com> Subject: [PATCH] gnu: Add woeusb. Date: Wed, 6 Sep 2023 16:01:01 +0300
* 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")
--
2.41.0
guix-patches <at> gnu.org:bug#65784; Package guix-patches.
(Fri, 20 Oct 2023 09:45:01 GMT) Full text and rfc822 format available.Message #8 received at submit <at> debbugs.gnu.org (full text, mbox):
From: Christopher Baines <mail <at> cbaines.net> To: Adam Kandur <adam.mohidin.kandur <at> gmail.com> Cc: 65784 <at> debbugs.gnu.org, guix-patches <at> gnu.org Subject: Re: [bug#65784] [PATCH] gnu: Add woeusb. Date: Fri, 20 Oct 2023 10:42:59 +0100
[Message part 1 (text/plain, inline)]
Adam Kandur <adam.mohidin.kandur <at> 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
[signature.asc (application/pgp-signature, inline)]
guix-patches <at> gnu.org:bug#65784; Package guix-patches.
(Fri, 20 Oct 2023 09:45:02 GMT) Full text and rfc822 format available.guix-patches <at> gnu.org:bug#65784; Package guix-patches.
(Thu, 26 Oct 2023 00:19:02 GMT) Full text and rfc822 format available.Message #14 received at 65784 <at> debbugs.gnu.org (full text, mbox):
From: Adam <adam.mohidin.kandur <at> gmail.com> To: Christopher Baines <mail <at> cbaines.net> Cc: 65784 <at> debbugs.gnu.org Subject: Re: [bug#65784] [PATCH] gnu: Add woeusb. Date: Thu, 26 Oct 2023 03:17:51 +0300
yeah, my bad
will send a new one
On Fri, 20 Oct 2023 at 12:43, Christopher Baines <mail <at> cbaines.net> wrote:
>
>
> Adam Kandur <adam.mohidin.kandur <at> 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
guix-patches <at> gnu.org:bug#65784; Package guix-patches.
(Thu, 26 Oct 2023 00:21:02 GMT) Full text and rfc822 format available.Message #17 received at 65784 <at> debbugs.gnu.org (full text, mbox):
From: Adam Kandur <adam.mohidin.kandur <at> gmail.com> To: 65784 <at> debbugs.gnu.org Cc: Adam Kandur <adam.mohidin.kandur <at> gmail.com> Subject: [PATCH] gnu: Add woeusb. Date: Thu, 26 Oct 2023 03:19:37 +0300
* 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")
--
2.41.0
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.