;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org>
;;; Copyright © 2014 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2020 Marius Bakke <marius@gnu.org>
;;;
;;; 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 cpio)
  #:use-module (guix licenses)
  #:use-module (gnu packages)
  #:use-module (gnu packages autotools)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system gnu))

(define-public cpio
  (package
    (name "cpio")
    (version "2.13")
    (source (origin
             (method url-fetch)
             (uri (string-append "mirror://gnu/cpio/cpio-"
                                 version ".tar.bz2"))
             (sha256
              (base32
               "0vbgnhkawdllgnkdn6zn1f56fczwk0518krakz2qbwhxmv2vvdga"))
             (modules '((guix build utils)))
             (snippet
              '(begin
                 ;; Remove superfluous declaration that trips GCC 10.
                 (substitute* "src/global.c"
                   (("char \\*program_name;")
                    ""))))))
    (build-system gnu-build-system)
    (home-page "https://www.gnu.org/software/cpio/")
    (synopsis "Manage cpio and tar file archives")
    (description
     "GNU cpio copies files into or out of cpio or tar archives.  Indeed,
many formats are supported, including legacy formats.  The format is
determined automatically by the program and is handled appropriately.
Furthermore, the location of the archive is not important.  It can be another
file on the drive, a tape, or data on a pipe.")
    (license gpl3+)))
ceb2e273'>services</a>/<a href='/guix/log/gnu/services/audio.scm?id=0a0b0148e5fdf938c974dc6b201c00a8ceb2e273'>audio.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/services/audio.scm?id=0a0b0148e5fdf938c974dc6b201c00a8ceb2e273&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-12-06 23:18:08 +0100'>2020-12-06</span></td><td><a href='/guix/commit/gnu/services/audio.scm?id=ce3b5e5a8d8566162201cb778c4586f94a626dfa'>services: mpd: Make /var/run/mpd/USER user-owned.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://bugs.gnu.org/44820&gt;.
Reported by Simon &lt;lists@netpanic.org&gt;.

This is a followup to bb124f6e9c0af0a23736f233c2ea2c9c9b4a40a6.

* gnu/services/audio.scm (mpd-service-activation): Chown the parent of
DIRECTORY as well.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-11-06 23:10:18 +0100'>2020-11-06</span></td><td><a href='/guix/commit/gnu/services/audio.scm?id=bb124f6e9c0af0a23736f233c2ea2c9c9b4a40a6'>services: mpd: Fix daemon startup.</a><span class='msg-avail'>...<span class='msg-tooltip'>Until now it would wait for a PID file that'd never come.

* gnu/services/audio.scm (mpd-shepherd-service): Add 'requirement'.
Remove #:pid-file from 'start'.
(mpd-service-activation): Create the ".mpd" directory since that's what
the daemon expects.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-11-06 22:59:19 +0100'>2020-11-06</span></td><td><a href='/guix/commit/gnu/services/audio.scm?id=7209d7cbc37c108ca1148561a681258bb2222ab1'>services: mpd: Always create the "mpd" user account.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/audio.scm (%mpd-accounts): New variable.
(mpd-service-type)[extensions]: Add ACCOUNT-SERVICE-TYPE extension.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-11-06 08:54:27 -0500'>2020-11-06</span></td><td><a href='/guix/commit/gnu/services/audio.scm?id=0c5d0c57d370b34f3ba677838deaa8baf7bca58a'>services: mpd: Do not eagerly look for a user.</a><span class='msg-avail'>...<span class='msg-tooltip'>Running 'guix system search mpd' would throw a backtrace because the
mpd-shepherd-service service start Gexp contained an unquoted call to
'getpwnam', which would look for a missing 'mpd' user and fail.

* gnu/services/audio.scm (mpd-shepherd-service): gexp-unquote only the
relevant variable rather than the whole expression.
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2020-05-13 23:35:57 +0200'>2020-05-13</span></td><td><a href='/guix/commit/gnu/services/audio.scm?id=ad263045b9bf016d6f4fbb1f7fde0f51d3194944'>services: Add missing import.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/audio.scm: Import (ice-9 format).
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-11-08 21:32:45 +0100'>2019-11-08</span></td><td><a href='/guix/commit/gnu/services/audio.scm?id=970cb5ceceaa85765230a9f896a43783cdcb4e6c'>services: mpd: Connect to the user's PulseAudio socket.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/audio.scm (mpd-shepherd-service): Set the XDG_RUNTIME_DIR
environment variable.

Signed-off-by: Tobias Geerinckx-Rice &lt;me@tobias.gr&gt;
</span></span></td><td>Robert Smith</td></tr>
<tr><td><span title='2019-10-29 15:14:22 +0100'>2019-10-29</span></td><td><a href='/guix/commit/gnu/services/audio.scm?id=878e0e1bb0d15809c6582436d53498f3e6385524'>gnu: mpd-service-type: Support configuration of outputs.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/audio.scm (&lt;mpd-output&gt;): New record type.
(&lt;mpd-configuration&gt;)[outputs]: New field.
(mpd-output, mpd-output?, mpd-output-&gt;string): New procedures.
(mpd-config-&gt;file): Use mpd-output-&gt;string.
* doc/guix.texi (Audio Services): Document mpd-output fields.
</span></span></td><td>Ricardo Wurmus</td></tr>