define(`rangestat', `
                DEF:$3_min=$1:$2:MIN
                DEF:$3_avg=$1:$2:AVERAGE
                DEF:$3_max=$1:$2:MAX
                CDEF:$3_lower=$3_avg,$3_min,-
                CDEF:$3_upper=$3_max,$3_avg,-
                AREA:$3_min
                STACK:$3_lower#8888ff
                STACK:$3_upper#ff8888
                LINE2:$3_avg#000000:$4
')dnl
define(`dfgraph', `
    <RRD::GRAPH df-$3-$1.png
                --title "Disk usage ($4)"
                --vertical-label "bytes"
                --start "$2"
                DEF:kb_used_min=/var/rrd/calvin/df.rrd:$3:MIN
                DEF:kb_used_avg=/var/rrd/calvin/df.rrd:$3:AVERAGE
                DEF:kb_used_max=/var/rrd/calvin/df.rrd:$3:MAX
                CDEF:used_min=kb_used_min,1024,*
                CDEF:used_avg=kb_used_avg,1024,*
                CDEF:used_max=kb_used_max,1024,*
                CDEF:used_lower=used_avg,used_min,-
                CDEF:used_upper=used_max,used_avg,-
                CDEF:redline=used_avg,used_avg,-,$5,0.9,*,+
                CDEF:userreserve=used_avg,used_avg,-,$5,0.1,*,+
                CDEF:superreserve=used_avg,used_avg,-,$5,0.05,*,+
                LINE1:redline#ff0000
                AREA:used_min
                STACK:used_lower#8888ff
                STACK:used_upper#ff8888
                LINE2:used_avg#000000><br />
')dnl
define(`bandwidthgraph', `
    <RRD::GRAPH net-$3-$1.png
                --title "Bandwidth ($3)"
                --vertical-label "bytes/sec"
                --start "$2"
                --lower-limit 1
                --logarithmic
                DEF:rxbyt=/var/rrd/calvin/netdev-$3.rrd:rxbyt:AVERAGE
                DEF:txbyt=/var/rrd/calvin/netdev-$3.rrd:txbyt:AVERAGE
                LINE1:rxbyt#0000ff:Incoming
                LINE1:txbyt#00ff00:Outgoing><br />
')dnl
define(`show_stats', `
    bandwidthgraph(`$1', `$2', `eth0')
    bandwidthgraph(`$1', `$2', `slamb.org')
    <RRD::GRAPH cpu-$1.png
                --title "CPU Usage by Type"
                --vertical-label "Percent"
                --start "$2"
                --lower-limit 0
                --upper-limit 100
                --rigid
                DEF:system=/var/rrd/calvin/cpu.rrd:system:AVERAGE
                DEF:nice=/var/rrd/calvin/cpu.rrd:nice:AVERAGE
                DEF:user=/var/rrd/calvin/cpu.rrd:user:AVERAGE
                AREA:user#ff0000:user
                STACK:system#0000ff:system
                STACK:nice#00ff00:nice><br />
    <RRD::GRAPH cpu-total-$1.png
                --title "Total CPU Usage"
                --vertical-label "Percent"
                --start "$2"
                --lower-limit 0
                --upper-limit 100
                --rigid
                DEF:system_min=/var/rrd/calvin/cpu.rrd:system:MIN
                DEF:nice_min=/var/rrd/calvin/cpu.rrd:nice:MIN
                DEF:user_min=/var/rrd/calvin/cpu.rrd:user:MIN
                DEF:system_avg=/var/rrd/calvin/cpu.rrd:system:AVERAGE
                DEF:nice_avg=/var/rrd/calvin/cpu.rrd:nice:AVERAGE
                DEF:user_avg=/var/rrd/calvin/cpu.rrd:user:AVERAGE
                DEF:system_max=/var/rrd/calvin/cpu.rrd:system:MAX
                DEF:nice_max=/var/rrd/calvin/cpu.rrd:nice:MAX
                DEF:user_max=/var/rrd/calvin/cpu.rrd:user:MAX
                CDEF:min=system_min,nice_min,+,user_min,+
                CDEF:avg=system_avg,nice_avg,+,user_avg,+
                CDEF:max=system_max,nice_max,+,user_max,+
                CDEF:lower=avg,min,-
                CDEF:upper=max,avg,-
                AREA:min
                STACK:lower#8888ff
                STACK:upper#ff8888
                LINE2:avg#000000:$4><br />
    <RRD::GRAPH load-5min-$1.png
                --title "Run queue length (5-minute load average)"
                --vertical-label "Processes"
                --start "$2"
                --lower-limit 0
                --upper-limit 6
                --rigid
    rangestat(`/var/rrd/calvin/load.rrd', `ldavg-5', `ldavg5', `')><br />
    <RRD::GRAPH processes-$1.png
                --title "Total processes"
                --vertical-label "Processes"
                --start "$2"
                --lower-limit 0
    rangestat(`/var/rrd/calvin/processes.rrd', `plist', `plist',
              `')><br />
    <RRD::GRAPH memory-$1.png
                --title "Physical Memory by Type"
                --vertical-label "bytes"
                --start "$2"
                --base 1024
                --lower-limit 0
                DEF:kbmemused=/var/rrd/calvin/memory.rrd:kbmemused:AVERAGE
                DEF:kbcached=/var/rrd/calvin/memory.rrd:kbcached:AVERAGE
                DEF:kbmemfree=/var/rrd/calvin/memory.rrd:kbmemfree:AVERAGE
                DEF:kbbuffers=/var/rrd/calvin/memory.rrd:kbbuffers:AVERAGE
                CDEF:cached=kbcached,1024,*
                CDEF:memfree=kbmemfree,1024,*
                CDEF:buffers=kbbuffers,1024,*
                CDEF:memused=kbmemused,1024,*,cached,-,buffers,-
                AREA:memused#ff0000:used
                STACK:cached#0000ff:cached
                STACK:buffers#00ff00:buffers
                STACK:memfree#888888:free><br />
    <RRD::GRAPH memory-total-$1.png
                --title "Physical Memory Used"
                --vertical-label "bytes"
                --start "$2"
                --base 1024
                --lower-limit 0
                DEF:kbmemused_min=/var/rrd/calvin/memory.rrd:kbmemused:MIN
                DEF:kbmemused_avg=/var/rrd/calvin/memory.rrd:kbmemused:AVERAGE
                DEF:kbmemused_max=/var/rrd/calvin/memory.rrd:kbmemused:MAX
                DEF:kbcached_min=/var/rrd/calvin/memory.rrd:kbcached:MIN
                DEF:kbcached_avg=/var/rrd/calvin/memory.rrd:kbcached:AVERAGE
                DEF:kbcached_max=/var/rrd/calvin/memory.rrd:kbcached:MAX
                DEF:kbbuffers_min=/var/rrd/calvin/memory.rrd:kbbuffers:MIN
                DEF:kbbuffers_avg=/var/rrd/calvin/memory.rrd:kbbuffers:AVERAGE
                DEF:kbbuffers_max=/var/rrd/calvin/memory.rrd:kbbuffers:MAX
                CDEF:min=kbmemused_min,kbcached_max,-,kbbuffers_max,-,1024,*
                CDEF:avg=kbmemused_avg,kbcached_avg,-,kbbuffers_avg,-,1024,*
                CDEF:max=kbmemused_max,kbcached_min,-,kbbuffers_min,-,1024,*
                CDEF:lower=avg,min,-
                CDEF:upper=max,avg,-
                AREA:min
                STACK:lower#8888ff
                STACK:upper#ff8888
                LINE2:avg#000000><br />
    <RRD::GRAPH swap-$1.png
                --title "Swap"
                --vertical-label "bytes"
                --start "$2"
                --base 1024
                --lower-limit 0
                --upper-limit 534601728
                --rigid
                DEF:kbswpused_min=/var/rrd/calvin/memory.rrd:kbswpused:MIN
                DEF:kbswpused_avg=/var/rrd/calvin/memory.rrd:kbswpused:AVERAGE
                DEF:kbswpused_max=/var/rrd/calvin/memory.rrd:kbswpused:MAX
                CDEF:swpused_min=kbswpused_min,1024,*
                CDEF:swpused_avg=kbswpused_avg,0,GT,kbswpused_avg,UNKN,IF,1024,*
                CDEF:swpused_max=kbswpused_max,1024,*
                CDEF:swpused_lower=swpused_avg,swpused_min,-
                CDEF:swpused_upper=swpused_max,swpused_avg,-
                AREA:swpused_min
                STACK:swpused_lower#8888ff
                STACK:swpused_upper#ff8888
                LINE2:swpused_avg#000000><br />
    <RRD::GRAPH paging-$1.png
                --title "Paging"
                --vertical-label "bytes/sec"
                --start "$2"
                --lower-limit 0
                DEF:kbpgpgin=/var/rrd/calvin/paging.rrd:pgpgin:AVERAGE
                DEF:kbpgpgout=/var/rrd/calvin/paging.rrd:pgpgout:AVERAGE
                CDEF:pgpgin=kbpgpgin,1024,*
                CDEF:pgpgout=kbpgpgout,1024,*
                LINE1:pgpgin#00ff00:"paged in"
                LINE1:pgpgout#0000ff:"paged out"><br />
    <RRD::GRAPH interrupts-$1.png
                --title "Interrupts (all IRQs)"
                --vertical-label "interrupts/sec"
                --start "$2"
                --lower-limit 0
    rangestat(`/var/rrd/calvin/interrupts.rrd', `sum', `sum',
              `')><br />
    <RRD::GRAPH context_switches-$1.png
                --title "Context Switches"
                --vertical-label "switches/sec"
                --start "$2"
                --lower-limit 0
                --upper-limit 1500
                --rigid
    rangestat(`/var/rrd/calvin/context_switches.rrd', `cswch', `cswch',
              `')><br />
    <RRD::GRAPH mail-$1.png
                --title "Mails processed"
                --vertical-label "mails/hour"
                --start "$2"
                --lower-limit 0
                DEF:s_pipe_sent=/var/rrd/calvin/mail.rrd:pipe_sent:AVERAGE
                DEF:s_pipe_deferred=/var/rrd/calvin/mail.rrd:pipe_deferred:AVERAGE
                DEF:s_lmtp_sent=/var/rrd/calvin/mail.rrd:lmtp_sent:AVERAGE
                DEF:s_lmtp_deferred=/var/rrd/calvin/mail.rrd:lmtp_deferred:AVERAGE
                DEF:s_lmtp_bounced=/var/rrd/calvin/mail.rrd:lmtp_bounced:AVERAGE
                DEF:s_smtp_sent=/var/rrd/calvin/mail.rrd:smtp_sent:AVERAGE
                DEF:s_smtp_deferred=/var/rrd/calvin/mail.rrd:smtp_deferred:AVERAGE
                DEF:s_smtp_bounced=/var/rrd/calvin/mail.rrd:smtp_bounced:AVERAGE
                DEF:s_smtpd_reject=/var/rrd/calvin/mail.rrd:smtpd_reject:AVERAGE
                DEF:s_cleanup_bounced_sa=/var/rrd/calvin/mail.rrd:cleanup_bounced_sa:AVERAGE
                DEF:s_cleanup_bounced=/var/rrd/calvin/mail.rrd:cleanup_bounced:AVERAGE
                DEF:s_qmgr_deferred=/var/rrd/calvin/mail.rrd:qmgr_deferred:AVERAGE
                DEF:s_qmgr_expired=/var/rrd/calvin/mail.rrd:qmgr_expired:AVERAGE
                DEF:s_qmgr_bounced=/var/rrd/calvin/mail.rrd:qmgr_bounced:AVERAGE
                CDEF:bounced=s_lmtp_bounced,s_smtp_bounced,+,s_cleanup_bounced,+,s_qmgr_bounced,+,3600,*
                CDEF:bad=s_pipe_deferred,0,GT,s_pipe_deferred,UNKN,IF,3600,*
                CDEF:smtp_sent=s_smtp_sent,3600,*
                CDEF:lmtp_sent=s_lmtp_sent,3600,*
                CDEF:smtpd_reject=s_smtpd_reject,3600,*
                CDEF:cleanup_bounced_sa=s_cleanup_bounced_sa,3600,*
                CDEF:qmgr_expired=s_qmgr_expired,3600,*
                AREA:smtp_sent#888888:"sent"
                STACK:lmtp_sent#00ff00:"received"
                STACK:bounced#000000:"bounced"
                STACK:qmgr_expired#00ffff:"expired"
                STACK:smtpd_reject#ffff00:"rejected"
                STACK:cleanup_bounced_sa#ff00ff:"spam"
                LINE3:bad#ff0000:"pipe deferred"><br />
    dfgraph(`$1', `$2', `_', `/', `6784475136')
    dfgraph(`$1', `$2', `_var', `/var', `6193512448')
    dfgraph(`$1', `$2', `_home', `/home', `6193512448')
')dnl
#!/usr/bin/env rrdcgi
<?xml version="1.0"?>
<!DOCTYPE html
     PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
            "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<!-- $Id$ -->
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
  <head>
    <title>calvin stats</title>
  </head>
  <body>
    <h1>Last week</h1>
    show_stats(`1wk', `now - 1 week')

    <h1>Last three months</h1>
    show_stats(`3mo', `now - 3 months')
  </body>
</html>