diff options
author | Ludovic Courtès <ludo@gnu.org> | 2013-01-18 01:06:24 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2013-01-18 01:07:31 +0100 |
commit | 1ffa7090b99dfd2f54fa883929c5e78d7852657a (patch) | |
tree | 1c8bd191e31212e172b3e9158408cccd571a5020 /gnu/packages/system.scm | |
parent | 08ba7ff318720d926215de83daed0da628908ca3 (diff) | |
download | guix-1ffa7090b99dfd2f54fa883929c5e78d7852657a.tar.gz |
distro: Change the module name space to (gnu ...).
* distro: Rename to... * gnu: ... this. Update module names accordingly. * Makefile.am: Adjust accordingly. * po/POTFILES.in: Likewise. * distro.scm: Search for files under /gnu/packages instead of /distro/packages. * gnu/packages/base.scm (ld-wrapper-boot3): Likewise.
Diffstat (limited to 'gnu/packages/system.scm')
-rw-r--r-- | gnu/packages/system.scm | 91 |
1 files changed, 91 insertions, 0 deletions
diff --git a/gnu/packages/system.scm b/gnu/packages/system.scm new file mode 100644 index 0000000000..5fb3dc463b --- /dev/null +++ b/gnu/packages/system.scm @@ -0,0 +1,91 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2012 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 packages system) + #:use-module (guix licenses) + #:use-module (guix packages) + #:use-module (guix download) + #:use-module (guix build-system gnu) + #:use-module (distro) + #:use-module (gnu packages ncurses)) + +(define-public pies + (package + (name "pies") + (version "1.2") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://gnu/pies/pies-" + version ".tar.bz2")) + (sha256 + (base32 + "18w0dbg77i56cx1bwa789w0qi3l4xkkbascxcv2b6gbm0zmjg1g6")))) + (build-system gnu-build-system) + (home-page "http://www.gnu.org/software/pies/") + (synopsis + "GNU Pies, a program invocation and execution supervisor") + (description + "The name Pies (pronounced \"p-yes\") stands for Program Invocation +and Execution Supervisor. This utility starts and controls execution of +external programs, called components. Each component is a stand-alone +program, which is executed in the foreground. Upon startup, pies reads +the list of components from its configuration file, starts them, and +remains in the background, controlling their execution. If any of the +components terminates, the default action of Pies is to restart it. +However, it can also be programmed to perform a variety of another +actions such as, e.g., sending mail notifications to the system +administrator, invoking another external program, etc. + +Pies can be used for a wide variety of tasks. Its most obious use is to +put in backgound a program which normally cannot detach itself from the +controlling terminal, such as, e.g., minicom. It can launch and control +components of some complex system, such as Jabberd or MeTA1 (and it +offers much more control over them than the native utilities). Finally, +it can replace the inetd utility!") + (license gpl3+))) + +(define-public inetutils + (package + (name "inetutils") + (version "1.9.1") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://gnu/inetutils/inetutils-" + version ".tar.gz")) + (sha256 + (base32 + "0azzg6njgq79byl6960kb0wihfhhzf49snslhxgvi30ribgfpa82")))) + (build-system gnu-build-system) + (arguments `(#:patches (list (assoc-ref %build-inputs "patch/gets")) + + ;; FIXME: `tftp.sh' relies on `netstat' from utils-linux, + ;; which is currently missing. + #:tests? #f)) + (inputs `(("patch/gets" ,(search-patch "diffutils-gets-undeclared.patch")) + ("ncurses" ,ncurses))) + (home-page "http://www.gnu.org/software/inetutils/") + (synopsis + "GNU Inetutils, a collection of common network programs") + (description + "The GNU network utilities suite provides the following tools: +ftp(d), hostname, ifconfig, inetd, logger, ping, rcp, rexec(d), +rlogin(d), rsh(d), syslogd, talk(d), telnet(d), tftp(d), traceroute, +uucpd, and whois.") + (license gpl3+))) |