Useful Scripts for Overworked Administrators
By Mark Prager, May 13, 2004
I work for a startup company, which means we face the usual problems of financing. Because many automated system tools are very expensive, I have written several scripts to help automate some of my daily tasks that monitor our system. I write these scripts in ksh and csh, and, where necessary, a few small C programs because these seem to be the least complicated. The C programs were compiled with gcc. Similarly, the scripts usually come out self-documenting, which means I can leave them running and return to them several months later and still understand what I was trying to do. Also, the scripts run under Solaris 2.5.1-7.0, and can easily be used on other UNIX operating systems.
Listing 2 count_proc_ksh
1#!/bin/ksh
2function mail_to_user
3{
4 echo $last has $count processes on host $host@
5 iaddress=${last}"+"
6 mailaddress=`grep $iaddress /usr/local/scripts/mailusermap | tr '+' ' ' | awk \
'{print $2}'`
7 /usr/local/scripts/proc_letter $mailaddress $count $host > /tmp/pl$$
8 /usr/local/bin/pstree -wu $last >> /tmp/pl$$
9 /usr/local/scripts/proc_letter2 $host >> /tmp/pl$$
10
11 cat /tmp/pl$$ | /bin/mailx -s "Urgent system letter" $mailaddress
12 rm /tmp/pl$$
13}
14# MAIN - First get all valid processes owners
15 processes=`ps -ef | awk '{print $1}' | sort | grep -v root | grep -v daemon | \
grep -v UID`
16 limit=1 ; count=1 ; last="qwert" ; host=`hostname`
17 for i in $processes
18 do
19 userquota=`grep $last /usr/local/scripts/mailusermap | tr '+' ' ' | awk \
'{print $3}'`
20 if [[ $userquota == "" ]] then
21 userquota=999
22 fi
23 uquota=`echo $userquota | awk '{print $1}'`
24 if [[ $i != $last ]] then
25 if (( $count > $uquota )) then
26 mail_to_user
27 fi
28 count=1
29 else
30 (( count=$count + 1 ))
31 fi
32 last=$i
33 done
34 userquota=`grep $i /usr/local/scripts/mailusermap | tr '+' ' ' | awk \
'{print $3}'`
35 if [[ $userquota == "" ]] then
36 userquota=999
37 fi
38 uquota=`echo $userquota | awk '{print $1}'`
39 if (( $count > $uquota )) then
40 mail_to_user
41 fi
