;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2016 Chris Marusich <cmmarusich@gmail.com>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; 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 scsi)
  #:use-module ((guix licenses)
                #:select (gpl2+ bsd-2 bsd-3))
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system gnu))

(define-public sg3-utils
  (package
    (name "sg3-utils")
    (version "1.44")
    (source (origin
              (method url-fetch)
              (uri (string-append "http://sg.danny.cz/sg/p/sg3_utils-"
                                  version ".tar.xz"))
              (sha256
               (base32
                "01avlgrbxlij8spish4i69ji1m49biz4mbayzzc2qx0hcl8ar56a"))))
    (build-system gnu-build-system)
    (home-page "http://sg.danny.cz/sg/sg3_utils.html")
    (synopsis "SCSI device utilities")
    (description
     "sg3-utils is a collection of utilities for devices that use the Small
Computer System Interface (@dfn{SCSI}) command set.  It includes utilities to
read data from, write data to, control, modify, and query the state of SCSI
devices.

For example, this package provides command-line tools to:
@itemize
@item copy data based on @code{dd} syntax and semantics (called @command{sg_dd},
@command{sgp_dd}, and @command{sgm_dd})
@item check @code{INQUIRY} data and @code{VPD pages} (@command{sg_inq})
@item check mode and log pages (@command{sginfo}, @command{sg_modes}, and
@command{sg_logs})
@item spin up and down disks (@command{sg_start})
@item do self-tests (@code{sg_senddiag})
@item parse sense data (@code{sg_decode_sense})
@item and perform various other functions.
@end itemize

In addition, this package includes a library, called libsgutils, which can be
used in C and C++ programs to interact with SCSI devices.")
    ;; See README: "All utilities and libraries have either a "2 clause" BSD
    ;;   license or are "GPL-2ed". [...] That BSD license was updated from the
    ;;   "3 clause" to the newer "2 clause" version on 20180119. To save space
    ;;   various source code files refer to a file called "BSD_LICENSE" [...]."
    ;; Some files (like sg_compare_and_write.c) retain their 3-clause headers!
    (license (list gpl2+ bsd-2 bsd-3))))
vic Courtès</td></tr>
<tr><td><span title='2015-10-09 20:57:24 +0200'>2015-10-09</span></td><td><a href='/guix/commit/THANKS?id=28eb956dfeb8b759e690cf3e30dfe85788561778'>Thank Chris.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-09-20 22:06:48 +0200'>2015-09-20</span></td><td><a href='/guix/commit/THANKS?id=8fcac19975b163e0e5b98d27a52cb7c541bf94d9'>Thank Petter.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-08-27 23:34:23 +0200'>2015-08-27</span></td><td><a href='/guix/commit/THANKS?id=25ae74cffaa95cc4e509e3363f6f6525ddc21672'>Thank Eric Hanchrow.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-07-23 09:42:24 +0200'>2015-07-23</span></td><td><a href='/guix/commit/THANKS?id=015878fdbbfe5e30474bea229c014677e04cc27f'>Thank Anders.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-07-22 23:47:35 +0200'>2015-07-22</span></td><td><a href='/guix/commit/THANKS?id=0e9f9f7bc23a7e7f2390eb1bbb09f36f33cda534'>Thank Malcolm.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-07-22 22:56:42 +0200'>2015-07-22</span></td><td><a href='/guix/commit/THANKS?id=31ea3ebb0570c070df578d5983bdcdce117e4376'>Thank Dave.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-07-04 12:13:01 +0300'>2015-07-04</span></td><td><a href='/guix/commit/THANKS?id=e7c48ee9519aa5cd094f3326a4caeccba072e9fd'>Clean up 'THANKS' and 'AUTHORS'.</a><span class='msg-avail'>...<span class='msg-tooltip'>* THANKS: Add Konrad Hinsen, Cyprien Nicolas, Yakkala Yagnesh Raghava
  and Alexander Shendi.  Remove Federico Beffa, Marek Benc, John
  Darrington, rekado, Cyrill Schenkel and Andy Wingo because they are
  placed in AUTHORS.  Move Amirouche Boubekki and Alex Kost to ...
* AUTHORS: ... here.  Add Arne Babenhauserheide, Ian Denhardt, Kevin
  Lemonnier, Mathieu Lirzin, Pierre-Antoine Rault and Ben Woodcroft.
  Fix some names and emails.
</span></span></td><td>Alex Kost</td></tr>
<tr><td><span title='2015-06-07 18:15:40 +0200'>2015-06-07</span></td><td><a href='/guix/commit/THANKS?id=a647e0b8eef9931a46aded4c4d71e0413cc84340'>Thank Thomas.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-05-01 00:06:18 +0200'>2015-05-01</span></td><td><a href='/guix/commit/THANKS?id=0aaca4354c68a21b01ce5fcd7fb7f820e58fc3cb'>Thank Joshua.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-04-14 23:20:26 +0200'>2015-04-14</span></td><td><a href='/guix/commit/THANKS?id=a0bcaefd0885fdca898c3e60dc22c00a581c9b30'>Thank Pjotr.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-02-24 00:04:37 +0100'>2015-02-24</span></td><td><a href='/guix/commit/THANKS?id=31567c427409b908ac496e48419017022e9212a2'>Thank Daniel.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-02-07 23:17:33 +0100'>2015-02-07</span></td><td><a href='/guix/commit/THANKS?id=cce629c027f26275d2fd7b66e43669ccab6eb207'>Thank Andrei.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-01-28 10:56:04 +0100'>2015-01-28</span></td><td><a href='/guix/commit/THANKS?id=8666869491a05670d65237fda5cb35bbf4a808de'>Thank Amirouche.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2014-12-09 11:34:24 +0100'>2014-12-09</span></td><td><a href='/guix/commit/THANKS?id=9f6f1aacf64371e0536fd52ea032dd164d08f436'>Thank rekado.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2014-11-28 00:10:28 +0100'>2014-11-28</span></td><td><a href='/guix/commit/THANKS?id=d5d16686306c9a3b8cfc5c35d79ed2117a15c1e0'>Add (guix elf).</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/elf.scm: New file.  Taken from Guile 'master', commit 3f826e3.
* Makefile.am (MODULES): Add it.
* THANKS: Thank Andy, who wrote this module.
</span></span></td><td>Ludovic Courtès</td></tr>