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 32mode=${1} 33 34case "$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 ;; 61esac 62 63 64