tools/diag/httpd-error/httpd-error

   1 #!/bin/sh
   2 # Copyright (c) 1998 by Wolfram Schneider <wosch@FreeBSD.org>, Berlin.
   3 # All rights reserved.
   4 #
   5 # Redistribution and use in source and binary forms, with or without
   6 # modification, are permitted provided that the following conditions
   7 # are met:
   8 # 1. Redistributions of source code must retain the above copyright
   9 #    notice, this list of conditions and the following disclaimer.
  10 # 2. Redistributions in binary form must reproduce the above copyright
  11 #    notice, this list of conditions and the following disclaimer in the
  12 #    documentation and/or other materials provided with the distribution.
  13 #
  14 # THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17 # ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24 # SUCH DAMAGE.
  25 #
  26 #
  27 # httpd-error - check for Web files which do not exist on your host
  28 #
  29 # $FreeBSD: src/tools/diag/httpd-error/httpd-error,v 1.5 2000/03/03 09:25:00 sheldonh Exp $
  30 # $DragonFly: src/tools/diag/httpd-error/httpd-error,v 1.2 2003/06/17 04:29:11 dillon Exp $
  31
  32 mode=${1}
  33
  34 case "$mode" in
  35     -host)
  36         grep 'File does not exist$' |
  37             awk '{print $11}' |
  38             sort | uniq -c | sort -nr | perl -npe 's/,$//'
  39         ;;
  40     -filehits)
  41         grep 'File does not exist$' |
  42             awk '{print $8}' |
  43             sort | uniq -c | sort -nr
  44         ;;
  45     -user)
  46         grep 'File does not exist$' |
  47             awk '{print $8}' |
  48             sort | uniq -c | sort +1
  49         ;;
  50     -userhits)
  51         grep 'File does not exist$' |
  52                 awk '{print $8}' | sort |
  53                 perl -npe 's#/home/([^/]+)/public_html.*#/~$1/#;
  54                            s#/usr/local/www/data/.*#/usr/local/www/data/#' |
  55                 uniq -c | sort -nr
  56         ;;
  57
  58     *) echo "usage $0 {-host|-filehits|-user|-userhits} < error.log" >&2
  59        exit 1
  60        ;;
  61 esac
  62
  63