;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2014 Ludovic Courtès <ludo@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 services)
  #:use-module (guix gexp)
  #:use-module (guix records)
  #:export (service?
            service
            service-documentation
            service-provision
            service-requirement
            service-respawn?
            service-start
            service-stop
            service-auto-start?
            service-activate
            service-user-accounts
            service-user-groups
            service-pam-services))

;;; Commentary:
;;;
;;; System services as cajoled by dmd.
;;;
;;; Code:

(define-record-type* <service>
  service make-service
  service?
  (documentation service-documentation            ; string
                 (default "[No documentation.]"))
  (provision     service-provision)               ; list of symbols
  (requirement   service-requirement              ; list of symbols
                 (default '()))
  (respawn?      service-respawn?                 ; Boolean
                 (default #t))
  (start         service-start)                   ; g-expression (procedure)
  (stop          service-stop                     ; g-expression (procedure)
                 (default #~(const #f)))
  (auto-start?   service-auto-start?              ; Boolean
                 (default #t))
  (user-accounts service-user-accounts            ; list of <user-account>
                 (default '()))
  (user-groups   service-user-groups              ; list of <user-groups>
                 (default '()))
  (pam-services  service-pam-services             ; list of <pam-service>
                 (default '()))
  (activate      service-activate                 ; gexp
                 (default #f)))

;;; services.scm ends here.
ist nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/telephony.scm?id=efc0056fb5851eec436e7131a80acad319031de7&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2021-12-13 17:48:25 +0100'>2021-12-13</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=8394619baceb118df92e355377fd543bb1aa501a'>gnu: Simplify package inputs.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-12-10 21:49:25 +0100'>2021-12-10</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=32750e8c3ed38df4cafb39cffa878c6851abc899'>Merge remote-tracking branch 'signed/master' into core-updates</a></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2021-12-05 21:56:53 +0100'>2021-12-05</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=d8401fb508692c80a5048f4acc0cf444a566a010'>gnu: Add phonesim.</a></td><td>Demis Balbach</td></tr>
<tr><td><span title='2021-10-12 17:46:23 +0000'>2021-10-12</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=a1eca979fb8da842e73c42f4f53be29b169810f2'>Merge remote-tracking branch 'origin/master' into core-updates-frozen.</a></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2021-10-05 19:52:30 +0200'>2021-10-05</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=fa72aa8f4d6f276609546f93cea34cccd98f51f4'>gnu: libsrtp: Update to 2.4.2.</a></td><td>Marius Bakke</td></tr>
<tr><td><span title='2021-09-20 21:49:36 +0200'>2021-09-20</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=6ba2bb92a05c4bb85a515b27d7bd71ac5f8d27d3'>gnu: mumble: Use fixed libsndfile.</a></td><td>Liliana Marie Prikler</td></tr>
<tr><td><span title='2021-09-05 10:40:52 +0200'>2021-09-05</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=2302adc0eca384fa5d2a78bbfc13dd596a1e2175'>gnu: libsrtp: Update to 2.4.0.</a></td><td>Sarah Morgensen</td></tr>
<tr><td><span title='2021-07-24 16:23:23 +0200'>2021-07-24</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=bc64d9554b337d4baaeccbcce22ea08a184c9e4c'>gnu: Use 'search-input-file' when looking for executables.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-07-24 16:23:23 +0200'>2021-07-24</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=377e9453caf16417fc4ec8a2b65db1ac4ba0d5ff'>gnu: Use 'search-input-file' when looking for *.so and *.a.</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-06-14 00:24:42 -0400'>2021-06-14</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=ea0a51071e68c37a4c9c25421cf03bc2f442c67b'>gnu: Rename qtbase to qtbase-5.</a></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2021-06-02 12:53:10 +0200'>2021-06-02</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=fa26ca54f9220d8dd568b0e3c6891adcfe50575f'>gnu: osip: Update to 5.2.1.</a></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2021-04-02 07:41:15 -0400'>2021-04-02</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=45136b3673bcdba21fa0d1fd6edb3d388a645fcc'>gnu: pjproject: Update to 2.11.</a></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2021-03-06 18:27:43 +0100'>2021-03-06</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=3b2d7ada40db66439ce3d285960208687d79b421'>gnu: mumble: Modify snippet.</a></td><td>LibreMiami</td></tr>
<tr><td><span title='2021-03-03 00:06:33 +0100'>2021-03-03</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=4bb9bb78c2482627b1afa2cffda68a4427a3b21d'>gnu: osip: Update to 5.2.0.</a></td><td>Léo Le Bouter</td></tr>
<tr><td><span title='2021-03-01 05:45:00 +0100'>2021-03-01</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=ea13b3a14cb079e33b59cf60cdabf500ecc51cf1'>gnu: mumble: Update to 1.3.4 [security fixes].</a></td><td>Léo Le Bouter</td></tr>
<tr><td><span title='2021-02-18 15:51:01 +0100'>2021-02-18</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=26db713f0c6f0bcfae94167e2a66d8aececdc03b'>gnu: libtgvoip: Replace libopusenc with opus.</a></td><td>Raghav Gururajan</td></tr>
<tr><td><span title='2020-10-25 14:42:36 -0400'>2020-10-25</span></td><td><a href='/guix/commit/gnu/packages/telephony.scm?id=3c7ea674651d786960f084388f75da03d844a406'>gnu: mumble: Update to 1.3.3.</a></td><td>Michael Rohleder</td></tr>