summaryrefslogtreecommitdiff
path: root/gnu/packages/monitoring.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-11-30 23:26:57 +0100
committerLudovic Courtès <ludo@gnu.org>2016-11-30 23:31:03 +0100
commitd30e578a0011b05d1e7d8b3ba7ee38588eba301c (patch)
treef7884e8e496c72a50d3c58cb663b196d6f9c7ce1 /gnu/packages/monitoring.scm
parentee264bbf907f555a64d1832a02d9562b89cf2727 (diff)
downloadpatches-d30e578a0011b05d1e7d8b3ba7ee38588eba301c.tar
patches-d30e578a0011b05d1e7d8b3ba7ee38588eba301c.tar.gz
gnu: Add Nagios.
* gnu/packages/monitoring.scm: New file. * gnu/local.mk (GNU_SYSTEM_MODULES): Add it.
Diffstat (limited to 'gnu/packages/monitoring.scm')
-rw-r--r--gnu/packages/monitoring.scm122
1 files changed, 122 insertions, 0 deletions
diff --git a/gnu/packages/monitoring.scm b/gnu/packages/monitoring.scm
new file mode 100644
index 0000000000..db2139b0aa
--- /dev/null
+++ b/gnu/packages/monitoring.scm
@@ -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)))