mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
gnu: Add Nagios.
* gnu/packages/monitoring.scm: New file. * gnu/local.mk (GNU_SYSTEM_MODULES): Add it.
This commit is contained in:
Ludovic Courtès
parent
ee264bbf90
commit
d30e578a00
2 changed files with 123 additions and 0 deletions
|
|
@ -254,6 +254,7 @@ GNU_SYSTEM_MODULES = \
|
|||
%D%/packages/microcom.scm \
|
||||
%D%/packages/mit-krb5.scm \
|
||||
%D%/packages/moe.scm \
|
||||
%D%/packages/monitoring.scm \
|
||||
%D%/packages/mono.scm \
|
||||
%D%/packages/moreutils.scm \
|
||||
%D%/packages/mpd.scm \
|
||||
|
|
|
|||
122
gnu/packages/monitoring.scm
Normal file
122
gnu/packages/monitoring.scm
Normal file
|
|
@ -0,0 +1,122 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2016 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 monitoring)
|
||||
#:use-module (guix packages)
|
||||
#:use-module (guix download)
|
||||
#:use-module ((guix licenses) #:prefix license:)
|
||||
#:use-module (guix build-system perl)
|
||||
#:use-module (guix build-system gnu)
|
||||
#:use-module (gnu packages base)
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages perl)
|
||||
#:use-module (gnu packages mail)
|
||||
#:use-module (gnu packages gd)
|
||||
#:use-module (gnu packages image))
|
||||
|
||||
(define-public nagios
|
||||
(package
|
||||
(name "nagios")
|
||||
(version "4.0.8")
|
||||
;; XXX: Newer versions such as 4.2.3 bundle a copy of AngularJS.
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"mirror://sourceforge/nagios/nagios-4.x/nagios-"
|
||||
version "/nagios-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0jyad39wa318613awlnpczrrakvjcipz8qp1mdsig1cp1hjqs9lb"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
;; Ensure reproducibility.
|
||||
'(substitute* (find-files "cgi" "\\.c$")
|
||||
(("__DATE__") "\"1970-01-01\"")
|
||||
(("__TIME__") "\"00:00:00\"")))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs
|
||||
`(("zlib" ,zlib)
|
||||
("libpng-apng" ,libpng)
|
||||
("gd" ,gd)
|
||||
("perl" ,perl)
|
||||
("mailutils" ,mailutils)))
|
||||
(arguments
|
||||
'(#:configure-flags (list "--sysconfdir=/etc"
|
||||
|
||||
;; 'include/locations.h.in' defines file
|
||||
;; locations, and many things go directly under
|
||||
;; LOCALSTATEDIR, hence the extra '/nagios'.
|
||||
"--localstatedir=/var/nagios"
|
||||
|
||||
(string-append
|
||||
"--with-mail="
|
||||
(assoc-ref %build-inputs "mailutils")
|
||||
"/bin/mail"))
|
||||
#:make-flags '("all")
|
||||
#:phases (modify-phases %standard-phases
|
||||
(add-before 'build 'do-not-chown-to-nagios
|
||||
(lambda _
|
||||
;; Makefiles do 'install -o nagios -g nagios', which
|
||||
;; doesn't work for us.
|
||||
(substitute* (find-files "." "^Makefile$")
|
||||
(("-o nagios -g nagios")
|
||||
""))
|
||||
#t))
|
||||
(add-before 'build 'do-not-create-sysconfdir
|
||||
(lambda _
|
||||
;; Don't try to create /var upon 'make install'.
|
||||
(substitute* "Makefile"
|
||||
(("\\$\\(INSTALL\\).*\\$\\(LOGDIR\\).*$" all)
|
||||
(string-append "# " all))
|
||||
(("\\$\\(INSTALL\\).*\\$\\(CHECKRESULTDIR\\).*$" all)
|
||||
(string-append "# " all))
|
||||
(("chmod g\\+s.*" all)
|
||||
(string-append "# " all)))
|
||||
#t))
|
||||
(add-before 'build 'set-html/php-directory
|
||||
(lambda _
|
||||
;; Install HTML and PHP files under 'share/nagios/html'
|
||||
;; instead of just 'share/'.
|
||||
(substitute* '("html/Makefile" "Makefile")
|
||||
(("HTMLDIR=.*$")
|
||||
"HTMLDIR = $(datarootdir)/nagios/html\n"))
|
||||
#t)))
|
||||
#:tests? #f)) ;no 'check' target or similar
|
||||
(home-page "https://www.nagios.org/")
|
||||
(synopsis "Host, service, and network monitoring program")
|
||||
(description
|
||||
"Nagios is a host, service, and network monitoring program written in C.
|
||||
CGI programs are included to allow you to view the current status, history,
|
||||
etc. via a Web interface. Features include:
|
||||
|
||||
@itemize
|
||||
@item Monitoring of network services (via SMTP, POP3, HTTP, PING, etc).
|
||||
@item Monitoring of host resources (processor load, disk usage, etc.).
|
||||
@item A plugin interface to allow for user-developed service monitoring
|
||||
methods.
|
||||
@item Ability to define network host hierarchy using \"parent\" hosts,
|
||||
allowing detection of and distinction between hosts that are down
|
||||
and those that are unreachable.
|
||||
@item Notifications when problems occur and get resolved (via email,
|
||||
pager, or user-defined method).
|
||||
@item Ability to define event handlers for proactive problem resolution.
|
||||
@item Automatic log file rotation/archiving.
|
||||
@item Optional web interface for viewing current network status,
|
||||
notification and problem history, log file, etc.
|
||||
@end itemize\n")
|
||||
(license license:gpl2)))
|
||||
Loading…
Reference in a new issue