unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
* bug#26819: [PATCH] gnu: Add f3.
@ 2017-05-07 18:46 Hartmut Goebel
  2017-05-07 23:40 ` Leo Famulari
  2017-05-08  8:00 ` Marius Bakke
  0 siblings, 2 replies; 4+ messages in thread
From: Hartmut Goebel @ 2017-05-07 18:46 UTC (permalink / raw)
  To: 26819

* gnu/packages/disk.scm (f3): New variable.
---
 gnu/packages/disk.scm | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)

diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index 9389527..2889509 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -337,3 +337,44 @@ project to detect and manipulate partition tables.  Optional file system tools
 permit managing file systems not included in libparted.")
     ;; The home page says GPLv2, but the source code says GPLv2+.
     (license license:gpl2+)))
+
+
+(define-public f3
+  (package
+    (name "f3")
+    (version "6.0")
+    (source
+     (origin
+      (method url-fetch)
+      (uri (string-append "https://github.com/AltraMayor/f3/archive/"
+                          "v" version ".tar.gz"))
+      (file-name (string-append name "-" version ".tar.gz"))
+      (sha256
+       (base32
+        "1mgbzc1swvgil45md1336j0aqkmkhwmpxical0ln5g09b2qxsanp"))))
+    (build-system gnu-build-system)
+   (arguments
+    '(#:tests? #f ; no check target
+      #:make-flags (list "CC=gcc"
+                         (string-append "PREFIX=" %output))
+      #:phases
+      (modify-phases %standard-phases
+        (delete 'configure)
+        (add-before 'build 'fix-makefile
+          (lambda _
+            (substitute* "Makefile"
+              ((" -oroot -groot ") " ")
+              ;; also build and install experimental tools
+              (("^all: ") "all: $(EXPERIMENTAL_TARGETS) ")
+              (("^install: ") "install-all: ")
+              (("^install-experimental: ") "install: install-all ")))))))
+   (inputs
+    `(("eudev" ,eudev)
+      ("parted" ,parted)))
+    (home-page "http://oss.digirati.com.br/f3/")
+    (synopsis "Test real capacity of flash memory cards and such.")
+    (description "F3 (Fight Flash Fraud or Fight Fake Flash) tests the full
+capacity of a flash card (flash drive, flash disk, pendrive).  F3 writes to
+the card and then checks if can read it.  It will assure you haven't been sold
+a card with a smaller capacity than stated.")
+    (license license:gpl3)))
-- 
2.7.4

^ permalink raw reply related	[flat|nested] 4+ messages in thread

end of thread, other threads:[~2017-05-09 18:15 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2017-05-07 18:46 bug#26819: [PATCH] gnu: Add f3 Hartmut Goebel
2017-05-07 23:40 ` Leo Famulari
2017-05-09 18:14   ` Hartmut Goebel
2017-05-08  8:00 ` Marius Bakke

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).