iadd a real world example - reed-alert - Lightweight agentless alerting system for server Err bitreich.org 70 hgit clone git://bitreich.org/reed-alert/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/reed-alert/ URL:git://bitreich.org/reed-alert/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/reed-alert/ bitreich.org 70 1Log /scm/reed-alert/log.gph bitreich.org 70 1Files /scm/reed-alert/files.gph bitreich.org 70 1Refs /scm/reed-alert/refs.gph bitreich.org 70 1Tags /scm/reed-alert/tag bitreich.org 70 1README /scm/reed-alert/file/README.gph bitreich.org 70 1LICENSE /scm/reed-alert/file/LICENSE.gph bitreich.org 70 i--- Err bitreich.org 70 1commit fed9c9d46da253a5cd756d36ee7378b818b1559e /scm/reed-alert/commit/fed9c9d46da253a5cd756d36ee7378b818b1559e.gph bitreich.org 70 1parent 77bc642fea3afdcdd72d9541f48eea218aedb022 /scm/reed-alert/commit/77bc642fea3afdcdd72d9541f48eea218aedb022.gph bitreich.org 70 hAuthor: Solene Rapenne URL:mailto:solene@perso.pw bitreich.org 70 iDate: Fri, 3 Nov 2017 18:29:43 +0000 Err bitreich.org 70 i Err bitreich.org 70 iadd a real world example Err bitreich.org 70 i Err bitreich.org 70 iDiffstat: Err bitreich.org 70 i M config.lisp.sample | 12 +++++++++++- Err bitreich.org 70 i Err bitreich.org 70 i1 file changed, 11 insertions(+), 1 deletion(-) Err bitreich.org 70 i--- Err bitreich.org 70 1diff --git a/config.lisp.sample b/config.lisp.sample /scm/reed-alert/file/config.lisp.sample.gph bitreich.org 70 i@@ -1,6 +1,8 @@ Err bitreich.org 70 i (defvar *alerts* Err bitreich.org 70 i (list Err bitreich.org 70 i- '(dont-use-it ("REMINDER" function params date hostname desc level os newline _ space result)) Err bitreich.org 70 i+ '(mail ("echo -n '" + "Problem with " function _ date _ params"' | mail -s alarm mail@isp.net")) Err bitreich.org 70 i+ '(sms ("/home/user/sms.sh '" date _ function _ params _ hostname "'")) Err bitreich.org 70 i+ '(available ("REMINDER" function params date hostname desc level os newline _ space result)) Err bitreich.org 70 i '(void nil))) Err bitreich.org 70 i Err bitreich.org 70 i (load "functions.lisp") Err bitreich.org 70 i@@ -8,3 +10,11 @@ Err bitreich.org 70 i ;; this is a comment Err bitreich.org 70 i ; this is also a comment Err bitreich.org 70 i (=> mail disk-usage (:path "/" :limit 90)) Err bitreich.org 70 i+ Err bitreich.org 70 i+(=> mail service (:name "dovecot")) Err bitreich.org 70 i+(=> mail service (:name "httpd")) Err bitreich.org 70 i+(=> sms service (:name "smtpd")) Err bitreich.org 70 i+(=> mail number-of-processes (:limit 100)) Err bitreich.org 70 i+ Err bitreich.org 70 i+(=> mail ping (:host "bitreich.org" :desc "Ping Bitreich")) Err bitreich.org 70 i+(=> mail ping (:host "openbsd.org" :desc "Ping OpenBSD.org")) Err bitreich.org 70 .