bc64d9554b
* gnu/packages/admin.scm (isc-dhcp): Use 'search-input-file' when looking for executables. * gnu/packages/audio.scm (ableton-link): Likewise. * gnu/packages/benchmark.scm (fio): Likewise. * gnu/packages/bioinformatics.scm (roary): Likewise. (ngless): Likewise. * gnu/packages/boost.scm (boost-for-irods): Likewise. * gnu/packages/bootloaders.scm (grub): Likewise. (grub-efi): Likewise. * gnu/packages/chemistry.scm (inchi): Likewise. * gnu/packages/dictionaries.scm (ding): Likewise. * gnu/packages/dlang.scm (ldc): Likewise. * gnu/packages/education.scm (childsplay): Likewise. * gnu/packages/emacs-xyz.scm (emacs-hyperbole): Likewise. (emacs-haskell-mode): Likewise. (emacs-auctex): Likewise. (emacs-ggtags): Likewise. (emacs-graphviz-dot-mode): Likewise. (emacs-flycheck-grammalecte): Likewise. (emacs-counsel-notmuch): Likewise. (emacspeak): Likewise. (emacs-exwm): Likewise. (emacs-exwm-x): Likewise. (emacs-treemacs): Likewise. (emacs-telega): Likewise. (emacs-exiftool): Likewise. * gnu/packages/emulators.scm (higan): Likewise. * gnu/packages/engineering.scm (freehdl): Likewise. (librepcb): Likewise. * gnu/packages/entr.scm (entr): Likewise. * gnu/packages/file-systems.scm (libeatmydata): Likewise. (xfstests): Likewise. (mergerfs): Likewise. (mergerfs-tools): Likewise. * gnu/packages/finance.scm (monero-gui): Likewise. * gnu/packages/flashing-tools.scm (flashrom): Likewise. * gnu/packages/fontutils.scm (fontforge): Likewise. * gnu/packages/game-development.scm (python2-renpy): Likewise. * gnu/packages/games.scm (opensurge): Likewise. (xboard): Likewise. (hyperrogue): Likewise. (flare-game): Likewise. (chessx): Likewise. * gnu/packages/geo.scm (grass): Likewise. * gnu/packages/glib.scm (glib): Likewise. * gnu/packages/gnome.scm (mm-common): Likewise. (network-manager-openvpn): Likewise. (network-manager-vpnc): Likewise. (network-manager-openconnect): Likewise. (apostrophe): Likewise. * gnu/packages/gnupg.scm (pius): Likewise. (jetring): Likewise. * gnu/packages/gnuzilla.scm (icedove): Likewise. * gnu/packages/golang.scm (go-1.4): Likewise. * gnu/packages/graphviz.scm (xdot): Likewise. * gnu/packages/guile-xyz.scm (jupyter-guile-kernel): Likewise. * gnu/packages/haskell-xyz.scm (ghc-hindent): Likewise. * gnu/packages/ibus.scm (ibus): Likewise. * gnu/packages/image.scm (phockup): Likewise. * gnu/packages/irc.scm (quassel): Likewise. * gnu/packages/java.scm (drip): Likewise. (ant-bootstrap): Likewise. (tla2tools): Likewise. * gnu/packages/julia.scm (julia): Likewise. * gnu/packages/less.scm (lesspipe): Likewise. * gnu/packages/libreoffice.scm (libreoffice): Likewise. * gnu/packages/linux.scm (fuse): Likewise. (lm-sensors): Likewise. (bluez): Likewise. (fakeroot): Likewise. (inputattach): Likewise. * gnu/packages/lisp-xyz.scm (sbcl-cl-diskspace): Likewise. * gnu/packages/lisp.scm (lisp-repl-core-dumper): Likewise. * gnu/packages/lua.scm (fennel): Likewise. * gnu/packages/lxde.scm (spacefm): Likewise. * gnu/packages/mail.scm (public-inbox): Likewise. * gnu/packages/maths.scm (hdf-java): Likewise. (maxima): Likewise. (frama-c): Likewise. * gnu/packages/messaging.scm (libgadu): Likewise. * gnu/packages/music.scm (denemo): Likewise. (curseradio): Likewise. * gnu/packages/netpbm.scm (netpbm): Likewise. * gnu/packages/networking.scm (blueman): Likewise. (squid): Likewise. (aircrack-ng): Likewise. * gnu/packages/node.scm (node): Likewise. (node-llparse-frontend-bootstrap): Likewise. (node-llparse-bootstrap): Likewise. (llhttp-bootstrap): Likewise. (node-lts): Likewise. * gnu/packages/ocaml.scm (ocaml-4.11): Likewise. (opam): Likewise. (ocaml-graph): Likewise. * gnu/packages/orpheus.scm (orpheus): Likewise. * gnu/packages/password-utils.scm (password-store): Likewise. * gnu/packages/python.scm (pypy3): Likewise. * gnu/packages/qt.scm (qt5ct): Likewise. * gnu/packages/radio.scm (libosmo-dsp): Likewise. * gnu/packages/ruby.scm (ruby-pandoc-ruby): Likewise. * gnu/packages/rust.scm (rust-1.30): Likewise. * gnu/packages/screen.scm (byobu): Likewise. * gnu/packages/statistics.scm (r-with-tests): Likewise. * gnu/packages/suckless.scm (surf): Likewise. * gnu/packages/syndication.scm (gfeeds): Likewise. * gnu/packages/telephony.scm (mumble): Likewise. * gnu/packages/terminals.scm (alacritty): Likewise. * gnu/packages/tex.scm (texlive-bin): Likewise. * gnu/packages/uml.scm (plantuml): Likewise. * gnu/packages/version-control.scm (python-git-multimail): Likewise. (gitolite): Likewise. (hg-commitsigs): Likewise. (git-when-merged): Likewise. (git-imerge): Likewise. (gita): Likewise. * gnu/packages/video.scm (you-get): Likewise. * gnu/packages/vim.scm (eovim): Likewise. * gnu/packages/virtualization.scm (qemu): Likewise. (virt-manager): Likewise. (criu): Likewise. * gnu/packages/vpn.scm (strongswan): Likewise. (xl2tpd): Likewise. * gnu/packages/wm.scm (i3lock-fancy): Likewise. * gnu/packages/wxwidgets.scm (python-wxpython): Likewise. (python2-wxpython): Likewise. * gnu/packages/xdisorg.scm (autorandr): Likewise. * gnu/packages/xorg.scm (hackneyed-x11-cursors): Likewise. (v86d): Likewise. (mkfontdir): Likewise. (xpra): Likewise.
517 lines
19 KiB
Scheme
517 lines
19 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
|
;;; Copyright © 2014 Mark H Weaver <mhw@netris.org>
|
|
;;; Copyright © 2014 Manolis Fragkiskos Ragkousis <manolis837@gmail.com>
|
|
;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
|
;;; Copyright © 2016, 2018, 2021 Ludovic Courtès <ludo@gnu.org>
|
|
;;; Copyright © 2016, 2019 Efraim Flashner <efraim@flashner.co.il>
|
|
;;; Copyright © 2017 Jonathan Brielmaier <jonathan.brielmaier@web.de>
|
|
;;; Copyright © 2017 Julien Lepiller <julien@lepiller.eu>
|
|
;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
|
|
;;; Copyright © 2021 Ricardo Wurmus <rekado@elephly.net>
|
|
;;;
|
|
;;; This file is part of GNU Guix.
|
|
;;;
|
|
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
|
;;; under the terms of the GNU General Public License as published by
|
|
;;; the Free Software Foundation; either version 3 of the License, or (at
|
|
;;; your option) any later version.
|
|
;;;
|
|
;;; GNU Guix is distributed in the hope that it will be useful, but
|
|
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
;;; GNU General Public License for more details.
|
|
;;;
|
|
;;; You should have received a copy of the GNU General Public License
|
|
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
(define-module (gnu packages flashing-tools)
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
#:use-module (guix download)
|
|
#:use-module (guix git-download)
|
|
#:use-module (guix packages)
|
|
#:use-module (gnu packages)
|
|
#:use-module (guix build-system cmake)
|
|
#:use-module (guix build-system gnu)
|
|
#:use-module (guix build-system python)
|
|
#:use-module (gnu packages autotools)
|
|
#:use-module (gnu packages admin)
|
|
#:use-module (gnu packages base)
|
|
#:use-module (gnu packages bison)
|
|
#:use-module (gnu packages boost)
|
|
#:use-module (gnu packages compression)
|
|
#:use-module (gnu packages elf)
|
|
#:use-module (gnu packages flex)
|
|
#:use-module (gnu packages ghostscript)
|
|
#:use-module (gnu packages gnupg)
|
|
#:use-module (gnu packages groff)
|
|
#:use-module (gnu packages pciutils)
|
|
#:use-module (gnu packages pkg-config)
|
|
#:use-module (gnu packages libusb)
|
|
#:use-module (gnu packages libftdi)
|
|
#:use-module (gnu packages pciutils)
|
|
#:use-module (gnu packages qt))
|
|
|
|
(define-public flashrom
|
|
(package
|
|
(name "flashrom")
|
|
(version "1.2")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append
|
|
"https://download.flashrom.org/releases/flashrom-v"
|
|
version ".tar.bz2"))
|
|
(sha256
|
|
(base32
|
|
"0ax4kqnh7kd3z120ypgp73qy1knz47l6qxsqzrfkd97mh5cdky71"))))
|
|
(build-system gnu-build-system)
|
|
(inputs `(("dmidecode" ,dmidecode)
|
|
("pciutils" ,pciutils)
|
|
("libusb" ,libusb)
|
|
("libftdi" ,libftdi)))
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
(arguments
|
|
'(#:make-flags
|
|
(list "CC=gcc"
|
|
(string-append "PREFIX=" %output)
|
|
"CONFIG_ENABLE_LIBUSB0_PROGRAMMERS=no")
|
|
#:tests? #f ; no 'check' target
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(delete 'configure) ; no configure script
|
|
(add-before 'build 'patch-exec-paths
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
(substitute* "dmi.c"
|
|
(("\"dmidecode\"")
|
|
(format #f "~S"
|
|
(search-input-file inputs "/sbin/dmidecode")))))))))
|
|
(home-page "https://flashrom.org/")
|
|
(synopsis "Identify, read, write, erase, and verify ROM/flash chips")
|
|
(description
|
|
"flashrom is a utility for identifying, reading, writing,
|
|
verifying and erasing flash chips. It is designed to flash
|
|
BIOS/EFI/coreboot/firmware/optionROM images on mainboards,
|
|
network/graphics/storage controller cards, and various other
|
|
programmer devices.")
|
|
(license license:gpl2)))
|
|
|
|
(define-public 0xffff
|
|
(package
|
|
(name "0xffff")
|
|
(version "0.8")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/pali/0xffff")
|
|
(commit version)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32 "1a5b7k96vzirb0m8lqp7ldn77ppz4ngf56wslhsj2c6flcyvns4v"))))
|
|
(build-system gnu-build-system)
|
|
(inputs
|
|
`(("libusb" ,libusb-0.1))) ; doesn't work with libusb-compat
|
|
(arguments
|
|
'(#:phases
|
|
(modify-phases %standard-phases
|
|
(delete 'configure)) ; no configure
|
|
#:make-flags
|
|
(list "CC=gcc"
|
|
"BUILD_DATE=GNU Guix"
|
|
(string-append "PREFIX=" %output))
|
|
#:tests? #f)) ; no 'check' target
|
|
(home-page "https://github.com/pali/0xFFFF")
|
|
(synopsis "Flash FIASCO images on Maemo devices")
|
|
(description
|
|
"The Open Free Fiasco Firmware Flasher (0xFFFF) is a flashing tool
|
|
for FIASCO images. It supports generating, unpacking, editing and
|
|
flashing of FIASCO images for Maemo devices. Use it with care. It can
|
|
brick your device.")
|
|
(license license:gpl3+)))
|
|
|
|
(define-public avrdude
|
|
(package
|
|
(name "avrdude")
|
|
(version "6.3")
|
|
(source
|
|
(origin
|
|
(method url-fetch)
|
|
(uri (string-append "mirror://savannah/avrdude/avrdude-"
|
|
version ".tar.gz"))
|
|
(sha256
|
|
(base32 "15m1w1qad3dj7r8n5ng1qqcaiyx1gyd6hnc3p2apgjllccdp77qg"))))
|
|
(build-system gnu-build-system)
|
|
(inputs
|
|
`(("libelf" ,libelf)
|
|
("libusb" ,libusb-compat)
|
|
("libftdi" ,libftdi)))
|
|
(native-inputs
|
|
`(("bison" ,bison)
|
|
("flex" ,flex)))
|
|
(home-page "https://www.nongnu.org/avrdude/")
|
|
(synopsis "AVR downloader and uploader")
|
|
(description
|
|
"AVRDUDE is a utility to download/upload/manipulate the ROM and
|
|
EEPROM contents of AVR microcontrollers using the @acronym{ISP, in-system
|
|
programming} technique.")
|
|
(license license:gpl2+)))
|
|
|
|
(define-public dfu-programmer
|
|
(package
|
|
(name "dfu-programmer")
|
|
(version "0.7.2")
|
|
(source
|
|
(origin
|
|
(method url-fetch)
|
|
(uri (string-append "mirror://sourceforge/dfu-programmer/dfu-programmer/"
|
|
version "/dfu-programmer-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"15gr99y1z9vbvhrkd25zqhnzhg6zjmaam3vfjzf2mazd39mx7d0x"))
|
|
(patches (search-patches "dfu-programmer-fix-libusb.patch"))))
|
|
(build-system gnu-build-system)
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)))
|
|
(inputs
|
|
`(("libusb" ,libusb)))
|
|
(home-page "https://dfu-programmer.github.io/")
|
|
(synopsis "Device firmware update programmer for Atmel chips")
|
|
(description
|
|
"Dfu-programmer is a multi-platform command-line programmer for
|
|
Atmel (8051, AVR, XMEGA & AVR32) chips with a USB bootloader supporting
|
|
ISP.")
|
|
(license license:gpl2+)))
|
|
|
|
(define-public dfu-util
|
|
(package
|
|
(name "dfu-util")
|
|
(version "0.10")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append
|
|
"http://dfu-util.sourceforge.net/releases/dfu-util-"
|
|
version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0hlvc47ccf5hry13saqhc1j5cdq5jyjv4i05kj0mdh3rzj6wagd0"))))
|
|
(build-system gnu-build-system)
|
|
(inputs
|
|
`(("libusb" ,libusb)))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)))
|
|
(synopsis "Host side of the USB Device Firmware Upgrade (DFU) protocol")
|
|
(description
|
|
"The DFU (Universal Serial Bus Device Firmware Upgrade) protocol is
|
|
intended to download and upload firmware to devices connected over USB. It
|
|
ranges from small devices like micro-controller boards up to mobile phones.
|
|
With dfu-util you are able to download firmware to your device or upload
|
|
firmware from it.")
|
|
(home-page "http://dfu-util.sourceforge.net/")
|
|
(license license:gpl2+)))
|
|
|
|
(define-public teensy-loader-cli
|
|
;; The repo does not tag versions nor does it use releases, but a commit
|
|
;; message says "Importing 2.1", while the sourcce still says "2.0". So pin
|
|
;; to a fixed commit.
|
|
(let ((commit "f289b7a2e5627464044249f0e5742830e052e360"))
|
|
(package
|
|
(name "teensy-loader-cli")
|
|
(version (git-version "2.1" "1" commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/PaulStoffregen/teensy_loader_cli")
|
|
(commit commit)))
|
|
(sha256 (base32 "0sssim56pwsxp5cp5dlf6mi9h5fx2592m6j1g7abnm0s09b0lpdx"))
|
|
(file-name (git-file-name name version))
|
|
(modules '((guix build utils)))
|
|
(snippet
|
|
`(begin
|
|
;; Remove example flash files and teensy rebooter flash binaries.
|
|
(for-each delete-file (find-files "." "\\.(elf|hex)$"))
|
|
;; Fix the version
|
|
(substitute* "teensy_loader_cli.c"
|
|
(("Teensy Loader, Command Line, Version 2.0\\\\n")
|
|
(string-append "Teensy Loader, Command Line, " ,version "\\n")))
|
|
#t))
|
|
(patches (search-patches "teensy-loader-cli-help.patch"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
'(#:tests? #f ;; Makefile has no test target
|
|
#:make-flags (list "CC=gcc" (string-append "PREFIX=" %output))
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(delete 'configure)
|
|
(replace 'install
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
(bin (string-append out "/bin")))
|
|
(install-file "teensy_loader_cli" bin)
|
|
#t))))))
|
|
(inputs
|
|
`(("libusb-compat" ,libusb-compat)))
|
|
(synopsis "Command line firmware uploader for Teensy development boards")
|
|
(description
|
|
"The Teensy loader program communicates with your Teensy board when the
|
|
HalfKay bootloader is running, so you can upload new programs and run them.
|
|
|
|
You need to add the udev rules to make the Teensy update available for
|
|
non-root users.")
|
|
(home-page "https://www.pjrc.com/teensy/loader_cli.html")
|
|
(license license:gpl3))))
|
|
|
|
(define-public rkflashtool
|
|
(let ((commit "8966c4e277de8148290554aaaa4146a3a84a3c53")
|
|
(revision "1"))
|
|
(package
|
|
(name "rkflashtool")
|
|
(version (git-version "5.2" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/linux-rockchip/rkflashtool")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"1ndyzg1zlgg20dd8js9kfqm5kq19k005vddkvf65qj20w0pcyahn"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
'(#:phases
|
|
(modify-phases %standard-phases
|
|
(delete 'configure)) ; no configure
|
|
#:make-flags (list (string-append "PREFIX=" %output))
|
|
#:tests? #f)) ; no tests
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)))
|
|
(inputs
|
|
`(("libusb" ,libusb)))
|
|
(home-page "https://github.com/linux-rockchip/rkflashtool")
|
|
(synopsis "Tools for flashing Rockchip devices")
|
|
(description "Allows flashing of Rockchip based embedded linux devices.
|
|
The list of currently supported devices is: RK2818, RK2918, RK2928, RK3026,
|
|
RK3036, RK3066, RK312X, RK3168, RK3188, RK3288, RK3368.")
|
|
(license license:bsd-2))))
|
|
|
|
(define-public heimdall
|
|
(package
|
|
(name "heimdall")
|
|
(version "1.4.2")
|
|
(source (origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://gitlab.com/BenjaminDobell/Heimdall.git")
|
|
(commit (string-append "v" version))))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"1ygn4snvcmi98rgldgxf5hwm7zzi1zcsihfvm6awf9s6mpcjzbqz"))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
`(#:build-type "Release"
|
|
#:tests? #f ; no tests
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'patch-invocations
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(substitute* '("heimdall-frontend/source/aboutform.cpp"
|
|
"heimdall-frontend/source/mainwindow.cpp")
|
|
(("start[(]\"heimdall\"")
|
|
(string-append "start(\"" (assoc-ref outputs "out")
|
|
"/bin/heimdall\"")))
|
|
#t))
|
|
(replace 'install
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))
|
|
(lib (string-append (assoc-ref outputs "out") "/lib")))
|
|
(install-file "bin/heimdall" bin)
|
|
(install-file "bin/heimdall-frontend" bin)
|
|
(install-file "libpit/libpit.a" lib)
|
|
#t))))))
|
|
(inputs
|
|
`(("libusb" ,libusb)
|
|
("qtbase" ,qtbase-5)
|
|
("zlib" ,zlib)))
|
|
(home-page "https://glassechidna.com.au/heimdall/")
|
|
(synopsis "Flash firmware onto Samsung mobile devices")
|
|
(description "@command{heimdall} is a tool suite used to flash firmware (aka
|
|
ROMs) onto Samsung mobile devices. Heimdall connects to a mobile device over
|
|
USB and interacts with low-level software running on the device, known as Loke.
|
|
Loke and Heimdall communicate via the custom Samsung-developed protocol typically
|
|
referred to as the \"Odin 3 protocol\".")
|
|
(license license:expat)))
|
|
|
|
(define-public ifdtool
|
|
(package
|
|
(name "ifdtool")
|
|
(version "4.9")
|
|
(source (origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/coreboot/coreboot")
|
|
(commit version)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"0jidj29jh6p65d17k304wlzhxvp4p3c2namgcdwg2sxq8jfr0zlm"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:make-flags
|
|
(list "CC=gcc"
|
|
"INSTALL=install"
|
|
(string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'chdir
|
|
(lambda _
|
|
(chdir "util/ifdtool")
|
|
#t))
|
|
(delete 'configure)) ; no configure script
|
|
#:tests? #f)) ; no test suite
|
|
(home-page "https://github.com/corna/me_cleaner/")
|
|
(synopsis "Intel Firmware Descriptor dumper")
|
|
(description "This package provides @command{ifdtool}, a program to
|
|
dump Intel Firmware Descriptor data of an image file.")
|
|
(license license:gpl2)))
|
|
|
|
(define-public intelmetool
|
|
(package
|
|
(name "intelmetool")
|
|
(version "4.7")
|
|
(source (origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://review.coreboot.org/p/coreboot")
|
|
(commit version)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"0nw555i0fm5kljha9h47bk70ykbwv8ddfk6qhz6kfqb79vzhy4h2"))))
|
|
(build-system gnu-build-system)
|
|
(inputs
|
|
`(("pciutils" ,pciutils)
|
|
("zlib" ,zlib)))
|
|
(arguments
|
|
`(#:make-flags
|
|
(list "CC=gcc"
|
|
"INSTALL=install"
|
|
(string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'chdir
|
|
(lambda _
|
|
(chdir "util/intelmetool")
|
|
#t))
|
|
(delete 'configure)
|
|
(delete 'check))))
|
|
(home-page "https://github.com/zamaudio/intelmetool")
|
|
(synopsis "Intel Management Engine tools")
|
|
(description "This package provides tools for working with Intel
|
|
Management Engine (ME). You need to @code{sudo rmmod mei_me} and
|
|
@code{sudo rmmod mei} before using this tool. Also pass
|
|
@code{iomem=relaxed} to the Linux kernel command line.")
|
|
(license license:gpl2)
|
|
|
|
;; This is obviously an Intel thing, plus it requires <cpuid.h>.
|
|
(supported-systems '("x86_64-linux" "i686-linux"))))
|
|
|
|
(define-public me-cleaner
|
|
(package
|
|
(name "me-cleaner")
|
|
(version "1.2")
|
|
(source (origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/corna/me_cleaner")
|
|
(commit (string-append "v" version))))
|
|
(sha256
|
|
(base32
|
|
"1bdj2clm13ir441vn7sv860xsc5gh71ja5lc2wn0gggnff0adxj4"))
|
|
(file-name (git-file-name name version))))
|
|
(build-system python-build-system)
|
|
(arguments
|
|
`(#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'install 'install-documentation
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
(man (string-append out "/share/man/man1")))
|
|
(install-file "man/me_cleaner.1" man)
|
|
#t))))))
|
|
(home-page "https://github.com/corna/me_cleaner")
|
|
(synopsis "Intel ME cleaner")
|
|
(description "This package provides tools for disabling Intel
|
|
ME as far as possible (it only edits ME firmware image files).")
|
|
(license license:gpl3+)
|
|
|
|
;; This is an Intel thing.
|
|
(supported-systems '("x86_64-linux" "i686-linux"))))
|
|
|
|
(define-public uefitool
|
|
(package
|
|
(name "uefitool")
|
|
(version "0.27.0")
|
|
(source (origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/LongSoft/UEFITool")
|
|
(commit version)))
|
|
(sha256
|
|
(base32
|
|
"1i1p823qld927p4f1wcphqcnivb9mq7fi5xmzibxc3g9zzgnyc2h"))
|
|
(file-name (git-file-name name version))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:phases
|
|
(modify-phases %standard-phases
|
|
(replace 'configure
|
|
(lambda _
|
|
(invoke "qmake" "-makefile")))
|
|
(replace 'install
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(install-file "UEFITool" (string-append (assoc-ref outputs "out")
|
|
"/bin"))
|
|
#t)))))
|
|
(inputs
|
|
`(("qtbase" ,qtbase-5)))
|
|
(home-page "https://github.com/LongSoft/UEFITool/")
|
|
(synopsis "UEFI image editor")
|
|
(description "@code{uefitool} is a graphical image file editor for
|
|
Unifinished Extensible Firmware Interface (UEFI) images.")
|
|
(license license:bsd-2)))
|
|
|
|
(define-public srecord
|
|
(package
|
|
(name "srecord")
|
|
(version "1.64")
|
|
(source
|
|
(origin
|
|
(method url-fetch)
|
|
(uri (string-append "mirror://sourceforge/srecord/srecord/"
|
|
version "/srecord-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"1qk75q0k5vzmm3932q9hqz2gp8n9rrdfjacsswxc02656f3l3929"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:configure-flags
|
|
(list (string-append "SH="
|
|
(assoc-ref %build-inputs "bash")
|
|
"/bin/bash"))))
|
|
(inputs
|
|
`(("boost" ,boost)
|
|
("libgcrypt" ,libgcrypt)))
|
|
(native-inputs
|
|
`(("bison" ,bison)
|
|
("diffutils" ,diffutils)
|
|
("ghostscript" ,ghostscript)
|
|
("groff" ,groff)
|
|
("libtool" ,libtool)
|
|
("which" ,which)))
|
|
(home-page "http://srecord.sourceforge.net/")
|
|
(synopsis "Tools for EPROM files")
|
|
(description "The SRecord package is a collection of powerful tools for
|
|
manipulating EPROM load files. It reads and writes numerous EPROM file
|
|
formats, and can perform many different manipulations.")
|
|
(license license:gpl3+)))
|