├── AllFiles.tgz ├── tinyscript.sh ├── 087-remotebackup-filelist ├── alice.txt.gz ├── long-words.txt.gz ├── big-word-list.txt.gz ├── 019-locate.sh ├── 070-yahoo-search.html ├── 075-page-with-counter.html ├── 031-numberlines.sh ├── 009-scriptbc.sh ├── 019-mklocatedb.sh ├── 008-echon.sh ├── 023-remindme.sh ├── 023-remember.sh ├── 060-bbcnews.sh ├── 075-streamfile.cgi ├── 075-updatecounter.sh ├── palindrome.sh ├── 017-logrm.sh ├── 033-toolong.sh ├── 014-nfmt.sh ├── 041-diskspace.sh ├── 074-guestbook.txt ├── 035-mysftp.sh ├── 069-showcgienv.sh ├── 025-checkspelling.sh ├── 096-titleterm.sh ├── text.snippet.txt ├── 039-fquota.sh ├── 067-getstock.sh ├── 070-logsearch.cgi ├── 087-trimmailbox.sh ├── 076-ssi-sample.html ├── 062-define.sh ├── ragged.txt ├── 014-ragged.txt ├── 014-ragged.txt.shp ├── 013-hilow.sh ├── how-many-commands.sh ├── 091-watch-and-nice.sh ├── README.md ├── 072-contactus.html ├── 076-randomquote.sh ├── 002-validalnum.sh ├── 097-itunelist.sh ├── 054-docron.sh ├── 058-connecttime.sh ├── 034-quota.sh ├── 048-fixguest.sh ├── 059-ftpget.sh ├── 080-htpasswd-b.pl ├── 082-ftpsyncdown.sh ├── 032-showfile.sh ├── 072-contactus.cgi ├── 067-portfolio.sh ├── 042-newdf.sh ├── 063-weather.sh ├── 012-library-test.sh ├── 077-checklinks.sh ├── 027-spelldict.sh ├── 051-enabled.sh ├── 061-getlinks.sh ├── 071-getdope.sh ├── 085-enginehits.sh ├── 050-set-date.sh ├── 073-photoalbum.cgi ├── 018-formatdir.sh ├── 029-loancalc.sh ├── 049-findsuid.sh ├── 095-addmacalias.sh ├── 071-kevin-and-kell.cgi ├── 024-calc.sh ├── 090-getstats.sh ├── state.capitals.txt ├── 093-listmacusers.sh ├── 030-agenda.sh ├── 083-ssync.sh ├── 021-findman.sh ├── 066-getexchrate.sh ├── 010-filelock.sh ├── 043-slocate.sh ├── 020-DIR.sh ├── 057-archivedir.sh ├── 079-webspell.sh ├── 040-diskhogs.sh ├── 075-counter.sh ├── 044-adduser.sh ├── 085-searchinfo.sh ├── 011-colors.sh ├── 065-moviedata.sh ├── 083-sftpsync.sh ├── 003-normdate.sh ├── 028-convertatemp.sh ├── 081-ftpsyncup.sh ├── 080-apm-footer.html ├── 005-validint.sh ├── 101-states.sh ├── 098-open2.sh ├── 087-remotebackup.sh ├── 036-cgrep.sh ├── 001-inpath.sh ├── 045-suspenduser.sh ├── 015-newrm.sh ├── 043-mkslocate.sh ├── sample.crontab ├── 037-zcat.sh ├── 006-validfloat.sh ├── 064-checklibrary.sh ├── 084-webaccess.sh ├── 046-deleteuser.sh ├── 078-checkexternal.sh ├── 056-backup.sh ├── 004-nicenumber.sh ├── 038-bestcompress.sh ├── 052-killall.sh ├── 066-exchangerate.sh ├── 091-renicename.sh ├── 099-unscramble.sh ├── 088-unpacker.sh ├── 094-addmacuser.sh ├── 013-guessword.sh ├── 086-weberrors.sh ├── 068-changetrack.sh ├── 007-valid-date.sh ├── 030-addagenda.sh ├── 047-validator.sh ├── 055-rotatelogs.sh ├── 100-hangman.sh ├── 074-guestbook.cgi ├── 089-xferlog.sh ├── 022-timein.sh ├── 016-unrm.sh ├── 026-shpell.sh ├── 092-addvirtual.sh ├── 090-netperf.sh ├── 053-verifycron.sh ├── 080-apm.cgi └── 012-library.sh /AllFiles.tgz: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /tinyscript.sh: -------------------------------------------------------------------------------- 1 | test=2 2 | -------------------------------------------------------------------------------- /087-remotebackup-filelist: -------------------------------------------------------------------------------- 1 | *.sh 2 | *.html 3 | -------------------------------------------------------------------------------- /alice.txt.gz: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/epety/100-shell-script-examples/HEAD/alice.txt.gz -------------------------------------------------------------------------------- /long-words.txt.gz: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/epety/100-shell-script-examples/HEAD/long-words.txt.gz -------------------------------------------------------------------------------- /big-word-list.txt.gz: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/epety/100-shell-script-examples/HEAD/big-word-list.txt.gz -------------------------------------------------------------------------------- /019-locate.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # locate - search the locate database for the specified pattern 4 | 5 | locatedb="/var/locate.db" 6 | 7 | exec grep -i "$@" $locatedb 8 | -------------------------------------------------------------------------------- /070-yahoo-search.html: -------------------------------------------------------------------------------- 1 |
2 | Search Yahoo: 3 | 4 | 5 |
6 | -------------------------------------------------------------------------------- /075-page-with-counter.html: -------------------------------------------------------------------------------- 1 | 2 | 3 |

Sample Web Page with Counter Substitution

4 | This page has been visited ---countervalue--- times, 5 | and you must therefore be visitor 6 | ---countervalue--- 7 | out of 8 | ---countervalue--- 9 | visitors! 10 | 11 | 12 | -------------------------------------------------------------------------------- /031-numberlines.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # numberlines - a simple alternative to cat -n, etc 4 | 5 | for filename 6 | do 7 | linecount="1" 8 | (while read line 9 | do 10 | echo "${linecount}: $line" 11 | linecount="$(( $linecount + 1 ))" 12 | done) < $filename 13 | done 14 | 15 | exit 0 16 | -------------------------------------------------------------------------------- /009-scriptbc.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # scriptbc - wrapper for 'bc' that returns the value of a formula 4 | 5 | if [ $1 = "-p" ] ; then 6 | precision=$2 7 | shift 2 8 | else 9 | precision=2 # default 10 | fi 11 | 12 | bc -q -l << EOF 13 | scale=$precision 14 | $* 15 | quit 16 | EOF 17 | 18 | exit 0 19 | -------------------------------------------------------------------------------- /019-mklocatedb.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # mklocatedb - build the locate database using find. Must be root to run this 4 | 5 | locatedb="/var/locate.db" 6 | 7 | if [ "$(whoami)" != "root" ] ; then 8 | echo "Must be root to run this command." >&2 9 | exit 1 10 | fi 11 | 12 | find / -print > $locatedb 13 | 14 | exit 0 15 | -------------------------------------------------------------------------------- /008-echon.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # echon - a script to emulate the -n flag functionality with 'echo' 4 | # for Unix systems that don't have that available. 5 | 6 | echon() 7 | { 8 | echo "$*" | tr -d '\n' 9 | } 10 | 11 | echon "this is a test: " 12 | read answer 13 | 14 | echon this is a test too " " 15 | read answer2 16 | -------------------------------------------------------------------------------- /023-remindme.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # remindme - search a datafile for matching lines, or show the contents 4 | # of the datafile if no arg is specified 5 | 6 | rememberfile="$HOME/.remember" 7 | 8 | if [ $# -eq 0 ] ; then 9 | more $rememberfile 10 | else 11 | grep -i "$@" $rememberfile | ${PAGER:-more} 12 | fi 13 | 14 | exit 0 15 | -------------------------------------------------------------------------------- /023-remember.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # remember - an easy command-line based memory pad 4 | # search the results with 'remindme' 5 | 6 | rememberfile="$HOME/.remember" 7 | 8 | if [ $# -eq 0 ] ; then 9 | echo "Enter note, end with ^D: " 10 | cat - >> $rememberfile 11 | else 12 | echo "$@" >> $rememberfile 13 | fi 14 | 15 | exit 0 16 | -------------------------------------------------------------------------------- /060-bbcnews.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # bbcnews - report the top stories on the BBC World Service 4 | 5 | url="http://news.bbc.co.uk/2/low/technology/default.stm" 6 | 7 | lynx -source $url | \ 8 | sed -n '/Last Updated:/,/newssearch.bbc.co.uk/p' | \ 9 | sed 's//>\ 11 | /g' | \ 12 | grep -v -E '(<|>)' | \ 13 | fmt | \ 14 | uniq 15 | -------------------------------------------------------------------------------- /075-streamfile.cgi: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # streamfile - output an HTML file, replacing the sequence 4 | # ---countervalue--- with the current counter value. 5 | 6 | infile="page-with-counter.html" 7 | counter="./counter.cgi" 8 | 9 | echo "Content-type: text/html" 10 | echo "" 11 | 12 | value="$(counter)" 13 | 14 | sed "s/---countervalue---/$value/g" < $infile 15 | 16 | exit 0 17 | -------------------------------------------------------------------------------- /075-updatecounter.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # updatecounter - a tiny script that updates the counter file to 4 | # the value specified. Assumes that locking is done elsewhere. 5 | 6 | if [ $# -ne 1 ] ; then 7 | echo "Usage: $0 countfile"; exit 1 8 | fi 9 | 10 | count="$(cat $1)" 11 | newcount="$(( ${count:-0} + 1 ))" 12 | 13 | echo "$newcount" > $1 14 | chmod a+rw $1 15 | 16 | exit 0 17 | 18 | -------------------------------------------------------------------------------- /palindrome.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # specify palindrome possibility as args 4 | 5 | if [ $# -eq 0 ] ; then 6 | echo Usage: $0 possible palindrome >&2 7 | exit 1 8 | fi 9 | 10 | testit="$(echo $@ | sed 's/[^[:alpha:]]//g' | tr '[:upper:]' '[:lower:]')" 11 | backwards="$(echo $testit | rev)" 12 | 13 | if [ "$testit" = "$backwards" ] ; then 14 | echo "$@ is a palindrome" 15 | else 16 | echo "$@ is not a palindrome" 17 | fi 18 | 19 | exit 0 20 | -------------------------------------------------------------------------------- /017-logrm.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # logrm - log all file deletion requests unless "-s" flag is used 3 | 4 | removelog="/tmp/removelog.log" 5 | 6 | if [ $# -eq 0 ] ; then 7 | echo "Usage: $0 [-s] list of files or directories" >&2 8 | exit 1 9 | fi 10 | 11 | if [ "$1" = "-s" ] ; then 12 | # silent operation requested... don't log 13 | shift 14 | else 15 | echo "$(date): ${USER}: $@" >> $removelog 16 | fi 17 | 18 | /bin/rm "$@" 19 | 20 | exit 0 21 | -------------------------------------------------------------------------------- /033-toolong.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # toolong - only feed the fmt command those lines in the input stream 3 | # that are longer than the specified length 4 | 5 | width=72 6 | 7 | if [ ! -r "$1" ] ; then 8 | echo "Usage: $0 filename" >&2; exit 1 9 | fi 10 | 11 | while read input 12 | do 13 | if [ ${#input} -gt $width ] ; then 14 | echo "$input" | fmt 15 | else 16 | echo "$input" 17 | fi 18 | done < $1 19 | 20 | exit 0 21 | 22 | -------------------------------------------------------------------------------- /014-nfmt.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # nfmt - A version of fmt, using nroff. Adds two useful flags: -w X for 4 | # line width and -h to enable hyphenation for better fills. 5 | 6 | while getopts "hw:" opt; do 7 | case $opt in 8 | h ) hyph=1 ;; 9 | w ) width="$OPTARG" ;; 10 | esac 11 | done 12 | shift $(($OPTIND - 1)) 13 | 14 | nroff << EOF 15 | .ll ${width:-72} 16 | .na 17 | .hy ${hyph:-0} 18 | .pl 1 19 | $(cat "$@") 20 | EOF 21 | 22 | exit 0 23 | -------------------------------------------------------------------------------- /041-diskspace.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # diskspace - summarize available disk space and present in a logical 4 | # and readable fashion 5 | 6 | tempfile="/tmp/available.$$" 7 | 8 | trap "rm -f $tempfile" EXIT 9 | 10 | cat << 'EOF' > $tempfile 11 | { sum += $4 } 12 | END { mb = sum / 1024 13 | gb = mb / 1024 14 | printf "%.0f MB (%.2fGB) of available disk space\n", mb, gb 15 | } 16 | EOF 17 | 18 | df -k | awk -f $tempfile 19 | 20 | exit 0 21 | -------------------------------------------------------------------------------- /074-guestbook.txt: -------------------------------------------------------------------------------- 1 | Sat Sep 6 14:57:02 MST 2003|Lucas Gonze|lucas@gonze.com|I very much enjoyed my stay at your web site. Best of luck. 2 | Sat Sep 6 22:54:49 MST 2003|Dee-Ann LeBlanc|dee@renaissoft.com|Kinda plain, but that's better than it being covered in animations and flaming text. :) 3 | Sun Sep 7 02:50:48 MST 2003|MC|null@mcslp.com|I don't want the world, I just want your half. 4 | Tue Sep 9 02:34:48 MST 2003|Andrey Bronfin|andreyb@elrontelesoft.com|Nice to be here. 5 | -------------------------------------------------------------------------------- /035-mysftp.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # mysftp - make sftp start up more like ftp 4 | 5 | echo -n "User account: " 6 | read account 7 | 8 | if [ -z "$account" ] ; then 9 | exit 0; # changed their mind, presumably 10 | fi 11 | 12 | if [ -z "$1" ] ; then 13 | echo -n "Remote host: " 14 | read host 15 | if [ -z $host ] ; then 16 | exit 0 17 | fi 18 | else 19 | host=$1 20 | fi 21 | 22 | # echo sftp -C $account@$host 23 | 24 | exec /usr/bin/sftp -C $account@$host 25 | -------------------------------------------------------------------------------- /069-showcgienv.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # show CGI env - display the CGI runtime environment, as given to any 4 | # CGI script on this system. 5 | 6 | echo "Content-type: text/html" 7 | echo "" 8 | 9 | # now the real information 10 | 11 | echo "

CGI Runtime Environment

" 12 | echo "
"
13 | env || printenv
14 | echo "
" 15 | echo "

Input stream is:

" 16 | echo "
"
17 | cat -
18 | echo "(end of input stream)
" 19 | 20 | exit 0 21 | -------------------------------------------------------------------------------- /025-checkspelling.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # checkspelling - check the spelling of a word 4 | 5 | spell="ispell -l" # if you have ispell installed instead 6 | # if not, just define spell=spell or 7 | # equivalent. 8 | 9 | if [ $# -lt 1 ] ; then 10 | echo "Usage: $0 word or words" >&2 11 | exit 1 12 | fi 13 | 14 | for word 15 | do 16 | if [ -z $(echo $word | $spell) ] ; then 17 | echo "$word: spelled correctly." 18 | else 19 | echo "$word: misspelled." 20 | fi 21 | done 22 | 23 | exit 0 24 | -------------------------------------------------------------------------------- /096-titleterm.sh: -------------------------------------------------------------------------------- 1 | #! /bin/sh 2 | 3 | # titleterm - tell the Mac OS X Terminal application to change its name 4 | # to the value specified as an argument to this succinct script. 5 | 6 | # To use this to show your current working directory, for example: 7 | # alias precmd 'titleterm "$PWD"' [tcsh] 8 | # or 9 | # export PROMPT_COMMAND="titleterm \"\$PWD\"" [bash] 10 | 11 | if [ $# -eq 0 ]; then 12 | echo "Usage: $0 title" >&2 13 | exit 1 14 | else 15 | echo -ne "\033]0;$1\007" 16 | fi 17 | 18 | exit 0 19 | -------------------------------------------------------------------------------- /text.snippet.txt: -------------------------------------------------------------------------------- 1 | Perhaps one of the most valuable uses of shell scripts is to fix 2 | your particular flavor of Unix and make it more like other flavors, 3 | to bring your commands into conformance or to increase consistency 4 | across different systems. The outsider view of Unix suggests a 5 | nice, uniform command-line experience, helped along by the existence 6 | and compliance with the POSIX standards for Unix, but anyone who's 7 | ever touched more than one computer knows how much they can vary 8 | within these broad parameters. 9 | -------------------------------------------------------------------------------- /039-fquota.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # FQUOTA - Disk quota analysis tool for Unix. 4 | # Assumes that all user accounts are >= UID 100. 5 | 6 | MAXDISKUSAGE=20 7 | 8 | for name in $(cut -d: -f1,3 /etc/passwd | awk -F: '$2 > 99 { print $1 }') 9 | do 10 | echo -n "User $name exceeds disk quota. Disk usage is: " 11 | 12 | find / /usr /var /Users -user $name -xdev -type f -ls | \ 13 | awk '{ sum += $7 } END { print sum / (1024*1024) " Mbytes" }' 14 | 15 | done | awk "\$9 > $MAXDISKUSAGE { print \$0 }" 16 | 17 | exit 0 18 | 19 | -------------------------------------------------------------------------------- /067-getstock.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # getstock - given a stock ticker symbol, return its current value 4 | # from the Lycos web site 5 | 6 | url="http://finance.lycos.com/qc/stocks/quotes.aspx?symbols=" 7 | 8 | if [ $# -ne 1 ] ; then 9 | echo "Usage: $(basename $0) stocksymbol" >&2 10 | exit 1 11 | fi 12 | 13 | value="$(lynx -dump "$url$1" | grep 'Last price:' | \ 14 | awk -F: 'NF > 1 && $(NF) != "N/A" { print $(NF) }')" 15 | 16 | if [ -z $value ] ; then 17 | echo "error: no value found for ticker symbol $1." >&2 18 | exit 1 19 | fi 20 | 21 | echo $value 22 | 23 | exit 0 24 | -------------------------------------------------------------------------------- /070-logsearch.cgi: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # log Yahoo! search - given a search request, log the pattern, then 4 | # feed the entire sequence to the real Yahoo search system. 5 | 6 | logfile="/home/taylor/scripts/searchlog.txt" 7 | 8 | if [ ! -f $logfile ] ; then 9 | touch $logfile 10 | chmod a+rw $logfile 11 | fi 12 | 13 | if [ -w $logfile ] ; then 14 | echo "$(date): $QUERY_STRING" | sed 's/p=//g;s/+/ /g' >> $logfile 15 | fi 16 | 17 | # echo "Content-type: text/html" 18 | # echo "" 19 | 20 | echo "Location: http://search.yahoo.com/bin/search?$QUERY_STRING" 21 | echo "" 22 | 23 | exit 0 24 | -------------------------------------------------------------------------------- /087-trimmailbox.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # trimmailbox - a simple script to ensure that only the four most recent 4 | # messages remain in the users mailbox. Works with Berkeley Mail 5 | # (aka Mailx or mail): will need modifications for other mailers!! 6 | 7 | keep=4 # by default, let's just keep around the four most recent messages 8 | 9 | totalmsgs="$(echo 'x' | mail | sed -n '2p' | awk '{print $2}')" 10 | 11 | if [ $totalmsgs -lt $keep ] ; then 12 | exit 0 # nothing to do 13 | fi 14 | 15 | topmsg="$(( $totalmsgs - $keep ))" 16 | 17 | mail > /dev/null << EOF 18 | d1-$topmsg 19 | q 20 | EOF 21 | 22 | exit 0 23 | -------------------------------------------------------------------------------- /076-ssi-sample.html: -------------------------------------------------------------------------------- 1 | 2 | Server side include demonstration 3 | 4 |

Server-side include demonstration page

5 | You are visitor 6 | 8 | to this site. 9 |

10 | This page was last modified on 11 | 12 | according to the SSI LAST_MODIFIED variable. 13 |

14 | Finally, the random tagline for this load is: 15 |

16 | 19 |
20 | 21 | 22 | 23 | -------------------------------------------------------------------------------- /062-define.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # define - given a word, return its definition from dictionary.com 4 | 5 | url="http://www.cogsci.princeton.edu/cgi-bin/webwn2.0?stage=1&word=" 6 | 7 | if [ $# -ne 1 ] ; then 8 | echo "Usage: $0 word" >&2 9 | exit 1 10 | fi 11 | 12 | lynx -source "$url$1" | \ 13 | grep -E '(^[[:digit:]]+\.| has [[:digit:]]+$)' | \ 14 | sed 's/<[^>]*>//g' | 15 | ( while read line 16 | do 17 | if [ "${line:0:3}" = "The" ] ; then 18 | part="$(echo $line | awk '{print $2}')" 19 | echo "" 20 | echo "The $part $1:" 21 | else 22 | echo "$line" | fmt | sed 's/^/ /g' 23 | fi 24 | done 25 | ) 26 | 27 | exit 0 28 | -------------------------------------------------------------------------------- /ragged.txt: -------------------------------------------------------------------------------- 1 | So she sat on, with closed eyes, and half believed herself in 2 | Wonderland, though she knew she had but to open them again, and 3 | all would change to dull reality--the grass would be only rustling 4 | in the wind, and the pool rippling to the waving of the reeds--the 5 | rattling teacups would change to tinkling sheep-bells, and the 6 | Queen's shrill cries to the voice of the shepherd boy--and the 7 | sneeze of the baby, the shriek of the Gryphon, and all the other 8 | queer noises, would change (she knew) to the confused clamour of 9 | the busy farm-yard--while the lowing of the cattle in the distance 10 | would take the place of the Mock Turtle's heavy sobs. 11 | -------------------------------------------------------------------------------- /014-ragged.txt: -------------------------------------------------------------------------------- 1 | So she sat on, with closed eyes, and half believed herrself in 2 | Wonderland, though she knew she had but to open them again, and 3 | all would change to dull reality--the grass would be only rustling in the wind, and the pool rippling to the waving of the reeds--the 4 | rattling teacups would change to tinkling sheep- bells, and the 5 | Queen's shrill cries to the voice of the shepherd boy--and the 6 | sneeze 7 | of the baby, the shriek of the Gryphon, and all thy other queer noises, would change (she knew) 8 | to the confused clamour of the busy farm-yard--while the lowing of 9 | the cattle in 10 | the distance would take the place of the Mock Turtle's heavy sobs. 11 | -------------------------------------------------------------------------------- /014-ragged.txt.shp: -------------------------------------------------------------------------------- 1 | So she sat on, with closed eyes, and half believed herrself in 2 | Wonderland, though she knew she had but to open them again, and 3 | all would change to dull reality--the grass would be only rustling in the wind, and the pool reippling to the waving of the reeds--the 4 | rattling teacups would change to tinkling sheep- bells, and the 5 | Queen's shrill cries to the voice of the shepherd boy--and the 6 | sneeze 7 | of the baby, the shriek of the Gryphon, and all thy other queer noises, would change (she knew) 8 | to the confused clamour of the busy farm-yard--while the lowing of 9 | the cattle in 10 | the distance would take the place of the Mock Turtle's heavy sobs. 11 | -------------------------------------------------------------------------------- /013-hilow.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # hilow - a simple number guessing game 3 | 4 | biggest=100 # maximum number possible 5 | guess=0 # guessed by player 6 | guesses=0 # number of guesses made 7 | number=$(( $$ % $biggest )) # random number, 1 .. $biggest 8 | 9 | while [ $guess -ne $number ] ; do 10 | echo -n "Guess? " ; read guess 11 | if [ "$guess" -lt $number ] ; then 12 | echo "... bigger!" 13 | elif [ "$guess" -gt $number ] ; then 14 | echo "... smaller!" 15 | fi 16 | guesses=$(( $guesses + 1 )) 17 | done 18 | 19 | echo "Right!! Guessed $number in $guesses guesses." 20 | 21 | exit 0 22 | -------------------------------------------------------------------------------- /how-many-commands.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # how many commands: a simple script to count how many executable commands 4 | # are in your current PATH. 5 | 6 | myPATH="$(echo $PATH | sed -e 's/ /~~/g' -e 's/:/ /g')" 7 | count=0 ; nonex=0 8 | 9 | for dirname in $myPATH ; do 10 | directory="$(echo $dirname | sed 's/~~/ /g')" 11 | if [ -d "$directory" ] ; then 12 | for command in $(ls "$directory") ; do 13 | if [ -x "$directory/$command" ] ; then 14 | count="$(( $count + 1 ))" 15 | else 16 | nonex="$(( $nonex + 1 ))" 17 | fi 18 | done 19 | fi 20 | done 21 | 22 | echo "$count commands, and $nonex entires that weren't marked executable" 23 | 24 | exit 0 25 | -------------------------------------------------------------------------------- /091-watch-and-nice.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # watch and nice - watch for the specified process name, and renice 4 | # to the desired value when seen 5 | 6 | renicename="$HOME/bin/renicename" 7 | 8 | if [ $# -ne 2 ] ; then 9 | echo "Usage: $(basename $0) desirednice jobname" >&2 10 | exit 1 11 | fi 12 | 13 | pid="$($renicename -p "$2")" 14 | 15 | if [ ! -z "$(echo $pid | sed 's/[0-9]*//g')" ] ; then 16 | echo "Failed to make a unique match in the process table for $2" >&2 17 | exit 1 18 | fi 19 | 20 | currentnice="$(ps -lp $pid | tail -1 | awk '{print $6}')" 21 | 22 | if [ $1 -gt $currentnice ] ; then 23 | echo "Adjusting priority of $2 to $1" 24 | renice $1 $pid 25 | fi 26 | 27 | exit 0 28 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | 100 shell script examples 2 | ==================================== 3 | 4 | This is archive of shell scripts that i found on the interenet long time ago. I'm not the author. Original website is located here: http://intuitive.com/wicked/wicked-cool-shell-script-library.shtml (author wrote a [book](http://intuitive.com/wicked/index.shtml)). 5 | 6 | Besides this, you can check out these repos too: 7 | - https://code.google.com/p/bsc/ 8 | - https://code.google.com/p/bashscripts/ 9 | - https://github.com/onlyshk/bash-snippets 10 | 11 | 12 | 13 | Also, there is an interesting article about this that links many shell script examples: 14 | - http://dberkholz.com/2011/04/07/bash-shell-scripting-libraries/ -------------------------------------------------------------------------------- /072-contactus.html: -------------------------------------------------------------------------------- 1 | 2 | contact us! 3 |
4 |
5 |
We Love Feedback!
6 | Name:
7 | Email:
8 | 9 | Your message or comment (please be brief):
10 |
11 | 12 |
13 | And this is an example sentence with a werd or two misspelled, for the 14 | webspell script (script #84). 15 |
16 | 17 | 18 | -------------------------------------------------------------------------------- /076-randomquote.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # randomquote - given a one-line-per-entry datafile, this 4 | # script will randomly pick one and display it. Best used 5 | # as an SSI call within a Web page. 6 | 7 | awkscript="/tmp/randomquote.awk.$$" 8 | 9 | if [ $# -ne 1 ] ; then 10 | echo "Usage: randomquote datafilename" >&2 11 | exit 1 12 | elif [ ! -r "$1" ] ; then 13 | echo "Error: quote file $1 is missing or not readable" >&2 14 | exit 1 15 | fi 16 | 17 | trap "/bin/rm -f $awkscript" 0 18 | 19 | cat << "EOF" > $awkscript 20 | BEGIN { srand(); } 21 | { s[NR] = $0 } 22 | END { print s[randint(NR)] } 23 | function randint(n) { return int (n * rand() ) + 1 } 24 | EOF 25 | 26 | awk -f $awkscript < "$1" 27 | 28 | exit 0 29 | -------------------------------------------------------------------------------- /002-validalnum.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # validalAlphaNum - Ensures that input only consists of alphabetical 3 | # and numeric characters. 4 | 5 | validAlphaNum() 6 | { 7 | # validate arg: returns 0 if all upper+lower+digits, 1 otherwise 8 | 9 | # Remove all unacceptable chars 10 | compressed="$(echo $1 | sed -e 's/[^[:alnum:]]//g')" 11 | 12 | if [ "$compressed" != "$input" ] ; then 13 | return 1 14 | else 15 | return 0 16 | fi 17 | } 18 | 19 | # Sample usage of this function in a script 20 | 21 | echo -n "Enter input: " 22 | read input 23 | 24 | if ! validAlphaNum "$input" ; then 25 | echo "Your input must consist of only letters and numbers." >&2 26 | exit 1 27 | else 28 | echo "Input is valid." 29 | fi 30 | 31 | exit 0 32 | -------------------------------------------------------------------------------- /097-itunelist.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # itunelist - list your iTunes library in a succinct and attractive 4 | # manner, suitable for sharing with others and using (with diff) 5 | # to ensure that you have synchronized iTune libraries on different 6 | # computers and laptops. 7 | 8 | itunehome="$HOME/Music/iTunes" 9 | ituneconfig="$itunehome/iTunes Music Library.xml" 10 | 11 | musiclib="/$(grep '>Music Folder<' "$ituneconfig" | cut -d/ -f5- | \ 12 | cut -d\< -f1 | sed 's/%20/ /g')" 13 | 14 | echo Your music library is at $musiclib 15 | 16 | if [ ! -d "$musiclib" ] ; then 17 | echo "$0: Confused: Music library $musiclib isn't a directory?" >&2 18 | exit 1 19 | fi 20 | 21 | exec find "$musiclib" -type d -mindepth 2 -maxdepth 2 \! -name '.*' -print | sed "s|$musiclib/||" 22 | -------------------------------------------------------------------------------- /054-docron.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # DOCRON - simple script to run the daily, weekly and monthly 4 | # system cron jobs on a system where it's likely that 5 | # it'll be shut down at the usual time of day when 6 | # this would occur. 7 | 8 | rootcron="/etc/crontab" 9 | 10 | if [ $# -ne 1 ] ; then 11 | echo "Usage: $0 [daily|weekly|monthly]" >&2 12 | exit 1 13 | fi 14 | 15 | if [ "$(id -u)" -ne 0 ] ; then 16 | echo "$0: Command must be run as 'root'" >&2 17 | exit 1 18 | fi 19 | 20 | job="$(awk "NR > 6 && /$1/ { for (i=7;i<=NF;i++) print \$i }" $rootcron)" 21 | 22 | if [ -z $job ] ; then 23 | echo "$0: Error: no $1 job found in $rootcron" >&2 24 | exit 1 25 | fi 26 | 27 | SHELL=/bin/sh # to be consistent with cron's default 28 | 29 | eval $job 30 | -------------------------------------------------------------------------------- /058-connecttime.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # connecttime - reports cumulative connection time for month/year entries 4 | # found in the system log file. 5 | 6 | log="/var/log/system.log" 7 | tempfile="/tmp/$0.$$" 8 | 9 | trap "rm $tempfile" 0 10 | 11 | cat << 'EOF' > $tempfile 12 | BEGIN { 13 | lastmonth=""; sum = 0 14 | } 15 | { 16 | if ( $1 != lastmonth && lastmonth != "" ) { 17 | if (sum > 60) { total = sum/60 " hours" } 18 | else { total = sum " minutes" } 19 | print lastmonth ": " total 20 | sum=0 21 | } 22 | lastmonth=$1 23 | sum += $8 24 | } 25 | END { 26 | if (sum > 60) { total = sum/60 " hours" } 27 | else { total = sum " minutes" } 28 | print lastmonth ": " total 29 | } 30 | EOF 31 | 32 | grep "Connect time" $log | awk -f $tempfile 33 | 34 | exit 0 35 | -------------------------------------------------------------------------------- /034-quota.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # newquota - a front-end to quota that works with fullword flags a la GNU 3 | 4 | # quota has three possible flags: -g, -v and -q and in this script 5 | # we allow them to be '--group' '--verbose' and '--quiet' too: 6 | 7 | flags="" 8 | realquota="/usr/bin/quota" 9 | 10 | while [ $# -gt 0 ] 11 | do 12 | echo checking flag $1 13 | case $1 14 | in 15 | --help ) echo "Usage: $0 [--group --verbose --quiet -gvq]" >&2 16 | exit 1 ;; 17 | --group | -group) flags="$flags -g"; shift ;; 18 | --verbose | -verbose) flags="$flags -v"; shift ;; 19 | --quiet | -quiet) flags="$flags -q"; shift ;; 20 | -- ) shift; break ;; 21 | * ) break; # done with 'while' loop! 22 | esac 23 | done 24 | 25 | exec $realquota $flags "$@" 26 | -------------------------------------------------------------------------------- /048-fixguest.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # fixguest - Clean up the guest account during the logout process 4 | 5 | # don't trust environment variables: reference read-only sources 6 | 7 | iam="$(whoami)" 8 | myhome="$(grep "^${iam}:" /etc/passwd | cut -d: -f6)" 9 | 10 | # *** Do NOT run this script on a regular user account! 11 | 12 | if [ "$iam" != "guest" ] ; then 13 | echo "Error: you really don't want to run fixguest on this account." >&2 14 | exit 1 15 | fi 16 | 17 | if [ ! -d $myhome/..template ] ; then 18 | echo "$0: no template directory found for rebuilding." >&2 19 | exit 1 20 | fi 21 | 22 | # remove all files and directories in the home account 23 | 24 | cd $myhome 25 | 26 | rm -rf * $(find . -name ".[a-zA-Z0-9]*" -print) 27 | 28 | # now the only thing present should be the ..template directory 29 | 30 | cp -Rp ..template/* . 31 | 32 | exit 0 33 | -------------------------------------------------------------------------------- /059-ftpget.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # ftpget - given an ftp: style URL, unwrap it, and try to obtain the file 4 | # using anonymous ftp. 5 | 6 | anonpass="$LOGNAME@$(hostname)" 7 | 8 | if [ $# -ne 1 ] ; then 9 | echo "Usage: $0 ftp://..." >&2 10 | exit 1 11 | fi 12 | 13 | # Typical URL: ftp://ftp.ncftp.com/2.7.1/ncftpd-2.7.1.tar.gz 14 | 15 | if [ "$(echo $1 | cut -c1-6)" != "ftp://" ] ; then 16 | echo "$0: Malformed url. I need it to start with ftp://" >&2; 17 | exit 1 18 | fi 19 | 20 | server="$(echo $1 | cut -d/ -f3)" 21 | filename="$(echo $1 | cut -d/ -f4-)" 22 | basefile="$(basename $filename)" 23 | 24 | echo ${0}: Downloading $basefile from server $server 25 | 26 | ftp -n << EOF 27 | open $server 28 | user ftp $anonpass 29 | get $filename $basefile 30 | quit 31 | EOF 32 | 33 | if [ $? -eq 0 ] ; then 34 | ls -l $basefile 35 | fi 36 | 37 | exit 0 38 | -------------------------------------------------------------------------------- /080-htpasswd-b.pl: -------------------------------------------------------------------------------- 1 | #!/usr/bin/perl 2 | 3 | if (! scalar @ARGV ) { 4 | print "Usage: htpasswd-b passwordfile user password\n"; 5 | print "(this program automatically creates the pw file if needed.)\n"; 6 | exit 0; 7 | } 8 | 9 | @saltsource = ('a'..'z', 'A'..'Z', '0'..'9','.','/'); 10 | $randum_num = int(rand(scalar @saltsource)); 11 | $salt = $saltsource[$randum_num]; 12 | $randum_num = int(rand(scalar @saltsource)); 13 | $salt .= $saltsource[$randum_num]; 14 | 15 | $outf=$ARGV[0]; 16 | $user=$ARGV[1]; 17 | $passwd=$ARGV[2]; 18 | 19 | if ($user && $passwd) { 20 | $encrypted = crypt($passwd, "$salt"); 21 | 22 | if (-f $outf) { 23 | open(OUT, ">>$outf") || die "htpasswd-b error: $!\n"; 24 | } else { 25 | open(OUT, ">$outf") || die "htpasswd-b error: $!\n"; 26 | } 27 | print OUT "$user:$encrypted\n"; 28 | close(OUT); 29 | 30 | exit 0; 31 | } 32 | -------------------------------------------------------------------------------- /082-ftpsyncdown.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # ftpsyncdown - Given a source directory on a remote FTP server, 4 | # download all the files therein into the current directory. 5 | 6 | tempfile="/tmp/ftpsyncdown.$$" 7 | 8 | trap "/bin/rm -f $tempfile" 0 1 15 # zap tempfile on exit 9 | 10 | if [ $# -eq 0 ] ; then 11 | echo "Usage: $0 user@host { remotedir }" >&2 12 | exit 1 13 | fi 14 | 15 | user="$(echo $1 | cut -d@ -f1)" 16 | server="$(echo $1 | cut -d@ -f2)" 17 | 18 | echo "open $server" > $tempfile 19 | echo "user $user" >> $tempfile 20 | 21 | if [ $# -gt 1 ] ; then 22 | echo "cd $2" >> $tempfile 23 | fi 24 | 25 | cat << EOF >> $tempfile 26 | prompt 27 | mget * 28 | quit 29 | EOF 30 | 31 | echo "Synchronizing: Downloading files" 32 | 33 | if ! ftp -n < $tempfile ; then 34 | echo "Done. All files on $server downloaded to $(pwd)" 35 | fi 36 | 37 | exit 0 38 | -------------------------------------------------------------------------------- /032-showfile.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # showfile - show the contents of a file, including additional useful info 3 | 4 | width=72 5 | 6 | for input 7 | do 8 | lines="$(wc -l < $input | sed 's/ //g')" 9 | chars="$(wc -c < $input | sed 's/ //g')" 10 | owner="$(ls -ld $input | awk '{print $3}')" 11 | echo "-----------------------------------------------------------------" 12 | echo "File $input ($lines lines, $chars characters, owned by $owner):" 13 | echo "-----------------------------------------------------------------" 14 | while read line 15 | do 16 | if [ ${#line} -gt $width ] ; then 17 | echo "$line" | fmt | sed -e '1s/^/ /' -e '2,$s/^/+ /' 18 | else 19 | echo " $line" 20 | fi 21 | done < $input 22 | 23 | echo "-----------------------------------------------------------------" 24 | 25 | done | more 26 | 27 | exit 0 28 | -------------------------------------------------------------------------------- /072-contactus.cgi: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # Process the contact us form data, email it to the designated 4 | # recipient, and return a succinct thank you message. 5 | 6 | recipient="taylor" 7 | thankyou="thankyou.html" # optional 'thanks' page 8 | 9 | ( cat << EOF 10 | From: (Your Web Site Contact Form) www@$(hostname) 11 | To: $recipient 12 | Subject: Contact Request from Web Site 13 | 14 | Content of the Web site contact form: 15 | 16 | EOF 17 | 18 | cat - | tr '&' '\n' | \ 19 | sed -e 's/+/ /g' -e 's/%40/@/g' -e 's/=/: /' 20 | 21 | echo ""; echo "" 22 | echo "Form submitted on $(date)" 23 | ) | sendmail -t 24 | 25 | echo "Content-type: text/html" 26 | echo "" 27 | 28 | if [ -r $thankyou ] ; then 29 | cat $thankyou 30 | else 31 | echo "" 32 | echo "Thank you. We'll try to contact you soonest." 33 | echo "" 34 | fi 35 | 36 | exit 0 37 | -------------------------------------------------------------------------------- /067-portfolio.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # portfolio - calculate the value of each stock in your holdings, 4 | # then calculate the value of your overall portfolio, based on 5 | # the latest stock market position. 6 | 7 | getstock="sh 069-getstock.sh" 8 | scriptbc="$HOME/bin/scriptbc" 9 | portfolio="$HOME/.portfolio" 10 | 11 | if [ ! -f $portfolio ] ; then 12 | echo "$(basename $0): No portfolio to check? ($portfolio)" >&2 13 | exit 1 14 | fi 15 | 16 | while read holding 17 | do 18 | eval $(echo $holding | \ 19 | awk -F\| '{print "name=\""$1"\"; ticker=\""$2"\"; hold=\""$3"\""}') 20 | if [ ! -z "$ticker" ] ; then 21 | value="$(eval $getstock $ticker)" 22 | totval="$($scriptbc ${value:-0} \* $hold)" 23 | echo "$name is trading at $value (your $hold shares = $totval)" 24 | sumvalue="$($scriptbc ${sumvalue:-0} + $totval)" 25 | fi 26 | done < $portfolio 27 | 28 | echo "Total portfolio value: $sumvalue" 29 | 30 | exit 0 31 | -------------------------------------------------------------------------------- /042-newdf.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # newdf - a friendlier version of df 4 | 5 | sedscript="/tmp/newdf.$$" 6 | 7 | trap "rm -f $sedscript" EXIT 8 | 9 | cat << 'EOF' > $sedscript 10 | function showunit(size) 11 | { mb = size / 1024; prettymb=(int(mb * 100)) / 100; 12 | gb = mb / 1024; prettygb=(int(gb * 100)) / 100; 13 | 14 | if ( substr(size,1,1) !~ "[0-9]" || 15 | substr(size,2,1) !~ "[0-9]" ) { return size } 16 | else if ( mb < 1) { return size "K" } 17 | else if ( gb < 1) { return prettymb "M" } 18 | else { return prettygb "G" } 19 | } 20 | 21 | BEGIN { 22 | printf "%-27s %7s %7s %7s %8s %-s\n", 23 | "Filesystem", "Size", "Used", "Avail", "Capacity", "Mounted" 24 | } 25 | 26 | !/Filesystem/ { 27 | 28 | size=showunit($2); 29 | used=showunit($3); 30 | avail=showunit($4); 31 | 32 | printf "%-27s %7s %7s %7s %8s %-s\n", 33 | $1, size, used, avail, $5, $6 34 | } 35 | EOF 36 | 37 | df -k | awk -f $sedscript 38 | 39 | exit 0 40 | -------------------------------------------------------------------------------- /063-weather.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # weather - report weather forecast, including lat/long, for zip 4 | 5 | llurl="http://www.census.gov/cgi-bin/gazetteer?city=&state=&zip=" 6 | wxurl="http://wwwa.accuweather.com" 7 | wxurl="$wxurl/adcbin/public/local_index_print.asp?zipcode=" 8 | 9 | if [ "$1" = "-a" ] ; then 10 | size=999; shift 11 | else 12 | size=5 13 | fi 14 | 15 | if [ $# -eq 0 ] ; then 16 | echo "Usage: $0 [-a] zipcode" >&2 17 | exit 1 18 | fi 19 | 20 | if [ $size -eq 5 ] ; then 21 | echo "" 22 | 23 | # get some information on the zipcode from the Census Bureau 24 | 25 | lynx -source "${llurl}$1" | \ 26 | sed -n '/^
  • /,/^Location:/p' | \ 27 | sed 's/<[^>]*>//g;s/^ //g' 28 | fi 29 | 30 | # the weather forecast itself at accuweather.com 31 | 32 | lynx -source "${wxurl}$1" | \ 33 | sed -n '/Start - Forecast Cell/,/End - Forecast Cell/p' | \ 34 | sed 's/<[^>]*>//g;s/^ [ ]*//g' | \ 35 | uniq | \ 36 | head -$size 37 | 38 | exit 0 39 | -------------------------------------------------------------------------------- /012-library-test.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # Script to demonstrate use of the shell function library 4 | 5 | . 012-library.sh 6 | 7 | initializeANSI 8 | 9 | echon "First off, do you have echo in your path? (1=yes, 2=no) " 10 | read answer 11 | while ! validint $answer 1 2 ; do 12 | echon "${boldon}Try again${boldoff}. Do you have echo " 13 | echon "in your path? (1=yes, 2=no) " 14 | read answer 15 | done 16 | 17 | if ! checkForCmdInPath "echo" ; then 18 | echo "Nope, can't find the echo command." 19 | else 20 | echo "The echo command is in the PATH." 21 | fi 22 | 23 | echo "" 24 | echon "Enter a year you think might be a leap year: " 25 | read year 26 | 27 | while ! validint $year 1 9999 ; do 28 | echon "Please enter a year in the ${boldon}correct${boldoff} format: " 29 | read year 30 | done 31 | 32 | if isLeapYear $year ; then 33 | echo "${greenf}You're right! $year was a leap year.${reset}" 34 | else 35 | echo "${redf}Nope, that's not a leap year.${reset}" 36 | fi 37 | 38 | exit 0 39 | -------------------------------------------------------------------------------- /077-checklinks.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # checklinks - traverse all internal URLs on a Web site, reporting 4 | # any errors in the "traverse.errors" file. 5 | 6 | lynx="/usr/local/bin/lynx" # this might need to be tweaked 7 | 8 | # remove all the lynx traversal output files upon completion: 9 | trap "/bin/rm -f traverse*.errors reject*.dat traverse*.dat" 0 10 | 11 | if [ -z "$1" ] ; then 12 | echo "Usage: checklinks URL" >&2 ; exit 1 13 | fi 14 | 15 | $lynx -traversal "$1" > /dev/null 16 | 17 | if [ -s "traverse.errors" ] ; then 18 | echo -n $(wc -l < traverse.errors) errors encountered. 19 | echo \ Checked $(grep '^http' traverse.dat | wc -l) pages at ${1}: 20 | sed "s|$1||g" < traverse.errors 21 | else 22 | echo -n "No errors encountered. "; 23 | echo Checked $(grep '^http' traverse.dat | wc -l) pages at ${1} 24 | exit 0 25 | fi 26 | 27 | baseurl="$(echo $1 | cut -d/ -f3)" 28 | mv traverse.errors ${baseurl}.errors 29 | echo "(A copy of this output has been saved in ${baseurl}.errors)" 30 | 31 | exit 0 32 | -------------------------------------------------------------------------------- /027-spelldict.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # spelldict - use the 'aspell' feature and some filtering to allow easy 4 | # command-line spell checking of a given input (file) 5 | 6 | okaywords="$HOME/.okaywords" 7 | tempout="/tmp/spell.tmp.$$" 8 | spell="virtual aspell" # tweak as needed 9 | 10 | trap "/bin/rm -f $tempout" EXIT 11 | 12 | if [ -z "$1" ] ; then 13 | echo "Usage: spell file|URL" >&2; exit 1 14 | elif [ ! -f $okaywords ] ; then 15 | echo "No personal dictionary found. Create one and rerun this command" >&2 16 | echo "Your dictionary file: $okaywords" >&2 17 | exit 1 18 | fi 19 | 20 | for filename 21 | do 22 | $spell -a < $filename | \ 23 | grep -v '@(#)' | sed "s/\'//g" | \ 24 | awk '{ if (length($0) > 15 && length($2) > 2) print $2 }' | \ 25 | grep -vif $okaywords | \ 26 | grep '[[:lower:]]' | grep -v '[[:digit:]]' | sort -u | \ 27 | sed 's/^/ /' > $tempout 28 | 29 | if [ -s $tempout ] ; then 30 | sed "s/^/${filename}: /" $tempout 31 | fi 32 | done 33 | 34 | exit 0 35 | -------------------------------------------------------------------------------- /051-enabled.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # enabled - show what services are enabled with inetd and xinetd, 4 | # if they're available on the system. 5 | 6 | iconf="/etc/inetd.conf" 7 | xconf="/etc/xinetd.conf" 8 | xdir="/etc/xinetd.d" 9 | 10 | if [ -r $iconf ] ; then 11 | echo "Services enabled in $iconf are:" 12 | grep -v '^#' $iconf | awk '{print " " $1}' 13 | echo "" 14 | if [ "$(ps -aux | grep inetd | egrep -vE '(xinet|grep)')" = "" ] ; then 15 | echo "** warning: inetd does not appear to be running" 16 | fi 17 | fi 18 | 19 | if [ -r $xconf ] ; then 20 | # don't need to look in xinietd.conf, just know it exists 21 | echo "Services enabled in $xdir are:" 22 | 23 | for service in $xdir/* 24 | do 25 | if ! $(grep disable $service | grep 'yes' > /dev/null) ; then 26 | echo -n " " 27 | basename $service 28 | fi 29 | done 30 | 31 | if ! $(ps -aux | grep xinetd | grep -v 'grep' > /dev/null) ; then 32 | echo "** warning: xinetd does not appear to be running" 33 | fi 34 | fi 35 | 36 | exit 0 37 | -------------------------------------------------------------------------------- /061-getlinks.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # getlinks - given a URL, return all of its internal and 4 | # external links 5 | 6 | if [ $# -eq 0 ] ; then 7 | echo "Usage: $0 [-d|-i|-x] url" >&2 8 | echo "-d=domains only, -i=internal refs only, -x=external only" >&2 9 | exit 1 10 | fi 11 | 12 | if [ $# -gt 1 ] ; then 13 | case "$1" in 14 | -d) lastcmd="cut -d/ -f3 | sort | uniq" 15 | shift 16 | ;; 17 | -i) basedomain="http://$(echo $2 | cut -d/ -f3)/" 18 | lastcmd="grep \"^$basedomain\" | sed \"s|$basedomain||g\" | sort | uniq" 19 | shift 20 | ;; 21 | -x) basedomain="http://$(echo $2 | cut -d/ -f3)/" 22 | lastcmd="grep -v \"^$basedomain\" | sort | uniq" 23 | shift 24 | ;; 25 | *) echo "$0: unknown option specified: $1" >&2; exit 1 26 | esac 27 | else 28 | lastcmd="sort | uniq" 29 | fi 30 | 31 | lynx -dump "$1" | \ 32 | sed -n '/^References$/,$p' | \ 33 | grep -E '[[:digit:]]+\.' | \ 34 | awk '{print $2}' | \ 35 | cut -d\? -f1 | \ 36 | eval $lastcmd 37 | 38 | exit 0 39 | -------------------------------------------------------------------------------- /071-getdope.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # Within cron set it up so that every Friday, grab the latest column 4 | # of 'The Straight Dope' and mail it out to the specified recipient 5 | 6 | now="$(date +%y%m%d)" 7 | url="http://www.straightdope.com/columns/${now}.html" 8 | to="taylor" 9 | 10 | ( cat << EOF 11 | Subject: The Straight Dope for $(date "+%A, %d %B, %Y") 12 | From: Cecil Adams 13 | Content-type: text/html 14 | To: $to 15 | 16 | 17 | 18 |
    21 | THE STRAIGHT DOPE
    22 | 23 |
    24 | EOF 25 | 26 | lynx -source "$url" | \ 27 | sed -n '/
    /,$p' | \ 28 | sed 's|src="../art|src="http://www.straightdope.com/art|' |\ 29 | sed 's|href="..|href="http://www.straightdope.com|g' 30 | 31 | echo "
    " 32 | ) | /usr/sbin/sendmail -t 33 | 34 | exit 0 35 | -------------------------------------------------------------------------------- /085-enginehits.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # enginehits - extract and analyze search engine traffic in the 4 | # referrer field of a Common Log Format access log for a 5 | # specified domain name. 6 | 7 | maxmatches=25 8 | count=0 9 | temp="/tmp/$(basename $0).$$" 10 | 11 | trap "/bin/rm -f $temp" 0 12 | 13 | if [ $# -eq 0 -o ! -f "$1" ] ; then 14 | echo "Usage: $(basename $0) logfile searchdomain" >&2 15 | exit 1 16 | fi 17 | 18 | for URL in $(awk '{ if (length($11) > 4) { print $11 } }' "$1" | \ 19 | grep $2) 20 | do 21 | args="$(echo $URL | cut -d\? -f2 | tr '&' '\n' | \ 22 | grep -E '(^q=|^sid=|^p=|query=|item=|ask=|name=|topic=)' | \ 23 | cut -d= -f2)" 24 | echo $args | sed -e 's/+/ /g' -e 's/"//g' >> $temp 25 | count="$(( $count + 1 ))" 26 | done 27 | 28 | echo "Search engine referrer info extracted $2 searches from ${1}:" 29 | 30 | sort $temp | uniq -c | sort -rn | head -$maxmatches | sed 's/^/ /g' 31 | 32 | echo "" 33 | echo Scanned $count $2 entries in log file out of $(wc -l < "$1") total. 34 | 35 | exit 0 36 | -------------------------------------------------------------------------------- /050-set-date.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # setdate - friendly front-end to the date command 3 | 4 | # Date wants: [[[[[cc]yy]mm]dd]hh]mm[.ss] 5 | 6 | askvalue() 7 | { 8 | # $1 = field name, $2 = default value, $3 = max value, 9 | # $4 = required char/digit length 10 | 11 | echo -n "$1 [$2] : " 12 | read answer 13 | if [ ${answer:=$2} -gt $3 ] ; then 14 | echo "$0: $1 $answer is invalid"; exit 0 15 | elif [ "$(( $(echo $answer | wc -c) - 1 ))" -lt $4 ] ; then 16 | echo "$0: $1 $answer is too short: please specify $4 digits"; exit 0 17 | fi 18 | eval $1=$answer 19 | } 20 | 21 | eval $(date "+nyear=%Y nmon=%m nday=%d nhr=%H nmin=%M") 22 | 23 | askvalue year $nyear 3000 4 24 | askvalue month $nmon 12 2 25 | askvalue day $nday 31 2 26 | askvalue hour $nhr 24 2 27 | askvalue minute $nmin 59 2 28 | 29 | squished="$year$month$day$hour$minute" 30 | # or, if you're running a Linux system: 31 | # squished="$month$day$hour$minute$year" 32 | 33 | echo "Setting date to $squished. You might need to enter your sudo password:" 34 | sudo date $squished 35 | 36 | exit 0 37 | -------------------------------------------------------------------------------- /073-photoalbum.cgi: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | echo "Content-type: text/html" 4 | echo "" 5 | 6 | header="header.html" 7 | footer="footer.html" 8 | count=0 9 | 10 | if [ -f $header ] ; then 11 | cat $header 12 | else 13 | echo "
    " 14 | fi 15 | 16 | echo "

    Contents of $(dirname $SCRIPT_NAME)

    " 17 | echo "" 18 | 19 | for name in *jpg 20 | do 21 | if [ $count -eq 4 ] ; then 22 | echo "
    " 23 | count=1 24 | else 25 | echo "" 26 | count=$(( $count + 1 )) 27 | fi 28 | 29 | nicename="$(echo $name | sed 's/.jpg//;s/-/ /g')" 30 | 31 | echo "
    " 33 | echo "$nicename" 34 | done 35 | 36 | echo "
    " 37 | 38 | if [ -f $footer ] ; then 39 | cat $footer 40 | else 41 | echo "" 42 | fi 43 | 44 | exit 0 45 | -------------------------------------------------------------------------------- /018-formatdir.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # formatdir - output a directory listing in a friendly and useful format 4 | 5 | gmk() 6 | { 7 | # given input in Kb, output in Kb, Mb or Gb for best output format 8 | if [ $1 -ge 1000000 ] ; then 9 | echo "$(scriptbc -p 2 $1 / 1000000)Gb" 10 | elif [ $1 -ge 1000 ] ; then 11 | echo "$(scriptbc -p 2 $1 / 1000)Mb" 12 | else 13 | echo "${1}Kb" 14 | fi 15 | } 16 | 17 | if [ $# -gt 1 ] ; then 18 | echo "Usage: $0 [dirname]" >&2; exit 1 19 | elif [ $# -eq 1 ] ; then 20 | cd "$@" 21 | fi 22 | 23 | for file in * 24 | do 25 | if [ -d "$file" ] ; then 26 | size=$(ls "$file" | wc -l | sed 's/[^[:digit:]]//g') 27 | if [ $size -eq 1 ] ; then 28 | echo "$file ($size entry)|" 29 | else 30 | echo "$file ($size entries)|" 31 | fi 32 | else 33 | size="$(ls -sk "$file" | awk '{print $1}')" 34 | echo "$file ($(gmk $size))|" 35 | fi 36 | done | \ 37 | sed 's/ /^^^/g' | \ 38 | xargs -n 2 | \ 39 | sed 's/\^\^\^/ /g' | \ 40 | awk -F\| '{ printf "%-39s %-39s\n", $1, $2 }' 41 | 42 | exit 0 43 | -------------------------------------------------------------------------------- /029-loancalc.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # mortgage - given a principal loan amount, interest rate, and 4 | # duration of loan (years), calculate the per-payment amount. 5 | 6 | # formula is: M = P * ( J / (1 - (1 + J) ** -N)) 7 | # where P = principal, J = monthly interest rate, N = duration (months) 8 | # 9 | # users typically enter P, I (annual interest rate) and L (length, years) 10 | 11 | . 012-library.sh 12 | 13 | if [ $# -ne 3 ] ; then 14 | echo "Usage: $0 principal interest loan-duration-years" >&2 15 | exit 1 16 | fi 17 | 18 | P=$1 I=$2 L=$3 19 | J="$(scriptbc -p 8 $I / \( 12 \* 100 \) )" 20 | N="$(( $L * 12 ))" 21 | M="$(scriptbc -p 8 $P \* \( $J / \(1 - \(1 + $J\) \^ -$N\) \) )" 22 | 23 | # now a little prettying up of the value: 24 | 25 | dollars="$(echo $M | cut -d. -f1)" 26 | cents="$(echo $M | cut -d. -f2 | cut -c1-2)" 27 | 28 | cat << EOF 29 | A $L year loan at $I% interest with a principal amount of $(nicenumber $P 1 ) 30 | results in a payment of \$$dollars.$cents each month for the duration of 31 | the loan ($N payments). 32 | EOF 33 | 34 | exit 0 35 | -------------------------------------------------------------------------------- /049-findsuid.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # findsuid - find all SUID files or programs on the system other 4 | # than those that live in /bin and /usr/bin, and 5 | # output the matches in a friendly and useful format. 6 | 7 | mtime="7" # how far back (in days) to check for modified cmds 8 | verbose=0 # by default, let's be quiet about things 9 | 10 | if [ "$1" = "-v" ] ; then 11 | verbose=1 12 | fi 13 | 14 | for match in $(find /bin /usr/bin -type f -perm +4000 -print) 15 | do 16 | if [ -x $match ] ; then 17 | 18 | owner="$(ls -ld $match | awk '{print $3}')" 19 | perms="$(ls -ld $match | cut -c5-10 | grep 'w')" 20 | 21 | if [ ! -z $perms ] ; then 22 | echo "**** $match (writeable and setuid $owner)" 23 | elif [ ! -z $(find $match -mtime -$mtime -print) ] ; then 24 | echo "**** $match (modified within $mtime days and setuid $owner)" 25 | elif [ $verbose -eq 1 ] ; then 26 | lastmod="$(ls -ld $match | awk '{print $6, $7, $8}')" 27 | echo " $match (setuid $owner, last modified $lastmod)" 28 | fi 29 | fi 30 | done 31 | 32 | exit 0 33 | 34 | -------------------------------------------------------------------------------- /095-addmacalias.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # addalias - add a new alias to the email alias database on Mac OS X 4 | # this presumes that you've enabled sendmail, which can be kind of 5 | # tricky. Go to http://www.macdevcenter.com/ and search for 'sendmail' 6 | # for some good reference works. 7 | 8 | showaliases="nidump aliases ." 9 | 10 | if [ "$(/usr/bin/whoami)" != "root" ] ; then 11 | echo "$(basename $0): You must be root to run this command." >&2 12 | exit 1 13 | fi 14 | 15 | if [ $# -eq 0 ] ; then 16 | echo -n "Alias to create: " 17 | read alias 18 | else 19 | alias=$1 20 | fi 21 | 22 | # now let's check to see if that alias already exists... 23 | 24 | if $showaliases | grep "${alias}:" >/dev/null 2>&1 ; then 25 | echo "$0: mail alias $alias already exists" >&2 26 | exit 1 27 | fi 28 | 29 | # looks good. let's get the RHS and inject it into NetInfo 30 | 31 | echo -n "pointing to: " 32 | read rhs 33 | 34 | niutil -create . /aliases/$alias 35 | niutil -createprop . /aliases/$alias name $alias 36 | niutil -createprop . /aliases/$alias members "$rhs" 37 | 38 | echo "Alias $alias created without incident." 39 | 40 | exit 0 41 | -------------------------------------------------------------------------------- /071-kevin-and-kell.cgi: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # kevin-and-kell.cgi - Build a Web page on-the-fly to display the latest 4 | # strip from the cartoon strip Kevin and Kell, by Bill Holbrook 5 | # 6 | 7 | month="$(date +%m)" 8 | day="$(date +%d)" 9 | year="$(date +%y)" 10 | 11 | echo "Content-type: text/html" 12 | echo "" 13 | 14 | echo "
    " 15 | echo "Kevin & Kell" 16 | echo "
    " 17 | echo "" 18 | echo "" 19 | echo "
    Bill Holbrook's Kevin & Kell
    " 25 | 26 | echo "
    " 27 | echo "© Bill Holbrook. Please see " 28 | echo "kevinandkell.com" 29 | echo "for more strips, books, etc." 30 | echo "
    " 31 | 32 | exit 0 33 | -------------------------------------------------------------------------------- /024-calc.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # calc - a command-line calculator that acts as a front-end to bc 4 | 5 | scale=2 6 | 7 | show_help() 8 | { 9 | cat << EOF 10 | In addition to standard math functions, calc also supports 11 | 12 | a % b remainder of a/b 13 | a ^ b exponential: a raised to the b power 14 | s(x) sine of x, x in radians 15 | c(x) cosine of x, x in radians 16 | a(x) arctangent of x, returns radians 17 | l(x) natural log of x 18 | e(x) exponential log of raising e to the x 19 | j(n,x) bessel function of integer order n of x 20 | scale N show N fractional digits (default = 2) 21 | EOF 22 | } 23 | 24 | if [ $# -gt 0 ] ; then 25 | exec scriptbc "$@" 26 | fi 27 | 28 | echo "Calc - a simple calculator. Use 'help' for help, 'quit' to quit." 29 | 30 | echo -n "calc> " 31 | 32 | while read command args 33 | do 34 | case $command 35 | in 36 | quit|exit) exit 0 ;; 37 | help|\?) show_help ;; 38 | scale) scale=$args ;; 39 | *) scriptbc -p $scale "$command" "$args" ;; 40 | esac 41 | 42 | echo -n "calc> " 43 | done 44 | 45 | echo "" 46 | 47 | exit 0 48 | -------------------------------------------------------------------------------- /090-getstats.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # getstats - every 'n' minutes, grab netstats values (via crontab) 4 | 5 | logfile="/var/log/netstat.log" 6 | temp="/tmp/getstats.tmp" 7 | 8 | trap "/bin/rm -f $temp" 0 9 | 10 | ( echo -n "time=$(date +%s);" 11 | 12 | netstat -s -p tcp > $temp 13 | 14 | sent="$(grep 'packets sent' $temp | cut -d\ -f1 | sed 's/[^[:digit:]]//g')" 15 | resent="$(grep 'retransmitted' $temp | cut -d\ -f1 | sed 's/[^[:digit:]]//g')" 16 | received="$(grep 'packets received$' $temp | cut -d\ -f1 | sed 's/[^[:digit:]]//g')" 17 | dupacks="$(grep 'duplicate acks' $temp | cut -d\ -f1 | sed 's/[^[:digit:]]//g')" 18 | outoforder="$(grep 'out-of-order packets' $temp | cut -d\ -f1 | sed 's/[^[:digit:]]//g')" 19 | connectreq="$(grep 'connection requests' $temp | cut -d\ -f1 | sed 's/[^[:digit:]]//g')" 20 | connectacc="$(grep 'connection accepts' $temp | cut -d\ -f1 | sed 's/[^[:digit:]]//g')" 21 | retmout="$(grep 'retransmit timeouts' $temp | cut -d\ -f1 | sed 's/[^[:digit:]]//g')" 22 | 23 | echo -n "snt=$sent;re=$resent;rec=$received;dup=$dupacks;" 24 | echo -n "oo=$outoforder;creq=$connectreq;cacc=$connectacc;" 25 | echo "reto=$retmout" 26 | 27 | ) >> $logfile 28 | 29 | exit 0 30 | -------------------------------------------------------------------------------- /state.capitals.txt: -------------------------------------------------------------------------------- 1 | Alabama Montgomery 2 | Alaska Juneau 3 | Arizona Phoenix 4 | Arkansas Little-Rock 5 | California Sacramento 6 | Colorado Denver 7 | Connecticut Hartford 8 | Delaware Dover 9 | Florida Tallahassee 10 | Georgia Atlanta 11 | Hawaii Honolulu 12 | Idaho Boise 13 | Illinois Springfield 14 | Indiana Indianapolis 15 | Iowa Des-Moines 16 | Kansas Topeka 17 | Kentucky Frankfort 18 | Louisiana Baton-Rouge 19 | Maine Augusta 20 | Maryland Annapolis 21 | Massachusetts Boston 22 | Michigan Lansing 23 | Minnesota St.-Paul 24 | Mississippi Jackson 25 | Missouri Jefferson-City 26 | Montana Helena 27 | Nebraska Lincoln 28 | Nevada Carson-City 29 | New-Hampshire Concord 30 | New-Jersey Trenton 31 | New-Mexico Santa-Fe 32 | New-York Albany 33 | North-Carolina Raleigh 34 | North-Dakota Bismarck 35 | Ohio Columbus 36 | Oklahoma Oklahoma-City 37 | Oregon Salem Portland 38 | Pennsylvania Harrisburg 39 | Rhode-Island Providence 40 | South-Carolina Columbia 41 | South-Dakota Pierre 42 | Tennessee Nashville 43 | Texas Austin 44 | Utah Salt-Lake-City 45 | Vermont Montpelier 46 | Virginia Richmond 47 | Washington Olympia 48 | West-Virginia Charleston 49 | Wisconsin Madison 50 | Wyoming Cheyenne 51 | -------------------------------------------------------------------------------- /093-listmacusers.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # Simple script to list users in the Mac OS X NetInfo database 4 | # note that Mac OS X also has an /etc/passwd file, but that's 5 | # only used during the initial stages of boot time and for 6 | # recovery bootups. Otherwise, all data is in the NetInfo db. 7 | 8 | fields="" 9 | 10 | while getopts "Aahnprsu" opt ; do 11 | case $opt in 12 | A ) fields="uid passwd name realname home shell" ;; 13 | a ) fields="uid name realname home shell" ;; 14 | h ) fields="$fields home" ;; 15 | n ) fields="$fields name" ;; 16 | p ) fields="$fields passwd" ;; 17 | r ) fields="$fields realname" ;; 18 | s ) fields="$fields shell" ;; 19 | u ) fields="$fields uid" ;; 20 | ? ) cat << EOF >&2 21 | Usage: $0 [A|a|hnprsu] 22 | Where: 23 | -A output all known NetInfo user fields 24 | -a output only the interesting user fields 25 | -h show home directories of accounts 26 | -n show account names 27 | -p passwd (encrypted) 28 | -r show realname/fullname values 29 | -s show login shell 30 | -u uid 31 | EOF 32 | exit 1 33 | esac 34 | done 35 | 36 | exec nireport . /users ${fields:=uid name realname home shell} 37 | -------------------------------------------------------------------------------- /030-agenda.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # agenda - scan through the user's .agenda file to see if there 4 | # are any matches for the current or next day 5 | 6 | agendafile="$HOME/.agenda" 7 | 8 | checkDate() 9 | { 10 | # create the possible default values that'll match today 11 | weekday=$1 day=$2 month=$3 year=$4 12 | format1="$weekday" format2="$day$month" format3="$day$month$year" 13 | 14 | # and step through the file comparing dates... 15 | 16 | IFS="|" # The reads will naturally split at the IFS 17 | 18 | echo "On the Agenda for today:" 19 | 20 | while read date description ; do 21 | if [ "$date" = "$format1" -o "$date" = "$format2" -o "$date" = "$format3" ] 22 | then 23 | echo " $description" 24 | fi 25 | done < $agendafile 26 | } 27 | 28 | if [ ! -e $agendafile ] ; then 29 | echo "$0: You don't seem to have an .agenda file. " >&2 30 | echo "To remedy this, please use 'addagenda' to add events" >&2 31 | exit 1 32 | fi 33 | 34 | # now let's get today's date... 35 | 36 | eval $(date "+weekday=\"%a\" month=\"%b\" day=\"%e\" year=\"%G\"") 37 | 38 | day="$(echo $day|sed 's/ //g')" # remove possible leading space 39 | 40 | checkDate $weekday $day $month $year 41 | 42 | exit 0 43 | -------------------------------------------------------------------------------- /083-ssync.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # ssync - If anything's changed, Create a tarball and sync a remote 4 | # directory via sftp using sftpsync. 5 | 6 | sftpacct="taylor@intuitive.com" 7 | tarballname="AllFiles.tgz" 8 | localsource="$HOME/scripts" 9 | remotedir="shellhacks/scripts" 10 | timestamp=".timestamp" 11 | 12 | sftpsync="$HOME/scripts/sftpsync" 13 | 14 | # first off, let's see if the local dir exists and has files. 15 | 16 | if [ ! -d $localsource ] ; then 17 | echo "$0: Error: directory $localsource doesn't exist?" >&2 18 | exit 1 19 | fi 20 | 21 | cd $localsource 22 | 23 | # now let's count files to ensure something's changed: 24 | 25 | if [ ! -f $timestamp ] ; then 26 | for filename in * 27 | do 28 | if [ -f "$filename" ] ; then 29 | count=$(( $count + 1 )) 30 | fi 31 | done 32 | else 33 | count=$(find . -newer $timestamp -type f -print | wc -l) 34 | fi 35 | 36 | if [ ${count:-0} -eq 0 ] ; then 37 | echo "$0: No files found in $localsource to sync with remote." >&2 38 | exit 0 39 | fi 40 | 41 | echo "Making tarball archive file for upload" 42 | 43 | tar -czf $tarballname ./* 44 | 45 | # Done! Now let's switch to the sftpsync script 46 | 47 | exec $sftpsync $sftpacct $remotedir 48 | 49 | -------------------------------------------------------------------------------- /021-findman.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # findman -- given a pattern and a man section, show all the matches 4 | # for that pattern from within all relevant man pages. 5 | 6 | match1="/tmp/$0.1.$$" 7 | matches="/tmp/$0.$$" 8 | manpagelist="" 9 | 10 | trap "rm -f $match1 $matches" EXIT 11 | 12 | case $# 13 | in 14 | 3 ) section="$1" cmdpat="$2" manpagepat="$3" ;; 15 | 2 ) section="" cmdpat="$1" manpagepat="$2" ;; 16 | * ) echo "Usage: $0 [section] cmdpattern manpagepattern" >&2 17 | exit 1 18 | esac 19 | 20 | if ! man -k "$cmdpat" | grep "($section" > $match1 ; then 21 | echo "No matches to pattern \"$cmdpat\". Try something broader?"; exit 1 22 | fi 23 | 24 | cut -d\( -f1 < $match1 > $matches # command names only 25 | cat /dev/null > $match1 # clear the file... 26 | 27 | for manpage in $(cat $matches) 28 | do 29 | manpagelist="$manpagelist $manpage" 30 | man $manpage | col -b | grep -i $manpagepat | \ 31 | sed "s/^/${manpage}: /" | tee -a $match1 32 | done 33 | 34 | if [ ! -s $match1 ] ; then 35 | cat << EOF 36 | Command pattern "$cmdpat" had matches, but within those there were no 37 | matches to your man page pattern "$manpagepat" found in that set. 38 | Man pages checked:$manpagelist 39 | EOF 40 | fi 41 | 42 | exit 0 43 | -------------------------------------------------------------------------------- /066-getexchrate.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # getexchrate - scrape the current currency exchange rates 4 | # from CNN's money and finance Web site. 5 | # 6 | # Without any flags, this grabs the exchange rate values if the 7 | # current information is more than 12 hours old. It also shows 8 | # success upon completion: something to take into account if 9 | # you run this from a cron job. 10 | 11 | url="http://money.cnn.com/markets/currencies/crosscurr.html" 12 | age="+720" # 12 hours, in minutes 13 | outf="/tmp/.exchangerate" 14 | 15 | # Do we need the new exchange rate values? Let's check to see: 16 | # if the file is less than 12 hours old, the find fails ... 17 | 18 | if [ -f $outf ] ; then 19 | if [ -z "$(find $outf -cmin $age -print)" ]; then 20 | echo "$0: exchange rate data is up-to-date." >&2 21 | exit 1 22 | fi 23 | fi 24 | 25 | # Actually get the latest exchange rates, translating into the 26 | # format required by the exchrate script. 27 | 28 | lynx -dump 'http://money.cnn.com/markets/currencies/crosscurr.html' | \ 29 | grep -E '(Japan|Euro|Can|UK)' | \ 30 | awk '{ if (NF == 5 ) { print $1"="$2} }' | \ 31 | tr '[:upper:]' '[:lower:]' | \ 32 | sed 's/dollar/cand/' > $outf 33 | 34 | echo "Success. Exchange rates updated at $(date)." 35 | 36 | exit 0 37 | -------------------------------------------------------------------------------- /010-filelock.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # filelock - a flexible file locking mechanism 4 | 5 | retries="10" # default number of retries: 10 6 | action="lock" # default action 7 | nullcmd="/bin/true" # null command for lockf 8 | 9 | while getopts "lur:" opt; do 10 | case $opt in 11 | l ) action="lock" ;; 12 | u ) action="unlock" ;; 13 | r ) retries="$OPTARG" ;; 14 | esac 15 | done 16 | shift $(($OPTIND - 1)) 17 | 18 | if [ $# -eq 0 ] ; then 19 | cat << EOF >&2 20 | Usage: $0 [-l|-u] [-r retries] lockfilename 21 | Where -l requests a lock (the default), -u requests an unlock, -r X 22 | specifies a maximum number of retries before it fails (default = $retries). 23 | EOF 24 | exit 1 25 | fi 26 | 27 | # ascertain whether we have lockf or lockfile system apps 28 | 29 | if [ -z "$(which lockfile | grep -v '^no ')" ] ; then 30 | echo "$0 failed: 'lockfile' utility not found in PATH." >&2 31 | exit 1 32 | fi 33 | 34 | if [ "$action" = "lock" ] ; then 35 | if ! lockfile -1 -r $retries "$1" 2> /dev/null; then 36 | echo "$0: Failed: Couldn't create lockfile in time" >&2 37 | exit 1 38 | fi 39 | else # action = unlock 40 | if [ ! -f "$1" ] ; then 41 | echo "$0: Warning: lockfile $1 doesn't exist to unlock" >&2 42 | exit 1 43 | fi 44 | rm -f "$1" 45 | fi 46 | 47 | exit 0 48 | -------------------------------------------------------------------------------- /043-slocate.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # slocate - Try to search the user's secure locate database for the 4 | # specified pattern. If none exists, output a warning and create 5 | # one. If secure locate db is empty, use system one instead. 6 | 7 | locatedb="/var/locate.db" 8 | slocatedb="$HOME/.slocatedb" 9 | 10 | if [ "$1" = "--explain" ] ; then 11 | cat << "EOF" >&2 12 | Warning: Secure locate keeps a private database for each user, and your 13 | database hasn't yet been created. Until it is (probably late tonight) 14 | I'll just use the public locate database, which will show you all 15 | publicly accessible matches, rather than those explicitly available to 16 | account ${USER:-$LOGNAME}. 17 | EOF 18 | if [ "$1" = "--explain" ] ; then 19 | exit 0 20 | fi 21 | 22 | # before we go, create a .slocatedb so that cron will fill it 23 | # the next time the mkslocatedb script is run 24 | 25 | touch $slocatedb # mkslocatedb will build it next time through 26 | chmod 600 $slocatedb # start on the right foot with permissions 27 | 28 | elif [ -s $slocatedb ] ; then 29 | locatedb=$slocatedb 30 | else 31 | echo "Warning: using public database. Use \"$0 --explain\" for details." >&2 32 | fi 33 | 34 | if [ -z "$1" ] ; then 35 | echo "Usage: $0 pattern" >&2; exit 1 36 | fi 37 | 38 | exec grep -i "$1" $locatedb 39 | -------------------------------------------------------------------------------- /020-DIR.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # DIR - pretend we're the DIR command in DOS and display the contents 3 | # of the specified file, accepting some of the standard DIR flags 4 | 5 | usage() 6 | { 7 | cat << EOF >&2 8 | Usage: $0 [DOS flags] directory or directories 9 | Where: 10 | /D sort by columns 11 | /H show help for this shell script 12 | /N show long listing format with filenames on right 13 | /OD sort by oldest to newest 14 | /O-D sort by newest to oldest 15 | /P pause after each screenful of information 16 | /Q show owner of the file 17 | /S recursive listing 18 | /W use wide listing format 19 | EOF 20 | exit 0 21 | } 22 | 23 | postcmd="" 24 | flags="" 25 | 26 | while [ $# -gt 0 ] 27 | do 28 | case $1 in 29 | /D ) flags="$flags -x" ;; 30 | /H ) usage ;; 31 | /[NQW] ) flags="$flags -l" ;; 32 | /OD ) flags="$flags -rt" ;; 33 | /O-D ) flags="$flags -t" ;; 34 | /P ) postcmd="more" ;; 35 | /S ) flags="$flags -s" ;; 36 | * ) # unknown flag: probably a dir specifier 37 | break; # so let's get outta the while loop 38 | esac 39 | shift # processed flag, let's see if there's another 40 | done 41 | 42 | # done processing flags, now the command itself: 43 | 44 | if [ ! -z "$postcmd" ] ; then 45 | ls $flags "$@" | $postcmd 46 | else 47 | ls $flags "$@" 48 | fi 49 | 50 | exit 0 51 | -------------------------------------------------------------------------------- /057-archivedir.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # archivedir - create a compressed archive of the specified directory 4 | 5 | maxarchivedir=10 # size, in blocks, of 'big' directory, to confirm 6 | compress=gzip # change to your favorite compress app 7 | progname=$(basename $0) 8 | 9 | if [ $# -eq 0 ] ; then 10 | echo "Usage: $progname directory" >&2 ;exit 1 11 | fi 12 | 13 | if [ ! -d $1 ] ; then 14 | echo "${progname}: can't find directory $1 to archive." >&2; exit 1 15 | fi 16 | 17 | if [ "$(basename $1)" != "$1" -o "$1" = "." ] ; then 18 | echo "${progname}: You must specify a subdirectory" >&2 19 | exit 1 20 | fi 21 | 22 | if [ ! -w . ] ; then 23 | echo "${progname}: cannot write archive file to current directory." >&2 24 | exit 1 25 | fi 26 | 27 | dirsize="$(du -s $1 | awk '{print $1}')" 28 | 29 | if [ $dirsize -gt $maxarchivedir ] ; then 30 | echo -n "Warning: directory $1 is $dirsize blocks. Proceed? [n] " 31 | read answer 32 | answer="$(echo $answer | tr '[:upper:]' '[:lower:]' | cut -c1)" 33 | if [ "$answer" != "y" ] ; then 34 | echo "${progname}: archive of directory $1 cancelled." >&2 35 | exit 0 36 | fi 37 | fi 38 | 39 | archivename="$(echo $1 | sed 's/$/.tgz/')" 40 | 41 | if tar cf - $1 | $compress > $archivename ; then 42 | echo "Directory $1 archived as $archivename" 43 | else 44 | echo "Warning: tar encountered errors archiving $1" 45 | fi 46 | 47 | exit 0 48 | -------------------------------------------------------------------------------- /079-webspell.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # webspell - use the 'aspell' feature + lynx to spell check either a 4 | # Web page URL or a file. 5 | 6 | # Inevitably you'll find that there are words it flags as wrong, but 7 | # you think are fine. Simply save them in a file, one-per-line, and 8 | # ensure that 'okaywords' points to that file. 9 | 10 | okaywords="$HOME/.okaywords" 11 | tempout="/tmp/webspell.$$" 12 | trap "/bin/rm -f $tempout" 0 13 | 14 | if [ $# -eq 0 ] ; then 15 | echo "Usage: webspell file|URL" >&2; exit 1 16 | fi 17 | 18 | for filename 19 | do 20 | if [ ! -f "$filename" -a "$(echo $filename|cut -c1-7)" != "http://" ] ; then 21 | continue; # picked up directory in '*' listing 22 | fi 23 | 24 | lynx -dump $filename | tr ' ' '\n' | sort -u | \ 25 | grep -vE "(^[^a-z]|')" | \ 26 | # adjust the following line to produce just a list of misspelled words 27 | ispell -a | awk '/^\&/ { print $2 }' | \ 28 | sort -u > $tempout 29 | 30 | if [ -r $okaywords ] ; then 31 | # if you have an okaywords file, screen okay words out 32 | grep -vif $okaywords < $tempout > ${tempout}.2 33 | mv ${tempout}.2 $tempout 34 | fi 35 | 36 | if [ -s $tempout ] ; then 37 | echo "Probable spelling errors: ${filename}" 38 | echo '-------' ; cat $tempout ; echo '=========' 39 | cat $tempout | paste - - - - | sed 's/^/ /' 40 | fi 41 | done 42 | 43 | exit 0 44 | -------------------------------------------------------------------------------- /040-diskhogs.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # DISKHOGS - Disk quota analysis tool for Unix, assumes all user 4 | # accounts are >= UID 100. Emails message to each violating user 5 | # and reports a summary to the screen 6 | 7 | MAXDISKUSAGE=20 8 | violators="/tmp/diskhogs0.$$" 9 | 10 | trap "/bin/rm -f $violators" 0 11 | 12 | for name in $(cut -d: -f1,3 /etc/passwd | awk -F: '$2 > 99 { print $1 }') 13 | do 14 | echo -n "$name " 15 | 16 | find / /usr /var /Users -user $name -xdev -type f -ls | \ 17 | awk '{ sum += $7 } END { print sum / (1024*1024) }' 18 | 19 | done | awk "\$2 > $MAXDISKUSAGE { print \$0 }" > $violators 20 | 21 | if [ ! -s $violators ] ; then 22 | echo "No users exceed the disk quota of ${MAXDISKUSAGE}MB" 23 | cat $violators 24 | exit 0 25 | fi 26 | 27 | while read account usage ; do 28 | 29 | cat << EOF | fmt | mail -s "Warning: $account Exceeds Quota" $account 30 | Your disk usage is ${usage}MB but you have only been allocated 31 | ${MAXDISKUSAGE}MB. This means that either you need to delete some of 32 | your files, compress your files (see 'gzip' or 'bzip2' for powerful and 33 | easy-to-use compression programs), or talk with us about increasing 34 | your disk allocation. 35 | 36 | Thanks for your cooperation on this matter. 37 | 38 | Dave Taylor @ x554 39 | EOF 40 | 41 | echo "Account $account has $usage MB of disk space. User notified." 42 | 43 | done < $violators 44 | 45 | exit 0 46 | -------------------------------------------------------------------------------- /075-counter.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # counter - a simple text-based page counter, with appropriate locking 4 | 5 | myhome="/home/taylor/web/wicked/examples" 6 | counter="$myhome/counter.dat" 7 | lockfile="$myhome/counter.lck" 8 | updatecounter="$myhome/updatecounter" 9 | 10 | # Note that this script is not intended to be called directly from 11 | # a web browser so it doesn't use the otherwise obligatory 12 | # content-type header material. 13 | 14 | # ascertain whether we have lockf or lockfile system apps 15 | 16 | if [ -z $(which lockf) ] ; then 17 | if [ -z $(which lockfile) ] ; then 18 | echo "(counter: no locking utility available)
    " 19 | exit 0 20 | else # proceed with the lockfile command 21 | if [ ! -f $counter ] ; then 22 | echo "0" # it'll be created shortly 23 | else 24 | cat $counter 25 | fi 26 | 27 | trap "/bin/rm -f $lockfile" 0 28 | 29 | lockfile -1 -l 10 -s 2 $lockfile 30 | if [ $? -ne 0 ] ; then 31 | echo "(counter: couldn't create lockfile in time)" 32 | exit 0 33 | fi 34 | $updatecounter $counter 35 | fi 36 | else 37 | if [ ! -f $counter ] ; then 38 | echo "0" # it'll be created shortly 39 | else 40 | cat $counter 41 | fi 42 | 43 | lockf -s -t 10 $lockfile $updatecounter $counter 44 | if [ $? -ne 0 ] ; then 45 | echo "(counter: couldn't create lockfile in time)" 46 | fi 47 | fi 48 | 49 | exit 0 50 | -------------------------------------------------------------------------------- /044-adduser.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # ADDUSER - add a new user to the system, including building their 4 | # home directory, copying in default config data, etc. 5 | # For a standard Unix/Linux system, not Mac OS X 6 | 7 | pwfile="/etc/passwd" shadowfile="/etc/shadow" 8 | gfile="/etc/group" 9 | hdir="/home" 10 | 11 | if [ "$(whoami)" != "root" ] ; then 12 | echo "Error: You must be root to run this command." >&2 13 | exit 1 14 | fi 15 | 16 | echo "Add new user account to $(hostname)" 17 | echo -n "login: " ; read login 18 | 19 | # adjust '5000' to match the top end of your user account namespace 20 | # because some system accounts have uid's like 65535 and similar. 21 | 22 | uid="$(awk -F: '{ if (big < $3 && $3 < 5000) big=$3 } END { print big + 1 }' $pwfile)" 23 | homedir=$hdir/$login 24 | 25 | # we are giving each user their own group, so gid=uid 26 | gid=$uid 27 | 28 | echo -n "full name: " ; read fullname 29 | echo -n "shell: " ; read shell 30 | 31 | echo "Setting up account $login for $fullname..." 32 | 33 | echo ${login}:x:${uid}:${gid}:${fullname}:${homedir}:$shell >> $pwfile 34 | echo ${login}:*:11647:0:99999:7::: >> $shadowfile 35 | 36 | echo "${login}:x:${gid}:$login" >> $gfile 37 | 38 | mkdir $homedir 39 | cp -R /etc/skel/.[a-zA-Z]* $homedir 40 | chmod 755 $homedir 41 | find $homedir -print | xargs chown ${login}:$login 42 | 43 | # setting an initial password 44 | passwd $login 45 | 46 | exit 0 47 | -------------------------------------------------------------------------------- /085-searchinfo.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # searchinfo - extract and analyze search engine traffic indicated in the 4 | # referrer field of a Common Log Format access log. 5 | 6 | host="intuitive.com" # change to your domain, as desired 7 | maxmatches=20 8 | count=0 9 | temp="/tmp/$(basename $0).$$" 10 | 11 | trap "/bin/rm -f $temp" 0 12 | 13 | if [ $# -eq 0 ] ; then 14 | echo "Usage: $(basename $0) logfile" >&2 15 | exit 1 16 | fi 17 | if [ ! -r "$1" ] ; then 18 | echo "Error: can't open file $1 for analysis." >&2 19 | exit 1 20 | fi 21 | 22 | for URL in $(awk '{ if (length($11) > 4) { print $11 } }' "$1" | \ 23 | grep -vE "(/www.$host|/$host)" | grep '?') 24 | do 25 | searchengine="$(echo $URL | cut -d/ -f3 | rev | cut -d. -f1-2 | rev)" 26 | args="$(echo $URL | cut -d\? -f2 | tr '&' '\n' | \ 27 | grep -E '(^q=|^sid=|^p=|query=|item=|ask=|name=|topic=)' | \ 28 | sed -e 's/+/ /g' -e 's/%20/ /g' -e 's/"//g' | cut -d= -f2)" 29 | 30 | if [ ! -z "$args" ] ; then 31 | echo "${searchengine}: $args" >> $temp 32 | else 33 | # no well-known match, show entire GET string instead... 34 | echo "${searchengine} $(echo $URL | cut -d\? -f2)" >> $temp 35 | fi 36 | count="$(( $count + 1 ))" 37 | done 38 | 39 | echo "Search engine referrer info extracted from ${1}:" 40 | 41 | sort $temp | uniq -c | sort -rn | head -$maxmatches | sed 's/^/ /g' 42 | 43 | echo "" 44 | echo Scanned $count entries in log file out of $(wc -l < "$1") total. 45 | 46 | exit 0 47 | -------------------------------------------------------------------------------- /011-colors.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # ANSI Color -- use these variables to easily have different color 4 | # and format output. Make sure to output the reset sequence after 5 | # colors (f = foreground, b = background), and use the 'off' 6 | # feature for anything you turn on. 7 | 8 | initializeANSI() 9 | { 10 | esc="" 11 | 12 | blackf="${esc}[30m"; redf="${esc}[31m"; greenf="${esc}[32m" 13 | yellowf="${esc}[33m" bluef="${esc}[34m"; purplef="${esc}[35m" 14 | cyanf="${esc}[36m"; whitef="${esc}[37m" 15 | 16 | blackb="${esc}[40m"; redb="${esc}[41m"; greenb="${esc}[42m" 17 | yellowb="${esc}[43m" blueb="${esc}[44m"; purpleb="${esc}[45m" 18 | cyanb="${esc}[46m"; whiteb="${esc}[47m" 19 | 20 | boldon="${esc}[1m"; boldoff="${esc}[22m" 21 | italicson="${esc}[3m"; italicsoff="${esc}[23m" 22 | ulon="${esc}[4m"; uloff="${esc}[24m" 23 | invon="${esc}[7m"; invoff="${esc}[27m" 24 | 25 | reset="${esc}[0m" 26 | } 27 | 28 | # note in this first use that switching colors doesn't require a reset 29 | # first - the new color overrides the old one. 30 | 31 | initializeANSI 32 | 33 | cat << EOF 34 | ${yellowf}This is a phrase in yellow${redb} and red${reset} 35 | ${boldon}This is bold${ulon} this is italics${reset} bye bye 36 | ${italicson}This is italics${italicsoff} and this is not 37 | ${ulon}This is ul${uloff} and this is not 38 | ${invon}This is inv${invoff} and this is not 39 | ${yellowf}${redb}Warning I${yellowb}${redf}Warning II${reset} 40 | EOF 41 | -------------------------------------------------------------------------------- /065-moviedata.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # moviedata - given a movie title, return a list of matches, if 4 | # there's more than one, or a synopsis of the movie if there's 5 | # just one. Uses the Internet Movie Database (imdb.com) 6 | 7 | imdburl="http://us.imdb.com/Tsearch?restrict=Movies+only&title=" 8 | titleurl="http://us.imdb.com/Title?" 9 | tempout="/tmp/moviedata.$$" 10 | 11 | summarize_film() 12 | { 13 | # produce an attractive synopsis of the film 14 | 15 | grep "^" $tempout | sed 's/<[^>]*>//g;s/(more)//' 16 | grep '<b class="ch">Plot Outline:</b>' $tempout | \ 17 | sed 's/<[^>]*>//g;s/(more)//;s/(view trailer)//' |fmt|sed 's/^/ /' 18 | exit 0 19 | } 20 | 21 | trap "rm -f $tempout" 0 1 15 22 | 23 | if [ $# -eq 0 ] ; then 24 | echo "Usage: $0 {movie title | movie ID}" >&2 25 | exit 1 26 | fi 27 | 28 | fixedname="$(echo $@ | tr ' ' '+')" # for the URL 29 | 30 | if [ $# -eq 1 ] ; then 31 | nodigits="$(echo $1 | sed 's/[[:digit:]]*//g')" 32 | if [ -z "$nodigits" ] ; then 33 | lynx -source "$titleurl$fixedname" > $tempout 34 | summarize_film 35 | fi 36 | fi 37 | 38 | url="$imdburl$fixedname" 39 | 40 | lynx -source $url > $tempout 41 | 42 | if [ ! -z "$(grep "IMDb title search" $tempout)" ] ; then 43 | grep 'HREF="/Title?' $tempout | \ 44 | sed 's/<OL><LI><A HREF="//;s/<\/A><\/LI>//;s/<LI><A HREF="//' | \ 45 | sed 's/">/ -- /;s/<.*//;s/\/Title?//' | \ 46 | sort -u | \ 47 | more 48 | else 49 | summarize_film 50 | fi 51 | 52 | exit 0 53 | -------------------------------------------------------------------------------- /083-sftpsync.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # sftpsync - Given a target directory on an sftp server, make sure that 4 | # all new or modified files are uploaded to the remote system. Uses 5 | # a timestamp file ingeniously called .timestamp to keep track. 6 | 7 | timestamp=".timestamp" 8 | tempfile="/tmp/sftpsync.$$" 9 | count=0 10 | 11 | trap "/bin/rm -f $tempfile" 0 1 15 # zap tempfile on exit &sigs 12 | 13 | if [ $# -eq 0 ] ; then 14 | echo "Usage: $0 user@host { remotedir }" >&2 15 | exit 1 16 | fi 17 | 18 | user="$(echo $1 | cut -d@ -f1)" 19 | server="$(echo $1 | cut -d@ -f2)" 20 | 21 | if [ $# -gt 1 ] ; then 22 | echo "cd $2" >> $tempfile 23 | fi 24 | 25 | if [ ! -f $timestamp ] ; then 26 | # no timestamp file, upload all files 27 | for filename in * 28 | do 29 | if [ -f "$filename" ] ; then 30 | echo "put -P \"$filename\"" >> $tempfile 31 | count=$(( $count + 1 )) 32 | fi 33 | done 34 | else 35 | for filename in $(find . -newer $timestamp -type f -print) 36 | do 37 | echo "put -P \"$filename\"" >> $tempfile 38 | count=$(( $count + 1 )) 39 | done 40 | fi 41 | 42 | if [ $count -eq 0 ] ; then 43 | echo "$0: No files require uploading to $server" >&2 44 | exit 1 45 | fi 46 | 47 | echo "quit" >> $tempfile 48 | 49 | echo "Synchronizing: Found $count files in local folder to upload." 50 | 51 | if ! sftp -b $tempfile "$user@$server" ; then 52 | echo "Done. All files synchronized up with $server" 53 | touch $timestamp 54 | fi 55 | 56 | exit 0 57 | -------------------------------------------------------------------------------- /003-normdate.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # normdate - Normalizes month field in date specification 3 | # to three letters, first letter capitalized. A helper 4 | # function for hack #7, validdate. Exits w/ zero if no error. 5 | 6 | monthnoToName() 7 | { 8 | # sets the variable 'month' to the appropriate value 9 | case $1 in 10 | 1 ) month="Jan" ;; 2 ) month="Feb" ;; 11 | 3 ) month="Mar" ;; 4 ) month="Apr" ;; 12 | 5 ) month="May" ;; 6 ) month="Jun" ;; 13 | 7 ) month="Jul" ;; 8 ) month="Aug" ;; 14 | 9 ) month="Sep" ;; 10) month="Oct" ;; 15 | 11) month="Nov" ;; 12) month="Dec" ;; 16 | * ) echo "$0: Unknown numeric month value $1" >&2; exit 1 17 | esac 18 | return 0 19 | } 20 | 21 | ## Begin main script 22 | 23 | if [ $# -eq 1 ] ; then # try to compensate for / or - formats 24 | set -- $(echo $1 | sed 's/[\/\-]/ /g') 25 | fi 26 | 27 | if [ $# -ne 3 ] ; then 28 | echo "Usage: $0 month day year" >&2 29 | echo "Typical input formats are August 3 1962 and 8 3 2002" >&2 30 | exit 1 31 | fi 32 | 33 | if [ $3 -lt 99 ] ; then 34 | echo "$0: expected four-digit year value." >&2; exit 1 35 | fi 36 | 37 | if [ -z $(echo $1|sed 's/[[:digit:]]//g') ]; then 38 | monthnoToName $1 39 | else 40 | # normalize to first three letters, first upper, rest lowercase 41 | month="$(echo $1|cut -c1|tr '[:lower:]' '[:upper:]')" 42 | month="$month$(echo $1|cut -c2-3 | tr '[:upper:]' '[:lower:]')" 43 | fi 44 | 45 | echo $month $2 $3 46 | 47 | exit 0 48 | -------------------------------------------------------------------------------- /028-convertatemp.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # CONVERTATEMP - Temperature conversion script that lets the user enter 4 | # a temperature in any of Fahrenheit, Celsius or Kelvin and receive the 5 | # equivalent temperature in the other two units as the output. 6 | 7 | if uname | grep 'SunOS'>/dev/null ; then 8 | echo "Yep, SunOS, let\'s fix this baby" 9 | PATH="/usr/xpg4/bin:$PATH" 10 | fi 11 | 12 | if [ $# -eq 0 ] ; then 13 | cat << EOF >&2 14 | Usage: $0 temperature[F|C|K] 15 | where the suffix: 16 | F indicates input is in Fahrenheit (default) 17 | C indicates input is in Celsius 18 | K indicates input is in Kelvin 19 | EOF 20 | exit 1 21 | fi 22 | 23 | unit="$(echo $1|sed -e 's/[-[[:digit:]]*//g' | tr '[:lower:]' '[:upper:]' )" 24 | temp="$(echo $1|sed -e 's/[^-[[:digit:]]*//g')" 25 | 26 | case ${unit:=F} 27 | in 28 | F ) # Fahrenheit to Celsius formula: Tc = (F -32 ) / 1.8 29 | farn="$temp" 30 | cels="$(echo "scale=2;($farn - 32) / 1.8" | bc)" 31 | kelv="$(echo "scale=2;$cels + 273.15" | bc)" 32 | ;; 33 | 34 | C ) # Celsius to Fahrenheit formula: Tf = (9/5)*Tc+32 35 | cels=$temp 36 | kelv="$(echo "scale=2;$cels + 273.15" | bc)" 37 | farn="$(echo "scale=2;((9/5) * $cels) + 32" | bc)" 38 | ;; 39 | 40 | K ) # Celsius = Kelvin + 273.15, then use Cels -> Fahr formula 41 | kelv=$temp 42 | cels="$(echo "scale=2; $kelv - 273.15" | bc)" 43 | farn="$(echo "scale=2; ((9/5) * $cels) + 32" | bc)" 44 | esac 45 | 46 | echo "Fahrenheit = $farn" 47 | echo "Celsius = $cels" 48 | echo "Kelvin = $kelv" 49 | 50 | exit 0 51 | -------------------------------------------------------------------------------- /081-ftpsyncup.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # ftpsyncup - Given a target directory on an ftp server, make sure that 4 | # all new or modified files are uploaded to the remote system. Uses 5 | # a timestamp file ingeniously called .timestamp to keep track. 6 | 7 | timestamp=".timestamp" 8 | tempfile="/tmp/ftpsyncup.$$" 9 | count=0 10 | 11 | trap "/bin/rm -f $tempfile" 0 1 15 # zap tempfile on exit &sigs 12 | 13 | if [ $# -eq 0 ] ; then 14 | echo "Usage: $0 user@host { remotedir }" >&2 15 | exit 1 16 | fi 17 | 18 | user="$(echo $1 | cut -d@ -f1)" 19 | server="$(echo $1 | cut -d@ -f2)" 20 | 21 | echo "open $server" > $tempfile 22 | echo "user $user" >> $tempfile 23 | 24 | if [ $# -gt 1 ] ; then 25 | echo "cd $2" >> $tempfile 26 | fi 27 | 28 | if [ ! -f $timestamp ] ; then 29 | # no timestamp file, upload all files 30 | for filename in * 31 | do 32 | if [ -f "$filename" ] ; then 33 | echo "put \"$filename\"" >> $tempfile 34 | count=$(( $count + 1 )) 35 | fi 36 | done 37 | else 38 | for filename in $(find . -newer $timestamp -type f -print) 39 | do 40 | echo "put \"$filename\"" >> $tempfile 41 | count=$(( $count + 1 )) 42 | done 43 | fi 44 | 45 | if [ $count -eq 0 ] ; then 46 | echo "$0: No files require uploading to $server" >&2 47 | exit 0 48 | fi 49 | 50 | echo "quit" >> $tempfile 51 | 52 | echo "Synchronizing: Found $count files in local folder to upload." 53 | 54 | if ! ftp -n < $tempfile ; then 55 | echo "Done. All files synchronized up with $server" 56 | touch $timestamp 57 | fi 58 | 59 | exit 0 60 | -------------------------------------------------------------------------------- /080-apm-footer.html: -------------------------------------------------------------------------------- 1 | <!-- footer information for APM system. --> 2 | 3 | <div style='margin-top: 10px;'> 4 | <table border='1' cellpadding='2' cellspacing='0' width="80%"> 5 | <tr><th colspan='4' bgcolor='#cccccc'>Password Manager Actions</th></tr> 6 | <tr><td> 7 | <form method="get" action="--myname--"> 8 | <table border='0'> 9 | <tr><td><input type='hidden' name="a" value="A"> 10 | add user:</td><td><input type='text' name='u' size='10'> 11 | </td></tr><tr><td> 12 | password: </td><td> <input type='text' name='p' size='10'> 13 | <input type='submit' value='+'> 14 | </td></tr> 15 | </table></form> 16 | </td><td> 17 | <form method="get" action="--myname--"> 18 | <table border='0'> 19 | <tr><td><input type='hidden' name="a" value="U"> 20 | update</td><td><select name='u'>--options--</select> 21 | </td></tr><tr><td> 22 | password: </td><td><input type='text' name='p' size='10'> 23 | <input type='submit' value='@'> 24 | </td></tr> 25 | </table></form> 26 | </td><td> 27 | <form method="get" action="--myname--"><input type='hidden' 28 | name="a" value="D">delete <select name='u'> --options-- </select> 29 | <input type='submit' value='-'> </form> 30 | </td><td> 31 | <form method="get" action="--myname--"><input type='hidden' 32 | name="a" value="L"><input type='submit' value='list all users'> 33 | </form> 34 | </td></tr> 35 | </table> 36 | </div> 37 | 38 | <h5 style='background:#ccf'>From the book <a href="http://www.intuitive.com/wicked/"> 39 | Wicked Cool Shell Scripts</a></h5> 40 | 41 | </body> 42 | </html> 43 | -------------------------------------------------------------------------------- /005-validint.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # validint - validate integer input, allow negative ints too 3 | 4 | validint() 5 | { 6 | # validate first field. Optionally test against min value $2 and/or 7 | # max value $3: if you'd rather skip these tests, send "" as values. 8 | # returns 1 for error, 0 for success. 9 | 10 | number="$1"; min="$2"; max="$3" 11 | 12 | if [ -z $number ] ; then 13 | echo "You didn't enter anything. Unacceptable." >&2 ; return 1 14 | fi 15 | 16 | if [ "${number%${number#?}}" = "-" ] ; then # first char '-' ? 17 | testvalue="${number#?}" # all but first character 18 | else 19 | testvalue="$number" 20 | fi 21 | 22 | nodigits="$(echo $testvalue | sed 's/[[:digit:]]//g')" 23 | 24 | if [ ! -z $nodigits ] ; then 25 | echo "Invalid number format! Only digits, no commas, spaces, etc." >&2 26 | return 1 27 | fi 28 | 29 | if [ ! -z $min ] ; then 30 | if [ "$number" -lt "$min" ] ; then 31 | echo "Your value is too small: smallest acceptable value is $min" >&2 32 | return 1 33 | fi 34 | fi 35 | if [ ! -z $max ] ; then 36 | if [ "$number" -gt "$max" ] ; then 37 | echo "Your value is too big: largest acceptable value is $max" >&2 38 | return 1 39 | fi 40 | fi 41 | return 0 42 | } 43 | 44 | # uncomment these lines to test, but beware that it'll break Hack #6 45 | # because Hack #6 wants to source this file to get the validint() 46 | # function. :-) 47 | 48 | # if validint "$1" "$2" "$3" ; then 49 | # echo "That input is a valid integer value within your constraints" 50 | # fi 51 | -------------------------------------------------------------------------------- /101-states.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # states - a state capital guessing game. Requires the state capitals 4 | # datafile at http://www.intuitive.com/wicked/examples/state.capitals.txt 5 | 6 | db="/usr/lib/games/state.capitals.txt" 7 | randomquote="$HOME/bin/randomquote.sh" 8 | 9 | if [ ! -r $db ] ; then 10 | echo "$0: Can't open $db for reading." >&2 11 | echo "(online at http://www.intuitive.com/wicked/examples/state.capitals.txt" >&2 12 | echo "save the file as $db and you're ready to play!)" >&2 13 | exit 1 14 | fi 15 | 16 | guesses=0; correct=0; total=0 17 | 18 | while [ "$guess" != "quit" ] ; do 19 | 20 | thiskey="$($randomquote $db)" 21 | 22 | state="$(echo $thiskey | cut -d\ -f1 | sed 's/-/ /g')" 23 | city="$(echo $thiskey | cut -d\ -f2 | sed 's/-/ /g')" 24 | match="$(echo $city | tr '[:upper:]' '[:lower:]')" 25 | 26 | guess="??" ; total=$(( $total + 1 )) ; 27 | 28 | echo "" 29 | echo "What city is the capital of $state?" 30 | 31 | while [ "$guess" != "$match" -a "$guess" != "next" -a "$guess" != "quit" ] 32 | do 33 | echo -n "Answer: " 34 | read guess 35 | 36 | if [ "$guess" = "$match" -o "$guess" = "$city" ] ; then 37 | echo "" 38 | echo "*** Absolutely correct! Well done! ***" 39 | correct=$(( $correct + 1 )) 40 | guess=$match 41 | elif [ "$guess" = "next" -o "$guess" = "quit" ] ; then 42 | echo "" 43 | echo "$city is the capital of $state." 44 | else 45 | echo "I'm afraid that's not correct." 46 | fi 47 | done 48 | 49 | done 50 | 51 | echo "You got $correct out of $total presented." 52 | exit 0 53 | -------------------------------------------------------------------------------- /098-open2.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # open2 - a smart wrapper for the cool Mac OS X 'open' command 4 | # to make it even more useful. By default, open launches the 5 | # appropriate application for a specified file or directory 6 | # based on the Aqua bindings, and has a limited ability to 7 | # launch applications if they're in the /Applications dir. 8 | 9 | # first off, whatever argument we're given, try it directly: 10 | 11 | open=/usr/bin/open 12 | 13 | if ! $open "$@" >/dev/null 2>&1 ; then 14 | if ! $open -a "$@" >/dev/null 2>&1 ; then 15 | 16 | # More than one arg? Don't know how to deal with it: quit 17 | if [ $# -gt 1 ] ; then 18 | echo "open: Can't figure out how to open or launch $@" >&2 19 | exit 1 20 | else 21 | case $(echo $1 | tr '[:upper:]' '[:lower:]') in 22 | acrobat ) app="Acrobat Reader" ;; 23 | adress* ) app="Address Book" ;; 24 | chat ) app="iChat" ;; 25 | cpu ) app="CPU Monitor" ;; 26 | dvd ) app="DVD Player" ;; 27 | excel ) app="Microsoft Excel" ;; 28 | netinfo ) app="NetInfo Manager" ;; 29 | prefs ) app="System Preferences" ;; 30 | print ) app="Print Center" ;; 31 | profil* ) app="Apple System Profiler" ;; 32 | qt|quicktime ) app="QuickTime Player" ;; 33 | sync ) app="iSync" ;; 34 | word ) app="Microsoft Word" ;; 35 | * ) echo "open: Don't know what to do with $1" >&2 36 | exit 1 37 | esac 38 | echo "You asked for $1 but I think you mean $app." >&2 39 | $open -a "$app" 40 | fi 41 | fi 42 | fi 43 | 44 | exit 0 45 | -------------------------------------------------------------------------------- /087-remotebackup.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # remotebackup - This script takes a list of files and directories, 4 | # builds a single archive, compressed, then emails it off to a 5 | # remote archive site for safekeeping. It's intended to be run 6 | # every night for critical user files, but not intended to 7 | # replace a more rigorous backup scheme. You should strongly 8 | # consider using 'unpacker' on the remote end too. 9 | 10 | uuencode="/usr/bin/uuencode" 11 | outfile="/tmp/rb.$$.tgz" 12 | outfname="backup.$(date +%y%m%d).tgz" 13 | infile="/tmp/rb.$$.in" 14 | 15 | trap "/bin/rm -f $outfile $infile" 0 16 | 17 | if [ $# -ne 2 -a $# -ne 3 ] ; then 18 | echo "Usage: $(basename $0) backup-file-list remoteaddr {targetdir}" >&2 19 | exit 1 20 | fi 21 | 22 | if [ ! -s "$1" ] ; then 23 | echo "Error: backup list $1 is empty or missing" >&2 24 | exit 1 25 | fi 26 | 27 | # Scan entries and build fixed infile list. This expands wildcards 28 | # and escapes spaces in filenames with a backslash, producing a 29 | # change: "this file" becomes this\ file so quotes are not needed. 30 | 31 | while read entry; do 32 | echo "$entry" | sed -e 's/ /\\ /g' >> $infile 33 | done < "$1" 34 | 35 | # The actual work of building the archive, encoding it, and sending it 36 | 37 | tar czf - $(cat $infile) | \ 38 | $uuencode $outfname | \ 39 | mail -s "${3:-Backup archive for $(date)}" "$2" 40 | 41 | echo "Done. $(basename $0) backed up the following files:" 42 | sed 's/^/ /' $infile 43 | echo -n "and mailed them to $2 " 44 | if [ ! -z "$3" ] ; then 45 | echo "with requested target directory $3" 46 | else 47 | echo "" 48 | fi 49 | 50 | exit 0 51 | -------------------------------------------------------------------------------- /036-cgrep.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # cgrep - grep with context display and highlighted pattern matches 4 | 5 | context=0 6 | esc="" 7 | bOn="${esc}[1m" bOff="${esc}[22m" 8 | sedscript="/tmp/cgrep.sed.$$" 9 | tempout="/tmp/cgrep.$$" 10 | 11 | showMatches() 12 | { 13 | matches=0 14 | 15 | echo "s/$pattern/${bOn}$pattern${bOff}/g" > $sedscript 16 | 17 | for lineno in $(grep -n "$pattern" $1 | cut -d: -f1) 18 | do 19 | if [ $context -gt 0 ] ; then 20 | prev="$(( $lineno - $context ))" 21 | if [ "$(echo $prev | cut -c1)" = "-" ] ; then 22 | prev="0" 23 | fi 24 | next="$(( $lineno + $context ))" 25 | 26 | if [ $matches -gt 0 ] ; then 27 | echo "${prev}i\\" >> $sedscript 28 | echo "----" >> $sedscript 29 | fi 30 | echo "${prev},${next}p" >> $sedscript 31 | else 32 | echo "${lineno}p" >> $sedscript 33 | fi 34 | matches="$(( $matches + 1 ))" 35 | done 36 | 37 | if [ $matches -gt 0 ] ; then 38 | sed -n -f $sedscript $1 | uniq | more 39 | fi 40 | } 41 | 42 | trap "/bin/rm -f $tempout $sedscript" EXIT 43 | 44 | if [ -z "$1" ] ; then 45 | echo "Usage: $0 [-c X] pattern {filename}" >&2; exit 0 46 | fi 47 | 48 | if [ "$1" = "-c" ] ; then 49 | context="$2" 50 | shift; shift 51 | elif [ "$(echo $1|cut -c1-2)" = "-c" ] ; then 52 | context="$(echo $1 | cut -c3-)" 53 | shift 54 | fi 55 | 56 | pattern="$1"; shift 57 | 58 | if [ $# -gt 0 ] ; then 59 | for filename ; do 60 | echo "----- $filename -----" 61 | showMatches $filename 62 | done 63 | else 64 | cat - > $tempout # save stream to a temp file 65 | showMatches $tempout 66 | fi 67 | 68 | exit 0 69 | -------------------------------------------------------------------------------- /001-inpath.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # inpath - verify that a specified program is either valid as-is, 3 | # or can be found in the PATH directory list. 4 | 5 | in_path() 6 | { 7 | # given a command and the PATH, try to find the command. Returns 8 | # 0 if found and executable, 1 if not. Note that this temporarily modifies 9 | # the the IFS (input field seperator), but restores it upon completion. 10 | 11 | cmd=$1 path=$2 retval=1 12 | oldIFS=$IFS IFS=":" 13 | 14 | for directory in $path 15 | do 16 | if [ -x $directory/$cmd ] ; then 17 | retval=0 # if we're here, we found $cmd in $directory 18 | fi 19 | done 20 | IFS=$oldIFS 21 | return $retval 22 | } 23 | 24 | checkForCmdInPath() 25 | { 26 | var=$1 27 | 28 | # The variable slicing notation in the following conditional 29 | # needs some explanation: ${var#expr} returns everything after 30 | # the match for 'expr' in the variable value (if any), and 31 | # ${var%expr} returns everything that doesn't match (in this 32 | # case just the very first character. You can also do this in 33 | # Bash with ${var:0:1} and you could use cut too: cut -c1 34 | 35 | if [ "$var" != "" ] ; then 36 | if [ "${var%${var#?}}" = "/" ] ; then 37 | if [ ! -x $var ] ; then 38 | return 1 39 | fi 40 | elif ! in_path $var $PATH ; then 41 | return 2 42 | fi 43 | fi 44 | } 45 | 46 | if [ $# -ne 1 ] ; then 47 | echo "Usage: $0 command" >&2 ; exit 1 48 | fi 49 | 50 | checkForCmdInPath "$1" 51 | case $? in 52 | 0 ) echo "$1 found in PATH" ;; 53 | 1 ) echo "$1 not found or not executable" ;; 54 | 2 ) echo "$1 not found in PATH" ;; 55 | esac 56 | 57 | exit 0 58 | -------------------------------------------------------------------------------- /045-suspenduser.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | ## Suspend - suspend a user account for the indefinite future 4 | 5 | homedir="/home" # home directory for users 6 | secs=10 # seconds before user is logged out 7 | 8 | if [ -z $1 ] ; then 9 | echo "Usage: $0 account" >&2 ; exit 1 10 | elif [ "$(whoami)" != "root" ] ; then 11 | echo "Error. You must be 'root' to run this command." >&2; exit 1 12 | fi 13 | 14 | echo "Please change account $1 password to something new." 15 | passwd $1 16 | 17 | # Now, let's see if they're logged in, and if so, boot 'em 18 | 19 | if [ ! -z $(who | grep $1) ] ; then 20 | 21 | tty="$(who | grep $1 | tail -1 | awk '{print $2}')" 22 | 23 | cat << "EOF" > /dev/$tty 24 | 25 | ************************************************************* 26 | URGENT NOTICE FROM THE ADMINISTRATOR: 27 | 28 | This account is being suspended at the request of management. 29 | You are going to be logged out in $secs seconds. Please immediately 30 | shut down any processes you have running and log out. 31 | 32 | If you have any questions, please contact your supervisor or 33 | John Doe, Director of Information Technology. 34 | ************************************************************* 35 | EOF 36 | 37 | echo "(Warned $1, now sleeping $secs seconds)" 38 | 39 | sleep $secs 40 | 41 | killall -s HUP -u $1 # send hangup sig to their processes 42 | sleep 1 # give it a second... 43 | killall -s KILL -u $1 # and kill anything left 44 | 45 | echo "$(date): $1 was logged in. Just logged them out." 46 | fi 47 | 48 | # Finally, let's close off their home directory from prying eyes: 49 | 50 | chmod 000 $homedir/$1 51 | 52 | echo "Account $1 has been suspended." 53 | 54 | exit 0 55 | -------------------------------------------------------------------------------- /015-newrm.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # newrm - a replacement for the existing rm command that allows a 4 | # rudimentary unremove capability through utilizing a newly created 5 | # directory in the user's home directory. It can handle directories 6 | # of content as well as individual files, and if the user specifies 7 | # the -f flag, files are NOT archived, but removed. 8 | 9 | # Big Important Warning: you'll want a cron job or similar to keep the 10 | # individual trash directories tamed, otherwise nothing will ever 11 | # actually be deleted on the system and you'll run out of disk space! 12 | 13 | mydir="$HOME/.deleted-files" 14 | realrm="/bin/rm " 15 | copy="/bin/cp -R" 16 | 17 | if [ $# -eq 0 ] ; then # let 'rm' ouptut the usage error 18 | exec $realrm # our shell dies and is replaced by /bin/rm 19 | fi 20 | 21 | # parse all options looking for '-f' 22 | 23 | flags="" 24 | 25 | while getopts "dfiPRrvW" opt 26 | do 27 | case $opt in 28 | f ) exec $realrm "$@" ;; # exec lets us exit this script directly. 29 | * ) flags="$flags -$opt" ;; # other flags are for 'rm', not us 30 | esac 31 | done 32 | shift $(( $OPTIND - 1 )) 33 | 34 | # make sure that the $mydir exists 35 | 36 | if [ ! -d $mydir ] ; then 37 | if [ ! -w $HOME ] ; then 38 | echo "$0 failed: can't create $mydir in $HOME" >&2 39 | exit 1 40 | fi 41 | mkdir $mydir 42 | chmod 700 $mydir # a little bit of privacy, please 43 | fi 44 | 45 | for arg 46 | do 47 | newname="$mydir/$(date "+%S.%M.%H.%d.%m").$(basename "$arg")" 48 | if [ -f "$arg" ] ; then 49 | $copy "$arg" "$newname" 50 | elif [ -d "$arg" ] ; then 51 | $copy "$arg" "$newname" 52 | fi 53 | done 54 | 55 | exec $realrm $flags "$@" # our shell is replaced by realrm 56 | -------------------------------------------------------------------------------- /043-mkslocate.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # mkslocatedb - build the central, public locate database as user nobody, 4 | # and simultaneously step through each home directory to find those 5 | # that contain a .slocatedb file. If found, an additional, private 6 | # version of the locate database will be created for that user. 7 | 8 | locatedb="/var/locate.db" 9 | slocatedb=".slocatedb" 10 | 11 | if [ "$(whoami)" != "root" ] ; then 12 | echo "$0: Error: You must be root to run this command." >&2 13 | exit 1 14 | fi 15 | 16 | if [ "$(grep '^nobody:' /etc/passwd)" = "" ] ; then 17 | echo "$0: Error: you must have an account for user 'nobody'" >&2 18 | echo "to create the default slocate database." >&2; exit 1 19 | fi 20 | 21 | cd / # sidestep post-su pwd permission problems 22 | 23 | # first, create or update the public database 24 | su -fm nobody -c "find / -print" > $locatedb 2>/dev/null 25 | echo "building default slocate database (user = nobody)" 26 | echo ... result is $(wc -l < $locatedb) lines long. 27 | 28 | 29 | # now step through the user accounts on the system to see who has 30 | # a $slocatedb file in their home directory.... 31 | 32 | for account in $(cut -d: -f1 /etc/passwd) 33 | do 34 | homedir="$(grep "^${account}:" /etc/passwd | cut -d: -f6)" 35 | 36 | if [ "$homedir" = "/" ] ; then 37 | continue # refuse to build one for root dir 38 | elif [ -e $homedir/$slocatedb ] ; then 39 | echo "building slocate database for user $account" 40 | su -fm $account -c "find / -print" > $homedir/$slocatedb \ 41 | 2>/dev/null 42 | chmod 600 $homedir/$slocatedb 43 | chown $account $homedir/$slocatedb 44 | echo ... result is $(wc -l < $homedir/$slocatedb) lines long. 45 | fi 46 | done 47 | 48 | exit 0 49 | -------------------------------------------------------------------------------- /sample.crontab: -------------------------------------------------------------------------------- 1 | # DO NOT EDIT THIS FILE - edit the master and reinstall. 2 | # (/tmp/crontab.4646 installed on Mon Dec 2 01:36:36 2002) 3 | # (Cron version -- $Id: crontab.c,v 2.13 1994/01/17 03:20:37 vixie Exp $) 4 | SHELL=/bin/bash 5 | PATH=/sbin:/bin:/usr/sbin:/usr/bin 6 | MAILTO=klauser@klauser.ch 7 | 8 | 1 * * * 5 /home/ACeSystem/sbin/inquiries_quality.pl 9 | 03,25 20 3-16 * * /home/ACeSystem/sbin/clean_news.pl 10 | 06 22 * * Mou /home/ACeSystem/bin/del_old_ACinventories.pl 11 | 08 22 * * 1-3,6 /home/ACeSystem/bin/dumpACinventories.pl 12 | 99 22 * * 1-3,6 /home/ACeSystem/bin/dump_cust_part_no.pl 13 | 25 22 * * 0-4 /home/ACeSystem/bin/files2ACinventories.pl 2>/dev/null 14 | ### 05 23 * * 0-4 /home/ACeSystem/bin/getACinventory.sh 15 | 05 23 * * 0-4 /home/ACeSystem/bin/getLaser.sh 16 | 50 23 * Oct * /home/ACeSystem/bin/examine_ACinventories.pl 17 | 18 | 19 | 20 | # DO NOT EDIT THIS FILE - edit the master and reinstall. 21 | # (/tmp/crontab.kmSWI17568 installed on Thu Jun 27 12:38:53 2002) 22 | # (Cron version -- $FreeBSD: src/usr.sbin/cron/crontab/crontab.c,v 1.11.2.1 1999/08/29 15:40:42 peter Exp $) 23 | #0 8,10,13 * * 1-5 /usr/home/rich/bldg400/check1e 24 | #10 8,10,13 * * 1-5 /usr/home/rich/bldg400/check1w 25 | #20 8,10,13 * * 1-5 /usr/home/rich/bldg400/check2e 26 | #30 8,10,13 * * 1-5 /usr/home/rich/bldg400/check2w 27 | #40 8,10,13 * * 1-5 /usr/home/rich/bldg400/check3e 28 | #50 8,10,13 * * 1-5 /usr/home/rich/bldg400/check3w 29 | #0 6-17 * * 1-5 /usr/home/rich/switch/checkit 30 | 0 6-17 * * 1-5 /usr/home/rich/switch/check/checkM 31 | 30 5 * * 1-5 /usr/home/rich/switch/check/checkB 32 | 30 11 * * 1-5 /usr/home/rich/switch/check/checkR 33 | 0,5,10,15,20,25,30,35,40,45,50,55 5-18 * * 1-5 /usr/home/rich/cisco/utils 34 | 55 4 * * 1-5 /usr/home/rich/cisco/mailit 35 | -------------------------------------------------------------------------------- /037-zcat.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # zcat, zmore, and zgrep - this script should be either symbolically 4 | # linked or hard linked to all three names - it allows users to work 5 | # with compressed files transparently. 6 | 7 | Z="compress"; unZ="uncompress" ; Zlist="" 8 | gz="gzip" ; ungz="gunzip" ; gzlist="" 9 | bz="bzip2" ; unbz="bunzip2" ; bzlist="" 10 | 11 | # First step is to try and isolate the filenames in the command line 12 | # we'll do this lazily by stepping through each argument testing to 13 | # see if it's a filename or not. If it is, and it has a compression 14 | # suffix, we'll uncompress the file, rewrite the filename, and proceed. 15 | # When done, we'll recompress everything that was uncompressed. 16 | 17 | for arg 18 | do 19 | if [ -f "$arg" ] ; then 20 | case $arg in 21 | *.Z) $unZ "$arg" 22 | arg="$(echo $arg | sed 's/\.Z$//')" 23 | Zlist="$Zlist \"$arg\"" 24 | ;; 25 | 26 | *.gz) $ungz "$arg" 27 | arg="$(echo $arg | sed 's/\.gz$//')" 28 | gzlist="$gzlist \"$arg\"" 29 | ;; 30 | 31 | *.bz2) $unbz "$arg" 32 | arg="$(echo $arg | sed 's/\.bz2$//')" 33 | bzlist="$bzlist \"$arg\"" 34 | ;; 35 | 36 | esac 37 | fi 38 | newargs="${newargs:-""} \"$arg\"" 39 | done 40 | 41 | case $0 in 42 | *zcat* ) eval cat $newargs ;; 43 | *zmore* ) eval more $newargs ;; 44 | *zgrep* ) eval grep $newargs ;; 45 | * ) echo "$0: unknown base name. Can't proceed." >&2; exit 1 46 | esac 47 | 48 | # now recompress everything 49 | 50 | if [ ! -z "$Zlist" ] ; then 51 | eval $Z $Zlist 52 | fi 53 | if [ ! -z "$gzlist" ] ; then 54 | eval $gz $gzlist 55 | fi 56 | if [ ! -z "$bzlist" ] ; then 57 | eval $bz $bzlist 58 | fi 59 | 60 | # and done 61 | 62 | exit 0 63 | -------------------------------------------------------------------------------- /006-validfloat.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # validfloat - test whether a number is a valid floating point value. 4 | # Note that this cannot accept scientific (1.304e5) notation. 5 | 6 | # To test whether an entered value is a valid floating point number, we 7 | # need to split the value at the decimal point, then test the first part 8 | # to see if it's a valid integer, then the second part to see if it's a 9 | # valid >=0 integer, so -30.5 is valid, but -30.-8 isn't. 10 | 11 | . 005-validint.sh # source the validint function 12 | 13 | validfloat() 14 | { 15 | fvalue="$1" 16 | 17 | if [ ! -z $(echo $fvalue | sed 's/[^.]//g') ] ; then 18 | 19 | decimalPart="$(echo $fvalue | cut -d. -f1)" 20 | fractionalPart="$(echo $fvalue | cut -d. -f2)" 21 | 22 | if [ ! -z $decimalPart ] ; then 23 | if ! validint "$decimalPart" "" "" ; then 24 | return 1 25 | fi 26 | fi 27 | 28 | if [ "${fractionalPart%${fractionalPart#?}}" = "-" ] ; then 29 | echo "Invalid floating point number: '-' not allowed \ 30 | after decimal point" >&2 31 | return 1 32 | fi 33 | if [ "$fractionalPart" != "" ] ; then 34 | if ! validint "$fractionalPart" "0" "" ; then 35 | return 1 36 | fi 37 | fi 38 | 39 | if [ "$decimalPart" = "-" -o -z $decimalPart ] ; then 40 | if [ -z $fractionalPart ] ; then 41 | echo "Invalid floating point format." >&2 ; return 1 42 | fi 43 | fi 44 | 45 | else 46 | if [ "$fvalue" = "-" ] ; then 47 | echo "Invalid floating point format." >&2 ; return 1 48 | fi 49 | 50 | if ! validint "$fvalue" "" "" ; then 51 | return 1 52 | fi 53 | fi 54 | 55 | return 0 56 | } 57 | 58 | if validfloat $1 ; then 59 | echo "$1 is a valid floating point value" 60 | fi 61 | 62 | exit 0 63 | -------------------------------------------------------------------------------- /064-checklibrary.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # check library - log in to the Boulder Public library computer 4 | # system and show the due date of everything checked out for 5 | # the specified user. A demonstration of how to work with the 6 | # method="post" form with lynx. 7 | 8 | lib1="http://nell.boulder.lib.co.us/patroninfo" 9 | lib2="items" 10 | libacctdb="$HOME/.library.account.info" 11 | postdata="/tmp/$(basename $0).$$" 12 | awkdata="/tmp/$(basename $0).awk.$$" 13 | 14 | # We need: name cardno recordno 15 | # Given the first, look for the other two in the libraryaccount database 16 | 17 | if [ $# -eq 0 ] ; then 18 | echo "Usage: $(basename $0) \"card holder\""; exit 0 19 | fi 20 | 21 | acctinfo="$(grep -i "$1" $libacctdb)" 22 | name="$(echo $acctinfo | cut -d: -f1 | sed 's/ /+/g')" 23 | cardno="$(echo $acctinfo | cut -d: -f2)" 24 | recordno="$(echo $acctinfo | cut -d: -f3)" 25 | 26 | if [ -z "$acctinfo" ] ; then 27 | echo "Problem: account \"$1\" not found in library account database." 28 | exit 1 29 | elif [ $(grep -i "$1" $libacctdb | wc -l) -gt 1 ] ; then 30 | echo "Problem: account \"$1\" matches more than one record in library db." 31 | exit 1 32 | elif [ -z "$cardno" -o -z "$recordno" ] ; then 33 | echo "Problem: card or record information corrupted in database." 34 | exit 1 35 | fi 36 | 37 | trap "/bin/rm -f $postdata $awkdata" 0 38 | 39 | cat << EOF > $postdata 40 | name=${name}&code=${cardno}&submit=Display+record+for+person+named+above 41 | EOF 42 | 43 | cat << "EOF" > $awkdata 44 | { if ( NR % 3 == 1) { title=$0 } 45 | if ( NR % 3 == 2) { print $0 "|" title } 46 | } 47 | EOF 48 | 49 | lynx -source -post-data "$lib1/$recordno/$lib2" < $postdata | \ 50 | grep -E '(^<td |name=\"renew)' | \ 51 | sed 's/<[^>]*>//g' | \ 52 | awk -f $awkdata | sort 53 | 54 | exit 0 55 | -------------------------------------------------------------------------------- /084-webaccess.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # webaccess - analyze an Apache-format access_log file, extracting 4 | # useful and interesting statistics 5 | 6 | bytes_in_gb=1048576 7 | scriptbc="$HOME/bin/scriptbc" 8 | nicenumber="$HOME/bin/nicenumber" 9 | host="intuitive.com" 10 | 11 | if [ $# -eq 0 -o ! -f "$1" ] ; then 12 | echo "Usage: $(basename $0) logfile" >&2 13 | exit 1 14 | fi 15 | 16 | firstdate="$(head -1 "$1" | awk '{print $4}' | sed 's/\[//')" 17 | lastdate="$(tail -1 "$1" | awk '{print $4}' | sed 's/\[//')" 18 | 19 | echo "Results of analyzing log file $1" 20 | echo "" 21 | echo " Start date: $(echo $firstdate|sed 's/:/ at /')" 22 | echo " End date: $(echo $lastdate|sed 's/:/ at /')" 23 | 24 | hits="$(wc -l < "$1" | sed 's/[^[:digit:]]//g')" 25 | 26 | echo " Hits: $($nicenumber $hits) (total accesses)" 27 | 28 | pages="$(grep -ivE '(.txt|.gif|.jpg|.png)' "$1" | wc -l | sed 's/[^[:digit:]]//g')" 29 | 30 | echo " Pageviews: $($nicenumber $pages) (hits minus graphics)" 31 | 32 | totalbytes="$(awk '{sum+=$10} END {print sum}' "$1")" 33 | 34 | echo -n " Transferred: $($nicenumber $totalbytes) bytes " 35 | 36 | if [ $totalbytes -gt $bytes_in_gb ] ; then 37 | echo "($($scriptbc $totalbytes / $bytes_in_gb) GB)" 38 | elif [ $totalbytes -gt 1024 ] ; then 39 | echo "($($scriptbc $totalbytes / 1024) MB)" 40 | else 41 | echo "" 42 | fi 43 | 44 | # now let's scrape the log file for some useful data: 45 | 46 | echo "" 47 | echo "The ten most popular pages were:" 48 | 49 | awk '{print $7}' "$1" | grep -ivE '(.gif|.jpg|.png)' | \ 50 | sed 's/\/$//g' | sort | \ 51 | uniq -c | sort -rn | head -10 52 | 53 | echo "" 54 | 55 | echo "The ten most common referrer URLs were:" 56 | 57 | awk '{print $11}' "$1" | \ 58 | grep -vE "(^"-"$|/www.$host|/$host)" | \ 59 | sort | uniq -c | sort -rn | head -10 60 | 61 | echo "" 62 | exit 0 63 | -------------------------------------------------------------------------------- /046-deleteuser.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | ## Delete - delete a user account without a trace... 4 | # Not for use with Mac OS X 5 | 6 | homedir="/home" 7 | pwfile="/etc/passwd" shadow="/etc/shadow" 8 | newpwfile="/etc/passwd.new" newshadow="/etc/shadow.new" 9 | suspend="echo suspending " 10 | locker="/etc/passwd.lock" 11 | 12 | if [ -z $1 ] ; then 13 | echo "Usage: $0 account" >&2; exit 1 14 | elif [ "$(whoami)" != "root" ] ; then 15 | echo "Error: you must be 'root' to run this command.">&2; exit 1 16 | fi 17 | 18 | # $suspend $1 # suspend their account while we do the dirty work 19 | 20 | uid="$(grep -E "^${1}:" $pwfile | cut -d: -f3)" 21 | 22 | if [ -z $uid ] ; then 23 | echo "Error: no account $1 found in $pwfile" >&2; exit 1 24 | fi 25 | 26 | # remove from the password and shadow files 27 | grep -vE "^${1}:" $pwfile > $newpwfile 28 | grep -vE "^${1}:" $shadow > $newshadow 29 | 30 | lockcmd="$(which lockfile)" # find it in the path 31 | if [ ! -z $lockcmd ] ; then # let's use the system lockfile 32 | eval $lockcmd -r 15 $locker 33 | else # ulp, let's do it ourselves 34 | while [ -e $locker ] ; do 35 | echo "waiting for the password file" ; sleep 1 36 | done 37 | touch $locker # created a file-based lock 38 | fi 39 | 40 | mv $newpwfile $pwfile 41 | mv $newshadow $shadow 42 | rm -f $locker # click! unlocked again 43 | 44 | chmod 644 $pwfile 45 | chmod 400 $shadow 46 | 47 | # now remove home directory and list anything left... 48 | rm -rf $homedir/$1 49 | 50 | echo "Files still left to remove (if any):" 51 | find / -uid $uid -print 2>/dev/null | sed 's/^/ /' 52 | 53 | echo "" 54 | echo "Account $1 (uid $uid) has been deleted, and their home directory " 55 | echo "($homedir/$1) has been removed." 56 | 57 | exit 0 58 | -------------------------------------------------------------------------------- /078-checkexternal.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # checkexternal - traverse all internal URLs on a Web site to build a 4 | # list of external references, then check each one to ascertain 5 | # which might be dead or otherwise broken. The -a flag forces the 6 | # script to list all matches, whether they're accessible or not: by 7 | # default only unreachable links are shown. 8 | 9 | lynx="/usr/local/bin/lynx" # might need to be tweaked 10 | listall=0; errors=0 # shortcut: two vars on one line! 11 | 12 | if [ "$1" = "-a" ] ; then 13 | listall=1; shift 14 | fi 15 | 16 | outfile="$(echo "$1" | cut -d/ -f3).external-errors" 17 | 18 | /bin/rm -f $outfile # clean it for new output 19 | 20 | trap "/bin/rm -f traverse*.errors reject*.dat traverse*.dat" 0 21 | 22 | if [ -z "$1" ] ; then 23 | echo "Usage: $(basename $0) [-a] URL" >&2 24 | exit 1 25 | fi 26 | 27 | # create the data files needed 28 | $lynx -traversal $1 > /dev/null; 29 | 30 | if [ -s "reject.dat" ] ; then 31 | # The following line has a trailing space after the backslash! 32 | echo -n $(sort -u reject.dat | wc -l) external links encountered 33 | echo \ in $(grep '^http' traverse.dat | wc -l) pages 34 | 35 | for URL in $(grep '^http:' reject.dat | sort -u) 36 | do 37 | if ! $lynx -dump $URL > /dev/null 2>&1 ; then 38 | echo "Failed : $URL" >> $outfile 39 | errors="$(( $errors + 1 ))" 40 | elif [ $listall -eq 1 ] ; then 41 | echo "Success: $URL" >> $outfile 42 | fi 43 | done 44 | 45 | if [ -s $outfile ] ; then 46 | cat $outfile 47 | echo "(A copy of this output has been saved in ${outfile})" 48 | elif [ $listall -eq 0 -a $errors -eq 0 ] ; then 49 | echo "No problems encountered." 50 | fi 51 | else 52 | echo -n "No external links encountered " 53 | echo in $(grep '^http' traverse.dat | wc -l) pages. 54 | fi 55 | 56 | exit 0 57 | -------------------------------------------------------------------------------- /056-backup.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # Backup - create either a full or incremental backup of a set of 4 | # defined directories on the system. By default, the output 5 | # file is saved in /tmp with a timestamped filename, compressed. 6 | # Otherwise, specify an output device (another disk, a removable). 7 | 8 | usageQuit() 9 | { 10 | cat << "EOF" >&2 11 | Usage: $0 [-o output] [-i|-f] [-n] 12 | -o lets you specify an alternative backup file/device 13 | -i is an incremental or -f is a full backup, and -n prevents 14 | updating the timestamp if an incremental backup is done. 15 | EOF 16 | exit 1 17 | } 18 | 19 | compress="bzip2" # change for your favorite compression app 20 | inclist="/tmp/backup.inclist.$(date +%d%m%y)" 21 | output="/tmp/backup.$(date +%d%m%y).bz2" 22 | tsfile="$HOME/.backup.timestamp" 23 | btype="incremental" # default to an incremental backup 24 | noinc=0 # and an update of the timestamp 25 | 26 | trap "/bin/rm -f $inclist" EXIT 27 | 28 | while getopts "o:ifn" opt; do 29 | case "$arg" in 30 | o ) output="$OPTARG"; ;; 31 | i ) btype="incremental"; ;; 32 | f ) btype="full"; ;; 33 | n ) noinc=1; ;; 34 | ? ) usageQuit ;; 35 | esac 36 | done 37 | 38 | shift $(( $OPTIND - 1 )) 39 | 40 | echo "Doing $btype backup, saving output to $output" 41 | 42 | timestamp="$(date +'%m%d%I%M')" 43 | 44 | if [ "$btype" = "incremental" ] ; then 45 | if [ ! -f $tsfile ] ; then 46 | echo "Error: can't do an incremental backup: no timestamp file" >&2 47 | exit 1 48 | fi 49 | find $HOME -depth -type f -newer $tsfile -user ${USER:-LOGNAME} | \ 50 | pax -w -x tar | $compress > $output 51 | failure="$?" 52 | else 53 | find $HOME -depth -type f -user ${USER:-LOGNAME} | \ 54 | pax -w -x tar | $compress > $output 55 | failure="$?" 56 | fi 57 | 58 | if [ "$noinc" = "0" -a "$failure" = "0" ] ; then 59 | touch -t $timestamp $tsfile 60 | fi 61 | 62 | exit 0 63 | -------------------------------------------------------------------------------- /004-nicenumber.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # nicenumber - given a number, show it with comma separated values 4 | # expects DD and TD to be instantiated. instantiates nicenum 5 | # or, if a second arg is specified, the output is echoed to stdout 6 | 7 | nicenumber() 8 | { 9 | # Note that we use the '.' as the decimal separator for parsing 10 | # the INPUT value to this script. The output value is as specified 11 | # by the user with the -d flag, if different from a '.' 12 | 13 | integer=$(echo $1 | cut -d. -f1) # left of the decimal 14 | decimal=$(echo $1 | cut -d. -f2) # right of the decimal 15 | 16 | if [ $decimal != $1 ]; then 17 | # there's a fractional part, let's include it. 18 | result="${DD:="."}$decimal" 19 | fi 20 | 21 | thousands=$integer 22 | 23 | while [ $thousands -gt 999 ]; do 24 | remainder=$(($thousands % 1000)) # three least significant digits 25 | 26 | while [ ${#remainder} -lt 3 ] ; do # force leading zeroes as needed 27 | remainder="0$remainder" 28 | done 29 | 30 | thousands=$(($thousands / 1000)) # to left of remainder, if any 31 | result="${TD:=","}${remainder}${result}" # builds right-to-left 32 | done 33 | 34 | nicenum="${thousands}${result}" 35 | if [ ! -z $2 ] ; then 36 | echo $nicenum 37 | fi 38 | } 39 | 40 | DD="." # decimal point delimiter, between integer & fractional value 41 | TD="," # thousands delimiter, separates every three digits 42 | 43 | while getopts "d:t:" opt; do 44 | case $opt in 45 | d ) DD="$OPTARG" ;; 46 | t ) TD="$OPTARG" ;; 47 | esac 48 | done 49 | 50 | shift $(($OPTIND - 1)) 51 | 52 | if [ $# -eq 0 ] ; then 53 | cat << "EOF" >&2 54 | Usage: $(basename $0) [-d c] [-t c] numeric value 55 | -d specifies the decimal point delimiter (default '.') 56 | -t specifies the thousands delimiter (default ',') 57 | EOF 58 | exit 1 59 | fi 60 | 61 | nicenumber $1 1 # second arg forces this to 'echo' output 62 | 63 | exit 0 64 | -------------------------------------------------------------------------------- /038-bestcompress.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # bestcompress - given a file, try compressing it with all the available 4 | # compression tools and keep the compressed file that's smallest, reporting 5 | # the result to the user. If '-a' isn't specified, it skips compressed 6 | # files in the input stream. 7 | 8 | Z="compress" 9 | gz="gzip" 10 | bz="bzip2" 11 | Zout="/tmp/bestcompress.$$.Z" 12 | gzout="/tmp/bestcompress.$$.gz" 13 | bzout="/tmp/bestcompress.$$.bz" 14 | skipcompressed=1 15 | 16 | if [ "$1" = "-a" ] ; then 17 | skipcompressed=0 ; shift 18 | fi 19 | 20 | if [ $# -eq 0 ]; then 21 | echo "Usage: $0 [-a] file or files to optimally compress" >&2; exit 1 22 | fi 23 | 24 | trap "/bin/rm -f $Zout $gzout $bzout" EXIT 25 | 26 | for name 27 | do 28 | if [ ! -f "$name" ] ; then 29 | echo "$0: file $name not found. Skipped." >&2 30 | continue 31 | fi 32 | 33 | if [ "$(echo $name | egrep '(\.Z$|\.gz$|\.bz2$)')" != "" ] ; then 34 | if [ $skipcompressed -eq 1 ] ; then 35 | echo "Skipped file ${name}: it's already compressed." 36 | continue 37 | else 38 | echo "Warning: Trying to double-compress $name" 39 | fi 40 | fi 41 | 42 | $Z < "$name" > $Zout & 43 | $gz < "$name" > $gzout & 44 | $bz < "$name" > $bzout & 45 | 46 | wait # run compressions in parallel for speed. Wait until all are done 47 | 48 | smallest="$(ls -l "$name" $Zout $gzout $bzout | \ 49 | awk '{print $5"="NR}' | sort -n | cut -d= -f2 | head -1)" 50 | 51 | case "$smallest" in 52 | 1 ) echo "No space savings by compressing $name. Left as-is." 53 | ;; 54 | 2 ) echo Best compression is with compress. File renamed ${name}.Z 55 | mv $Zout "${name}.Z" ; rm -f "$name" 56 | ;; 57 | 3 ) echo Best compression is with gzip. File renamed ${name}.gz 58 | mv $gzout "${name}.gz" ; rm -f "$name" 59 | ;; 60 | 4 ) echo Best compression is with bzip2. File renamed ${name}.bz2 61 | mv $bzout "${name}.bz2" ; rm -f "$name" 62 | esac 63 | 64 | done 65 | 66 | exit 0 67 | -------------------------------------------------------------------------------- /052-killall.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # killall - send the specified signal to all processes that match a 4 | # specific process name 5 | 6 | # By default it only kills processes owned by the same user, unless 7 | # you're root. Use -s SIGNAL to specify a signal to send, -u user to 8 | # specify user, -t tty to specify a tty, and -n to only show what'd 9 | # be done rather than doing it 10 | 11 | signal="-INT" # default signal 12 | user="" tty="" donothing=0 13 | 14 | while getopts "s:u:t:n" opt; do 15 | case "$opt" in 16 | # note the trick below: kill wants -SIGNAL but we're asking 17 | # for SIGNAL, so we slip the '-' in as part of the assignment 18 | s ) signal="-$OPTARG"; ;; 19 | u ) if [ ! -z "$tty" ] ; then 20 | echo "$0: error: -u and -t are mutually exclusive." >&2 21 | exit 1 22 | fi 23 | user=$OPTARG; ;; 24 | t ) if [ ! -z "$user" ] ; then 25 | echo "$0: error: -u and -t are mutually exclusive." >&2 26 | exit 1 27 | fi 28 | tty=$2; ;; 29 | n ) donothing=1; ;; 30 | ? ) echo "Usage: $0 [-s signal] [-u user|-t tty] [-n] pattern" >&2 31 | exit 1 32 | esac 33 | done 34 | 35 | shift $(( $OPTIND - 1 )) 36 | 37 | if [ $# -eq 0 ] ; then 38 | echo "Usage: $0 [-s signal] [-u user|-t tty] [-n] pattern" >&2 39 | exit 1 40 | fi 41 | 42 | if [ ! -z "$tty" ] ; then 43 | pids=$(ps cu -t $tty | awk "/ $1$/ { print \$2 }") 44 | elif [ ! -z "$user" ] ; then 45 | pids=$(ps cu -U $user | awk "/ $1$/ { print \$2 }") 46 | else 47 | pids=$(ps cu -U ${USER:-LOGNAME} | awk "/ $1$/ { print \$2 }") 48 | fi 49 | 50 | if [ -z "$pids" ] ; then 51 | echo "$0: no processes match pattern $1" >&2; exit 1 52 | fi 53 | 54 | for pid in $pids 55 | do 56 | # Sending signal $signal to process id $pid: kill might 57 | # still complain if the process has finished, user doesn't 58 | # have permission, etc, but that's okay. 59 | if [ $donothing -eq 1 ] ; then 60 | echo "kill $signal $pid" 61 | else 62 | kill $signal $pid 63 | fi 64 | done 65 | 66 | exit 0 67 | -------------------------------------------------------------------------------- /066-exchangerate.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # exchangerate - given a currency amount, convert it into other major 4 | # currencies and show the equivalent amounts in each. 5 | 6 | # ref URL: http://www.ny.frb.org/pihome/statistics/forex12.shtml 7 | 8 | showrate() 9 | { 10 | dollars="$(echo $1 | cut -d. -f1)" 11 | cents="$(echo $1 | cut -d. -f2 | cut -c1-2)" 12 | rate="$dollars.${cents:-00}" 13 | } 14 | 15 | exchratefile="/tmp/.exchangerate" 16 | scriptbc="scriptbc -p 30" # tweak this setting as needed 17 | 18 | . $exchratefile 19 | 20 | # The 0.0000000001 compensates for a rounding error bug in 21 | # many versions of bc, where 1 != 0.99999999999999 22 | 23 | useuro="$($scriptbc 1 / $euro + 0.000000001)" 24 | uscand="$($scriptbc 1 / $canada + 0.000000001)" 25 | usyen="$($scriptbc 1 / $japan + 0.000000001)" 26 | uspound="$($scriptbc 1 / $uk + 0.000000001)" 27 | 28 | if [ $# -ne 2 ] ; then 29 | echo "Usage: $(basename $0) amount currency" 30 | echo "Where currency can be USD, Euro, Canadian, Yen, or Pound." 31 | exit 0 32 | fi 33 | 34 | amount=$1 35 | currency="$(echo $2 | tr '[:upper:]' '[:lower:]' | cut -c1-2)" 36 | 37 | case $currency in 38 | us|do ) if [ -z "$(echo $1 | grep '\.')" ] ; then 39 | masterrate="$1.00" 40 | else 41 | masterrate="$1" 42 | fi ;; 43 | eu ) masterrate="$($scriptbc $1 \* $euro)" ;; 44 | ca|cd ) masterrate="$($scriptbc $1 \* $canada)" ;; 45 | ye ) masterrate="$($scriptbc $1 \* $japan)" ;; 46 | po|st ) masterrate="$($scriptbc $1 \* $uk)" ;; 47 | * ) echo "$0: unknown currency specified." 48 | echo "I only know USD, EURO, CAND/CDN, YEN and GBP/POUND." 49 | exit 1 50 | esac 51 | 52 | echo "Currency Exchange Rate Equivalents for $1 ${2}:" 53 | showrate $masterrate 54 | echo " US Dollars: $rate" 55 | showrate $($scriptbc $masterrate \* $useuro) 56 | echo " EC Euros: $rate" 57 | showrate $($scriptbc $masterrate \* $uscand) 58 | echo "Canadian Dollars: $rate" 59 | showrate $($scriptbc $masterrate \* $usyen) 60 | echo " Japanese Yen: $rate" 61 | showrate $($scriptbc $masterrate \* $uspound) 62 | echo " British Pound: $rate" 63 | 64 | exit 0 65 | -------------------------------------------------------------------------------- /091-renicename.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # renicename - renice the job that matches the specified name. 4 | 5 | user=""; tty=""; showpid=0; niceval="+1" # initialize 6 | 7 | while getopts "n:u:t:p" opt; do 8 | case $opt in 9 | n ) niceval="$OPTARG"; ;; 10 | u ) if [ ! -z "$tty" ] ; then 11 | echo "$0: error: -u and -t are mutually exclusive." >&2 12 | exit 1 13 | fi 14 | user=$OPTARG ;; 15 | t ) if [ ! -z "$user" ] ; then 16 | echo "$0: error: -u and -t are mutually exclusive." >&2 17 | exit 1 18 | fi 19 | tty=$OPTARG ;; 20 | p ) showpid=1; ;; 21 | ? ) echo "Usage: $0 [-n niceval] [-u user|-t tty] [-p] pattern" >&2 22 | echo "Default niceval change is \"$niceval\" (plus is lower" >&2 23 | echo "priority, minus is higher, but only root can go below 0)" >&2 24 | exit 1 25 | esac 26 | done 27 | shift $(($OPTIND - 1)) # eat all the parsed arguments 28 | 29 | if [ $# -eq 0 ] ; then 30 | echo "Usage: $0 [-n niceval] [-u user|-t tty] [-p] pattern" >&2 31 | exit 1 32 | fi 33 | 34 | if [ ! -z "$tty" ] ; then 35 | pid=$(ps cu -t $tty | awk "/ $1/ { print \\$2 }") 36 | elif [ ! -z "$user" ] ; then 37 | pid=$(ps cu -U $user | awk "/ $1/ { print \\$2 }") 38 | else 39 | pid=$(ps cu -U ${USER:-LOGNAME} | awk "/ $1/ { print \$2 }") 40 | fi 41 | 42 | if [ -z "$pid" ] ; then 43 | echo "$0: no processes match pattern $1" >&2 ; exit 1 44 | elif [ ! -z "$(echo $pid | grep ' ')" ] ; then 45 | echo "$0: more than one process matches pattern ${1}:" 46 | if [ ! -z "$tty" ] ; then 47 | runme="ps cu -t $tty" 48 | elif [ ! -z "$user" ] ; then 49 | runme="ps cu -U $user" 50 | else 51 | runme="ps cu -U ${USER:-LOGNAME}" 52 | fi 53 | eval $runme | \ 54 | awk "/ $1/ { printf \" user %-8.8s pid %-6.6s job %s\n\", \ 55 | \$1,\$2,\$11 }" 56 | echo "Use -u user or -t tty to narrow down your selection criteria." 57 | elif [ $showpid -eq 1 ] ; then 58 | echo $pid 59 | else 60 | # ready to go: let's do it! 61 | echo -n "Renicing job \"" 62 | echo -n $(ps cp $pid | sed 's/ [ ]*/ /g' | tail -1 | cut -d\ -f5-) 63 | echo "\" ($pid)" 64 | renice $niceval $pid 65 | fi 66 | 67 | exit 0 68 | -------------------------------------------------------------------------------- /099-unscramble.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # unscramble - pick a word, scramble it, and ask the user to guess 4 | # what the original word (or phrase) was... 5 | 6 | wordlib="/usr/lib/games/long-words.txt" 7 | randomquote="$HOME/bin/randomquote.sh" 8 | 9 | scrambleword() 10 | { 11 | # pick a word randomly from the wordlib, and scramble it 12 | # Original word is 'match' and scrambled word is 'scrambled' 13 | 14 | match="$($randomquote $wordlib)" 15 | 16 | echo "Picked out a word!" 17 | 18 | len=$(echo $match | wc -c | sed 's/[^[:digit:]]//g') 19 | scrambled=""; lastval=1 20 | 21 | for (( val=1; $val < $len ; )) 22 | do 23 | if [ $(perl -e "print int rand(2)") -eq 1 ] ; then 24 | scrambled=$scrambled$(echo $match | cut -c$val) 25 | else 26 | scrambled=$(echo $match | cut -c$val)$scrambled 27 | fi 28 | val=$(( $val + 1 )) 29 | done 30 | } 31 | 32 | if [ ! -r $wordlib ] ; then 33 | echo "$0: Missing word library $wordlib" >&2 34 | echo "(online at http://www.intuitive.com/wicked/examples/long-words.txt" >&2 35 | echo "save the file as $wordlib and you're ready to play!)" >&2 36 | exit 1 37 | fi 38 | 39 | newgame=""; guesses=0; correct=0; total=0 40 | 41 | until [ "$guess" = "quit" ] ; do 42 | 43 | scrambleword 44 | 45 | echo "" 46 | echo "You need to unscramble: $scrambled" 47 | 48 | guess="??" ; guesses=0 49 | total=$(( $total + 1 )) 50 | 51 | while [ "$guess" != "$match" -a "$guess" != "quit" -a "$guess" != "next" ] 52 | do 53 | echo "" 54 | echo -n "Your guess (quit|next) : " 55 | read guess 56 | 57 | if [ "$guess" = "$match" ] ; then 58 | guesses=$(( $guesses + 1 )) 59 | echo "" 60 | echo "*** You got it with tries = ${guesses}! Well done!! ***" 61 | echo "" 62 | correct=$(( $correct + 1 )) 63 | elif [ "$guess" = "next" -o "$guess" = "quit" ] ; then 64 | echo "The unscrambled word was \"$match\". Your tries: $guesses" 65 | else 66 | echo "Nope. That's not the unscrambled word. Try again." 67 | guesses=$(( $guesses + 1 )) 68 | fi 69 | done 70 | done 71 | 72 | echo "Done. You correctly figured out $correct out of $total scrambled words." 73 | 74 | exit 0 75 | -------------------------------------------------------------------------------- /088-unpacker.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # unpacker - given an input stream with a uuencoded archive from 4 | # the remotearchive script, this unpacks and installs the archive. 5 | 6 | temp="/tmp/$(basename $0).$$" 7 | home="${HOME:-/usr/home/taylor}" 8 | mydir="$home/archive" 9 | webhome="/usr/home/taylor/web" 10 | 11 | notify="taylor@intuitive.com" 12 | 13 | ( cat - > $temp # shortcut to save stdin to a file 14 | 15 | target="$(grep "^Subject: " $temp | cut -d\ -f2-)" 16 | 17 | echo $(basename $0): Saved as $temp, with $(wc -l < $temp) lines 18 | echo "message subject=\"$target\"" 19 | 20 | # move into the temporary unpacking directory... 21 | 22 | if [ ! -d $mydir ] ; then 23 | echo "Warning: archive dir $mydir not found. Unpacking into $home" 24 | cd $home 25 | mydir=$home # for later use 26 | else 27 | cd $mydir 28 | fi 29 | 30 | # extract the resultant filename from the uuencoded file... 31 | 32 | fname="$(awk '/^begin / {print $3}' $temp)" 33 | 34 | uudecode $temp 35 | 36 | if [ ! -z "$(echo $target | grep 'Backup archive for')" ] ; then 37 | # all done. no further unpacking needed. 38 | echo "Saved archive as $mydir/$fname" 39 | exit 0 40 | fi 41 | 42 | # Otherwise, we have a uudecoded file and a target directory 43 | 44 | if [ "$(echo $target|cut -c1)" = "/" -o "$(echo $target|cut -c1-2)" = ".." ] 45 | then 46 | echo "Invalid target directory $target. Can't use '/' or '..'" 47 | exit 0 48 | fi 49 | 50 | targetdir="$webhome/$target" 51 | 52 | if [ ! -d $targetdir ] ; then 53 | echo "Invalid target directory $target. Can't find in $webhome" 54 | exit 0 55 | fi 56 | 57 | gunzip $fname 58 | fname="$(echo $fname | sed 's/.tgz$/.tar/g')" 59 | 60 | # are the tar archive filenames in a valid format? 61 | 62 | if [ ! -z "$(tar tf $fname | awk '{print $8}' | grep '^/')" ] ; then 63 | echo "Can't unpack archive: filenames are absolute." 64 | exit 0 65 | fi 66 | 67 | echo "" 68 | echo "Unpacking archive $fname into $targetdir" 69 | 70 | cd $targetdir 71 | tar xvf $mydir/$fname | sed 's/^/ /g' 72 | 73 | echo "done!" 74 | 75 | ) 2>&1 | mail -s "Unpacker output $(date)" $notify 76 | 77 | exit 0 78 | -------------------------------------------------------------------------------- /094-addmacuser.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # ADDUSER - add a new user to the system, including building their 4 | # home directory, copying in default config data, etc. 5 | # You can choose to have every user in their own group (which requires 6 | # a few tweaks) or use the default behavior of having everyone put 7 | # into the same group. Tweak dgroup and dgid to match your own config. 8 | 9 | dgroup="guest"; dgid=31 # default group and groupid 10 | hmdir="/Users" 11 | shell="uninitialized" 12 | 13 | if [ "$(/usr/bin/whoami)" != "root" ] ; then 14 | echo "$(basename $0): You must be root to run this command." >&2 15 | exit 1 16 | fi 17 | 18 | echo "Add new user account to $(hostname)" 19 | echo -n "login: " ; read login 20 | 21 | if nireport . /users name | sed 's/[^[:alnum:]]//g' | grep "^$login$" ; then 22 | echo "$0: You already have an account with name $login" >&2 23 | exit 1 24 | fi 25 | 26 | uid1="$(nireport . /users uid | sort -n | tail -1)" 27 | uid="$(( $uid1 + 1 ))" 28 | 29 | homedir=$hmdir/$login 30 | 31 | echo -n "full name: " ; read fullname 32 | 33 | until [ -z "$shell" -o -x "$shell" ] ; do 34 | echo -n "shell: " ; read shell 35 | done 36 | 37 | echo "Setting up account $login for $fullname..." 38 | echo "uid=$uid gid=$dgid shell=$shell home=$homedir" 39 | 40 | niutil -create . /users/$login 41 | niutil -createprop . /users/$login passwd 42 | niutil -createprop . /users/$login uid $uid 43 | niutil -createprop . /users/$login gid $dgid 44 | niutil -createprop . /users/$login realname "$fullname" 45 | niutil -createprop . /users/$login shell $shell 46 | niutil -createprop . /users/$login home $homedir 47 | 48 | niutil -createprop . /users/$login _shadow_passwd "" 49 | 50 | # adding them to the $dgroup group 51 | niutil -appendprop . /groups/$dgroup users $login 52 | 53 | if ! mkdir -m 755 $homedir ; then 54 | echo "$0: Failed making home directory $homedir" >&2 55 | echo "(created account in NetInfo database, though. Continue by hand)" >&2 56 | exit 1 57 | fi 58 | 59 | if [ -d /etc/skel ] ; then 60 | ditto /etc/skel/.[a-zA-Z]* $homedir 61 | else 62 | ditto "/System/Library/User Template/English.lproj" $homedir 63 | fi 64 | 65 | chown -R ${login}:$dgroup $homedir 66 | 67 | echo "Please enter an initial password for $login:" 68 | passwd $login 69 | 70 | echo "Done. Account set up and ready to use." 71 | exit 0 72 | -------------------------------------------------------------------------------- /013-guessword.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # guessword - a simple word guessing game a la hangman 3 | blank=".................." # must be longer than longest word 4 | 5 | getword() 6 | { 7 | case $(( $$ % 8 )) in 8 | 0 ) echo "pizzazz" ;; 1 ) echo "delicious" ;; 9 | 2 ) echo "gargantuan" ;; 3 ) echo "minaret" ;; 10 | 4 ) echo "paparazzi" ;; 5 ) echo "delinquent" ;; 11 | 6 ) echo "zither" ;; 7 ) echo "cuisine" ;; 12 | esac 13 | } 14 | 15 | addLetterToWord() 16 | { 17 | # This function replaces all '.' in template with guess 18 | # then updates remaining to be the number of empty slots left 19 | 20 | letter=1 21 | while [ $letter -le $letters ] ; do 22 | if [ "$(echo $word | cut -c$letter)" = "$guess" ] ; then 23 | before="$(( $letter - 1 ))"; after="$(( $letter + 1 ))" 24 | if [ $before -gt 0 ] ; then 25 | tbefore="$(echo $template | cut -c1-$before)" 26 | else 27 | tbefore="" 28 | fi 29 | if [ $after -gt $letters ] ; then 30 | template="$tbefore$guess" 31 | else 32 | template="$tbefore$guess$(echo $template | cut -c$after-$letters)" 33 | fi 34 | fi 35 | letter=$(( $letter + 1 )) 36 | done 37 | 38 | remaining=$(echo $template|sed 's/[^\.]//g'|wc -c|sed 's/[[:space:]]//g') 39 | remaining=$(( $remaining - 1 )) # fix to ignore '\n' 40 | } 41 | 42 | word=$(getword) 43 | letters=$(echo $word | wc -c | sed 's/[[:space:]]//g') 44 | letters=$(( $letters - 1 )) # fix character count to ignore \n 45 | template="$(echo $blank | cut -c1-$letters)" 46 | remaining=$letters ; guessed="" ; guesses=0; badguesses=0 47 | 48 | echo "** You're trying to guess a word with $letters letters **" 49 | 50 | while [ $remaining -gt 0 ] ; do 51 | echo -n "Word is: $template Try what letter next? " ; read guess 52 | guesses=$(( $guesses + 1 )) 53 | if echo $guessed | grep -i $guess > /dev/null ; then 54 | echo "You've already guessed that letter. Try again!" 55 | elif ! echo $word | grep -i $guess > /dev/null ; then 56 | echo "Sorry, the letter \"$guess\" is not in the word." 57 | guessed="$guessed$guess" 58 | badguesses=$(( $badguesses + 1 )) 59 | else 60 | echo "Good going! The letter $guess is in the word!" 61 | addLetterToWord $guess 62 | fi 63 | done 64 | 65 | echo -n "Congratulations! You guessed $word in $guesses guesses" 66 | echo " with $badguesses bad guesses" 67 | 68 | exit 0 69 | -------------------------------------------------------------------------------- /086-weberrors.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # weberrors - scan through an Apache error_log file and report the 4 | # most important errors, then list additional entries. 5 | 6 | temp="/tmp/$(basename $0).$$" 7 | 8 | # the following three lines will need to be customized for your own 9 | # installation for this script to work best. 10 | 11 | htdocs="/usr/local/etc/httpd/htdocs/" 12 | myhome="/usr/home/taylor/" 13 | cgibin="/usr/local/etc/httpd/cgi-bin/" 14 | 15 | sedstr="s/^/ /g;s|$htdocs|[htdocs] |;s|$myhome|[homedir] |;s|$cgibin|[cgi-bin] |" 16 | 17 | screen="(File does not exist|Invalid error redirect|premature EOF|Premature end of script|script not found)" 18 | 19 | length=5 # entries per category to display 20 | 21 | checkfor() 22 | { 23 | grep "${2}:" "$1" | awk '{print $NF}' |\ 24 | sort | uniq -c | sort -rn | head -$length | sed "$sedstr" > $temp 25 | 26 | if [ $(wc -l < $temp) -gt 0 ] ; then 27 | echo "" 28 | echo "$2 errors:" 29 | cat $temp 30 | fi 31 | } 32 | 33 | trap "/bin/rm -f $temp" 0 34 | 35 | if [ "$1" = "-l" ] ; then 36 | length=$2; shift 2 37 | fi 38 | 39 | if [ $# -ne 1 -o ! -r "$1" ] ; then 40 | echo "Usage: $(basename $0) [-l len] error_log" >&2 41 | exit 1 42 | fi 43 | 44 | echo Input file $1 has $(wc -l < "$1") entries. 45 | 46 | start="$(grep -E '\[.*:.*:.*\]' "$1" | head -1 | awk '{print $1" "$2" "$3" "$4" "$5 }')" 47 | end="$(grep -E '\[.*:.*:.*\]' "$1" | tail -1 | awk '{print $1" "$2" "$3" "$4" "$5 }')" 48 | echo -n "Entries from $start to $end" 49 | 50 | echo "" 51 | 52 | ### Check for various common and well-known errors: 53 | 54 | checkfor "$1" "File does not exist" 55 | checkfor "$1" "Invalid error redirection directive" 56 | checkfor "$1" "premature EOF" 57 | checkfor "$1" "script not found or unable to stat" 58 | checkfor "$1" "Premature end of script headers" 59 | 60 | grep -vE "$screen" "$1" | grep "\[error\]" | grep "\[client " | \ 61 | sed 's/\[error\]/\`/' | cut -d\` -f2 | cut -d\ -f4- | \ 62 | sort | uniq -c | sort -rn | sed 's/^/ /' | head -$length > $temp 63 | 64 | if [ $(wc -l < $temp) -gt 0 ] ; then 65 | echo "" 66 | echo "Additional error messages in log file:" 67 | cat $temp 68 | fi 69 | 70 | echo "" 71 | echo "And non-error messages occurring in the log file:" 72 | 73 | grep -vE "$screen" "$1" | grep -v "\[error\]" | \ 74 | sort | uniq -c | sort -rn | \ 75 | sed 's/^/ /' | head -$length 76 | 77 | exit 0 78 | -------------------------------------------------------------------------------- /068-changetrack.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # changetrack - track a given URL, and if it's changed since the last 4 | # visit, email the new page to the specified address. 5 | 6 | sitearchive="/tmp/changetrack" # can change as desired 7 | sendmail="/usr/sbin/sendmail" # might need to be tweaked! 8 | fromaddr="webscraper@intuitive.com" # change as desired 9 | 10 | if [ $# -ne 2 ] ; then 11 | echo "Usage: $(basename $0) url email" >&2 12 | exit 1 13 | fi 14 | 15 | if [ ! -d $sitearchive ] ; then 16 | if ! mkdir $sitearchive ; then 17 | echo "$(basename $0) failed: couldn't create $sitearchive." >&2 18 | exit 1 19 | fi 20 | chmod 777 $sitearchive # you might change this for privacy 21 | fi 22 | 23 | if [ "$(echo $1 | cut -c1-5)" != "http:" ] ; then 24 | echo "Please use fully qualified URLs (e.g. start with 'http://')" >&2 25 | exit 1 26 | fi 27 | 28 | fname="$(echo $1 | sed 's/http:\/\///g' | tr '/?&' '...')" 29 | baseurl="$(echo $1 | cut -d/ -f1-3)/" 30 | 31 | # Grab a copy of the Web page into an archive file. Note that we can 32 | # track changes by looking just at the content (e.g. '-dump', not 33 | # '-source'), so we can skip any HTML parsing ... 34 | 35 | lynx -dump "$1" | uniq > $sitearchive/${fname}.new 36 | 37 | if [ -f $sitearchive/$fname ] ; then 38 | # we've seen this site before, so compare the two with 'diff' 39 | if diff $sitearchive/$fname $sitearchive/${fname}.new > /dev/null ; then 40 | echo "Site $1 has changed since our last check." 41 | else 42 | rm -f $sitearchive/${fname}.new # nothing new... 43 | exit 0 # no change, we're outta here. 44 | fi 45 | else 46 | echo "Note: we've never seen this site before." 47 | fi 48 | 49 | # To get here, the site has changed and we need to send the contents 50 | # of the .new file to the user and replace the original with the .new 51 | # for the next invocation of the script. 52 | 53 | ( echo "Content-type: text/html" 54 | echo "From: $fromaddr (Web Site Change Tracker)" 55 | echo "Subject: Web Site $1 Has Changed" 56 | echo "To: $2" 57 | echo "" 58 | 59 | lynx -source $1 | \ 60 | sed -e "s|[sS][rR][cC]=\"|SRC=\"$baseurl|g" \ 61 | -e "s|[hH][rR][eE][fF]=\"|HREF=\"$baseurl|g" \ 62 | -e "s|$baseurl\/http:|http:|g" 63 | ) | cat # $sendmail -t 64 | 65 | # update the saved snapshot of the Web site 66 | 67 | mv $sitearchive/${fname}.new $sitearchive/$fname 68 | chmod 777 $sitearchive/$fname 69 | 70 | # and we're done. 71 | exit 0 72 | -------------------------------------------------------------------------------- /007-valid-date.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # valid-date - validate date, taking into account leap year rules 3 | 4 | normdate="./003-normdate.sh" # hack #3 for normalizing month name 5 | 6 | exceedsDaysInMonth() 7 | { 8 | # given a month name, return 0 if the specified day value is 9 | # less than or equal to the max days in the month, 1 otherwise 10 | 11 | case $(echo $1|tr '[:upper:]' '[:lower:]') in 12 | jan* ) days=31 ;; feb* ) days=28 ;; 13 | mar* ) days=31 ;; apr* ) days=30 ;; 14 | may* ) days=31 ;; jun* ) days=30 ;; 15 | jul* ) days=31 ;; aug* ) days=31 ;; 16 | sep* ) days=30 ;; oct* ) days=31 ;; 17 | nov* ) days=30 ;; dec* ) days=31 ;; 18 | * ) echo "$0: Unknown month name $1" >&2; exit 1 19 | esac 20 | 21 | if [ $2 -lt 1 -o $2 -gt $days ] ; then 22 | return 1 23 | else 24 | return 0 # all is well 25 | fi 26 | } 27 | 28 | isLeapYear() 29 | { 30 | # this function returns 0 if a leap year, 1 otherwise 31 | # The formula for checking whether a year is a leap year is: 32 | # 1. years divisible by four are leap years, unless.. 33 | # 2. years also divisible by 100 are not leap years, except... 34 | # 3. years divisible by 400 are leap years 35 | 36 | year=$1 37 | if [ "$((year % 4))" -ne 0 ] ; then 38 | return 1 # nope, not a leap year 39 | elif [ "$((year % 400))" -eq 0 ] ; then 40 | return 0 # yes, it's a leap year 41 | elif [ "$((year % 100))" -eq 0 ] ; then 42 | return 1 43 | else 44 | return 0 45 | fi 46 | } 47 | 48 | ## Begin main script 49 | 50 | if [ $# -ne 3 ] ; then 51 | echo "Usage: $0 month day year" >&2 52 | echo "Typical input formats are August 3 1962 and 8 3 2002" >&2 53 | exit 1 54 | fi 55 | 56 | # normalize date and split back out returned values 57 | 58 | newdate="$($normdate "$@")" 59 | 60 | if [ $? -eq 1 ] ; then 61 | exit 1 # error condition already reported by normdate 62 | fi 63 | 64 | month="$(echo $newdate | cut -d\ -f1)" 65 | day="$(echo $newdate | cut -d\ -f2)" 66 | year="$(echo $newdate | cut -d\ -f3)" 67 | 68 | # Now that we have a normalized date, let's check to see if the 69 | # day value is logical 70 | 71 | if ! exceedsDaysInMonth $month "$2" ; then 72 | if [ "$month" = "Feb" -a $2 -eq 29 ] ; then 73 | if ! isLeapYear $3 ; then 74 | echo "$0: $3 is not a leap year, so Feb doesn't have 29 days" >&2 75 | exit 1 76 | fi 77 | else 78 | echo "$0: bad day value: $month doesn't have $2 days" >&2 79 | exit 1 80 | fi 81 | fi 82 | 83 | echo "Valid date: $newdate" 84 | 85 | exit 0 86 | -------------------------------------------------------------------------------- /030-addagenda.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # addagenda - prompt the user to add a new event for the Agenda script 4 | 5 | agendafile="$HOME/.agenda" 6 | 7 | isDayName() 8 | { 9 | # return = 0 if all is well, 1 on error 10 | 11 | case $(echo $1 | tr '[[:upper:]]' '[[:lower:]]') in 12 | sun*|mon*|tue*|wed*|thu*|fri*|sat*) retval=0 ;; 13 | * ) retval=1 ;; 14 | esac 15 | return $retval 16 | } 17 | 18 | isMonthName() 19 | { 20 | case $(echo $1 | tr '[[:upper:]]' '[[:lower:]]') in 21 | jan*|feb*|mar*|apr*|may*|jun*) return 0 ;; 22 | jul*|aug*|sep*|oct*|nov*|dec*) return 0 ;; 23 | * ) return 1 ;; 24 | esac 25 | } 26 | 27 | normalize() 28 | { 29 | # return string with first char uppercase, next two lowercase 30 | echo -n $1 | cut -c1 | tr '[[:lower:]]' '[[:upper:]]' 31 | echo $1 | cut -c2-3| tr '[[:upper:]]' '[[:lower:]]' 32 | } 33 | 34 | if [ ! -w $HOME ] ; then 35 | echo "$0: cannot write in your home directory ($HOME)" >&2 36 | exit 1 37 | fi 38 | 39 | echo "Agenda: The Unix Reminder Service" 40 | echo -n "Date of event (day mon, day month year, or dayname): " 41 | read word1 word2 word3 junk 42 | 43 | if isDayName $word1 ; then 44 | if [ ! -z "$word2" ] ; then 45 | echo "Bad dayname format: just specify the day name by itself." >&2 46 | exit 1 47 | fi 48 | date="$(normalize $word1)" 49 | 50 | else 51 | 52 | if [ -z "$word2" ] ; then 53 | echo "Bad dayname format: unknown day name specified" >&2 54 | exit 1 55 | fi 56 | 57 | if [ ! -z "$(echo $word1|sed 's/[[:digit:]]//g')" ] ; then 58 | echo "Bad date format: please specify day first, by day number" >&2 59 | exit 1 60 | fi 61 | 62 | if [ "$word1" -lt 1 -o "$word1" -gt 31 ] ; then 63 | echo "Bad date format: day number can only be in range 1-31" >&2 64 | exit 1 65 | fi 66 | 67 | if ! isMonthName $word2 ; then 68 | echo "Bad date format: unknown month name specified." >&2 69 | exit 1 70 | fi 71 | 72 | word2="$(normalize $word2)" 73 | 74 | if [ -z "$word3" ] ; then 75 | date="$word1$word2" 76 | else 77 | if [ ! -z "$(echo $word3|sed 's/[[:digit:]]//g')" ] ; then 78 | echo "Bad date format: third field should be year." >&2 79 | exit 1 80 | elif [ $word3 -lt 2000 -o $word3 -gt 2500 ] ; then 81 | echo "Bad date format: year value should be 2000-2500" >&2 82 | exit 1 83 | fi 84 | date="$word1$word2$word3" 85 | fi 86 | fi 87 | 88 | echo -n "One line description: " 89 | read description 90 | 91 | # ready to write to datafile 92 | 93 | echo "$(echo $date|sed 's/ //g')|$description" >> $agendafile 94 | 95 | exit 0 96 | -------------------------------------------------------------------------------- /047-validator.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # VALIDATOR - Checks to ensure that all environment variables are valid 3 | # looks at SHELL, HOME, PATH, EDITOR, MAIL, and PAGER 4 | 5 | errors=0 6 | 7 | in_path() 8 | { 9 | # given a command and the PATH, try to find the command. Returns 10 | # 1 if found, 0 if not. Note that this temporarily modifies the 11 | # the IFS input field seperator, but restores it upon completion. 12 | cmd=$1 path=$2 retval=0 13 | 14 | oldIFS=$IFS; IFS=":" 15 | 16 | for directory in $path 17 | do 18 | if [ -x $directory/$cmd ] ; then 19 | retval=1 # if we're here, we found $cmd in $directory 20 | fi 21 | done 22 | IFS=$oldIFS 23 | return $retval 24 | } 25 | 26 | validate() 27 | { 28 | varname=$1 varvalue=$2 29 | 30 | if [ ! -z $varvalue ] ; then 31 | if [ "${varvalue%${varvalue#?}}" = "/" ] ; then 32 | if [ ! -x $varvalue ] ; then 33 | echo "** $varname set to $varvalue, but I cannot find executable." 34 | errors=$(( $errors + 1 )) 35 | fi 36 | else 37 | if in_path $varvalue $PATH ; then 38 | echo "** $varname set to $varvalue, but I cannot find it in PATH." 39 | errors=$(( $errors + 1 )) 40 | fi 41 | fi 42 | fi 43 | } 44 | 45 | ####### Beginning of actual shell script ####### 46 | 47 | if [ ! -x ${SHELL:?"Cannot proceed without SHELL being defined."} ] ; then 48 | echo "** SHELL set to $SHELL, but I cannot find that executable." 49 | errors=$(( $errors + 1 )) 50 | fi 51 | 52 | if [ ! -d ${HOME:?"You need to have your HOME set to your home directory"} ] 53 | then 54 | echo "** HOME set to $HOME, but it's not a directory." 55 | errors=$(( $errors + 1 )) 56 | fi 57 | 58 | # Our first interesting test: are all the paths in PATH valid? 59 | 60 | oldIFS=$IFS; IFS=":" # IFS is the field separator. We'll change to ':' 61 | 62 | for directory in $PATH 63 | do 64 | if [ ! -d $directory ] ; then 65 | echo "** PATH contains invalid directory $directory" 66 | errors=$(( $errors + 1 )) 67 | fi 68 | done 69 | 70 | IFS=$oldIFS # restore value for rest of script 71 | 72 | # The following can be undefined, and they can also be a progname, rather 73 | # than a fully qualified path. Add additional variables as necessary for 74 | # your site and user community. 75 | 76 | validate "EDITOR" $EDITOR 77 | validate "MAILER" $MAILER 78 | validate "PAGER" $PAGER 79 | 80 | # and, finally, a different ending depending on whether errors > 0 81 | 82 | if [ $errors -gt 0 ] ; then 83 | echo "Errors encountered. Please notify sysadmin for help." 84 | else 85 | echo "Your environment checks out fine." 86 | fi 87 | 88 | exit 0 89 | -------------------------------------------------------------------------------- /055-rotatelogs.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # rotatelogs - roll logfiles in /var/log for archival purposes. 4 | # uses a config file to allow customization of how frequently 5 | # each log should be rolled. That file is in 6 | # logfilename=duration 7 | # format, where duration is in days. If nothing is configured, 8 | # rotatelogs won't rotate more frequently than every seven days. 9 | 10 | logdir="/var/log" 11 | config="/var/log/rotatelogs.conf" 12 | mv="/bin/mv" 13 | default_duration=7 14 | count=0 15 | 16 | duration=$default_duration 17 | 18 | if [ ! -f $config ] ; then 19 | echo "$0: no config file found. Can't proceed." >&2; exit 1 20 | fi 21 | 22 | if [ ! -w $logdir -o ! -x $logdir ] ; then 23 | echo "$0: you don't have the appropriate permissions in $logdir" >&2 24 | exit 1 25 | fi 26 | 27 | cd $logdir 28 | 29 | # While we'd like to use ':digit:' with the find, many versions of 30 | # find don't support Posix character class identifiers, hence [0-9] 31 | 32 | for name in $(find . -type f -size +0c ! -name '*[0-9]*' \ 33 | ! -name '\.*' ! -name '*conf' -maxdepth 1 -print | sed 's/^\.\///') 34 | do 35 | 36 | count=$(( $count + 1 )) 37 | 38 | # grab this entry from the config file 39 | 40 | duration="$(grep "^${name}=" $config|cut -d= -f2)" 41 | 42 | if [ -z $duration ] ; then 43 | duration=$default_duration 44 | elif [ "$duration" = "0" ] ; then 45 | echo "Duration set to zero: skipping $name" 46 | continue 47 | fi 48 | 49 | back1="${name}.1"; back2="${name}.2"; 50 | back3="${name}.3"; back4="${name}.4"; 51 | 52 | # If the most recently rolled log file (back1) has been modified within 53 | # the specific quantum then it's not time to rotate it. 54 | 55 | if [ -f "$back1" ] ; then 56 | if [ -z $(find "$back1" -mtime +$duration -print 2>/dev/null) ] 57 | then 58 | echo "$name's most recent backup is more recent than $duration days: skipping" 59 | continue 60 | fi 61 | fi 62 | 63 | echo "Rotating log $name (using a $duration day schedule)" 64 | 65 | # rotate, starting with the oldest log 66 | if [ -f "$back3" ] ; then 67 | echo "... $back3 -> $back4" ; $mv -f "$back3" "$back4" 68 | fi 69 | if [ -f "$back2" ] ; then 70 | echo "... $back2 -> $back3" ; $mv -f "$back2" "$back3" 71 | fi 72 | if [ -f "$back1" ] ; then 73 | echo "... $back1 -> $back2" ; $mv -f "$back1" "$back2" 74 | fi 75 | if [ -f "$name" ] ; then 76 | echo "... $name -> $back1" ; $mv -f "$name" "$back1" 77 | fi 78 | touch "$name" 79 | chmod 0600 "$name" 80 | done 81 | 82 | if [ $count -eq 0 ] ; then 83 | echo "Nothing to do: no log files big enough or old enough to rotate" 84 | fi 85 | 86 | exit 0 87 | -------------------------------------------------------------------------------- /100-hangman.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # hangman - a rudimentary version of the hangman game. Instead of showing a 4 | # gradually embodied hanging man, this simply has a bad guess countdown. 5 | # You can optionally indicate steps from the gallows as the only arg. 6 | 7 | wordlib="/usr/lib/games/long-words.txt" 8 | randomquote="$HOME/bin/randomquote.sh" 9 | empty="\." # we need something for the sed [set] when $guessed="" 10 | games=0 11 | 12 | if [ ! -r $wordlib ] ; then 13 | echo "$0: Missing word library $wordlib" >&2 14 | echo "(online at http://www.intuitive.com/wicked/examples/long-words.txt" >&2 15 | echo "save the file as $wordlib and you're ready to play!)" >&2 16 | exit 1 17 | fi 18 | 19 | while [ "$guess" != "quit" ] ; do 20 | match="$($randomquote $wordlib)" # pick a new word from the library 21 | 22 | if [ $games -gt 0 ] ; then 23 | echo "" 24 | echo "*** New Game! ***" 25 | fi 26 | 27 | games="$(( $games + 1 ))" 28 | guessed="" ; guess="" ; bad=${1:-6} 29 | partial="$(echo $match | sed "s/[^$empty${guessed}]/-/g")" 30 | 31 | while [ "$guess" != "$match" -a "$guess" != "quit" ] ; do 32 | 33 | echo "" 34 | if [ ! -z "$guessed" ] ; then 35 | echo -n "guessed: $guessed, " 36 | fi 37 | echo "steps from gallows: $bad, word so far: $partial" 38 | 39 | echo -n "Guess a letter: " 40 | read guess 41 | echo "" 42 | 43 | if [ "$guess" = "$match" ] ; then 44 | echo "You got it!" 45 | elif [ "$guess" = "quit" ] ; then 46 | sleep 0 # this is a 'no op' to avoid an error message on 'quit' 47 | elif [ $(echo $guess | wc -c | sed 's/[^[:digit:]]//g') -ne 2 ] ; then 48 | echo "Uh oh: You can only guess a single letter at a time" 49 | elif [ ! -z "$(echo $guess | sed 's/[[:lower:]]//g')" ] ; then 50 | echo "Uh oh: Please only use lowercase letters for your guesses" 51 | elif [ -z "$(echo $guess | sed "s/[$empty$guessed]//g")" ] ; then 52 | echo "Uh oh: You have already tried $guess" 53 | elif [ "$(echo $match | sed "s/$guess/-/g")" != "$match" ] ; then 54 | guessed="$guessed$guess" 55 | partial="$(echo $match | sed "s/[^$empty${guessed}]/-/g")" 56 | if [ "$partial" = "$match" ] ; then 57 | echo "** You've been pardoned!! Well done! The word was \"$match\"." 58 | guess="$match" 59 | else 60 | echo "* Great! The letter \"$guess\" appears in the word!" 61 | fi 62 | elif [ $bad -eq 1 ] ; then 63 | echo "** Uh oh: you've run out of steps. You're on the platform.. and <SNAP!>" 64 | echo "** The word you were trying to guess was \"$match\"" 65 | guess="$match" 66 | else 67 | echo "* Nope, \"$guess\" does not appear in the word." 68 | guessed="$guessed$guess" 69 | bad=$(( $bad - 1 )) 70 | fi 71 | done 72 | done 73 | 74 | exit 0 75 | -------------------------------------------------------------------------------- /074-guestbook.cgi: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # guestbook - display the current guestbook entries, append a 4 | # simple form for visitors to add their own comments, and 5 | # accept and process new guest entries. Works with a separate 6 | # data file that actually contains the guest data. 7 | 8 | homedir=/home/taylor/web/wicked/examples 9 | guestbook="$homedir/guestbook.txt" 10 | tempfile="/tmp/guestbook.$$" 11 | sedtemp="/tmp/guestbook.sed.$$" 12 | 13 | trap "/bin/rm -f $tempfile $sedtemp" 0 14 | 15 | echo "Content-type: text/html" 16 | echo "" 17 | 18 | echo "<html><title>Guestbook for $(hostname)" 19 | echo "

    Guestbook for $(hostname)

    " 20 | 21 | if [ "$REQUEST_METHOD" = "POST" ] ; then 22 | 23 | cat - | tr '&+' '\n ' > $tempfile # save the input stream 24 | 25 | name="$(grep 'yourname=' $tempfile | cut -d= -f2)" 26 | email="$(grep 'email=' $tempfile | cut -d= -f2 | sed 's/%40/@/')" 27 | 28 | # Now, given a URL encoded string, decode some of the most important 29 | # punctuation (but not all punctuation!) 30 | 31 | cat << "EOF" > $sedtemp 32 | s/%2C/,/g;s/%21/!/g;s/%3F/?/g;s/%40/@/g;s/%23/#/g;s/%24/$/g 33 | s/%25/%/g;s/%26/\&/g;s/%28/(/g;s/%29/)/g;s/%2B/+/g;s/%3A/:/g 34 | s/%3B/;/g;s/%2F/\//g;s/%27/'/g;s/%22/"/g 35 | EOF 36 | 37 | comment="$(grep 'comment=' $tempfile | cut -d= -f2 | sed -f $sedtemp)" 38 | 39 | # sequences to look out for: %3C = < %3E = > %60 = ` 40 | 41 | if echo $name $email $comment | grep '%' ; then 42 | echo "

    Failed: illegal character or characters in input:" 43 | echo "Not saved.
    Please also note that no HTML is allowed.

    " 44 | elif [ ! -w $guestbook ] ; then 45 | echo "

    Sorry, can't write to the guestbook at this time.

    " 46 | else 47 | # all is well. Save it to the datafile! 48 | echo "$(date)|$name|$email|$comment" >> $guestbook 49 | chmod 777 $guestbook # ensure it's not locked out to webmaster 50 | fi 51 | fi 52 | 53 | # do we have a guestbook to work with? 54 | 55 | if [ -f $guestbook ] ; then 56 | echo "" 57 | 58 | while read line 59 | do 60 | date="$(echo $line | cut -d\| -f1)" 61 | name="$(echo $line | cut -d\| -f2)" 62 | email="$(echo $line | cut -d\| -f3)" 63 | comment="$(echo $line | cut -d\| -f4)" 64 | echo "" 65 | echo "" 66 | echo "" 68 | done < $guestbook 69 | 70 | echo "
    $name signed thusly:
    $comment
    Added $date" 67 | echo "
    " 71 | fi 72 | 73 | # input form... 74 | 75 | echo "
    " 76 | echo "Please feel free to sign our guestbook too:
    " 77 | echo "Your name:
    " 78 | echo "Your email address:
    " 79 | echo "And your comment:
    " 80 | echo "" 81 | echo "
    " 82 | echo "
    " 83 | 84 | echo "" 85 | 86 | exit 0 87 | -------------------------------------------------------------------------------- /089-xferlog.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # xferlog - analyze and summarize the FTP transfer log. A good doc 4 | # detailing the log format: http://aolserver.am.net/docs/2.3/ftp-ch4.htm 5 | 6 | stdxferlog="/var/log/xferlog" 7 | temp="/tmp/$(basename $0).$$" 8 | nicenum="$HOME/bin/nicenumber" 9 | 10 | trap "/bin/rm -f $temp" 0 11 | 12 | extract() 13 | { 14 | # called with $1 = desired accessmode, $2 = section name for output 15 | 16 | if [ ! -z "$(echo $accessmode | grep $1)" ] ; then 17 | 18 | echo "" ; echo "$2" 19 | 20 | if [ "$1" = "a" -o "$1" = "g" ] ; then 21 | echo " common account (entered password) values:" 22 | else 23 | echo " user accounts accessing server: " 24 | fi 25 | awk "\$13 == \"$1\" { print \$14 }" $log | sort | \ 26 | uniq -c | sort -rn | head -10 | sed 's/^/ /' 27 | 28 | awk "\$13 == \"$1\" && \$12 == \"o\" { print \$9 }" $log | sort | \ 29 | uniq -c | sort -rn | head -10 | sed 's/^/ /' > $temp 30 | if [ -s $temp ] ; then 31 | echo " files downloaded from server:" ; cat $temp 32 | fi 33 | 34 | awk "\$13 == \"$1\" && \$12 == \"i\" { print \$9 }" $log | sort | \ 35 | uniq -c | sort -rn | head -10 | sed 's/^/ /' > $temp 36 | 37 | if [ -s $temp ] ; then 38 | echo " files uploaded to server:" ; cat $temp 39 | fi 40 | fi 41 | } 42 | 43 | ###### the main script block 44 | 45 | case $# in 46 | 0 ) log=$stdxferlog ;; 47 | 1 ) log="$1" ;; 48 | * ) echo "Usage: $(basename $0) {xferlog name}" >&2 49 | exit 1 50 | esac 51 | 52 | if [ ! -r $log ] ; then 53 | echo "$(basename $0): can't read $log." >&2 54 | exit 1 55 | fi 56 | 57 | # Ascertain whether it's an abbreviated or standard ftp log file format. If 58 | # it's the abbreviated format, output some minimal statistical data and quit: 59 | # the format is too difficult to analyze in a short script, unfortunately. 60 | 61 | if [ ! -z $(awk '$6 == "get" { short=1 } END{ print short }' $log) ] ; then 62 | bytesin="$(awk 'BEGIN{sum=0} $6 == "get" {sum += $9} END{ print sum }' $log )" 63 | bytesout="$(awk 'BEGIN{sum=0} $6 == "put" {sum += $9} END{ print sum }' $log )" 64 | 65 | echo -n "Abbreviated ftpd xferlog from " 66 | echo -n $(head -1 $log | awk '{print $1, $2, $3 }') 67 | echo " to $(tail -1 $log | awk '{print $1, $2, $3}')" 68 | echo " bytes in: $($nicenum $bytesin)" 69 | echo " bytes out: $($nicenum $bytesout)" 70 | exit 0 71 | fi 72 | 73 | bytesin="$(awk 'BEGIN{sum=0} $12 == "i" {sum += $8} END{ print sum }' $log )" 74 | bytesout="$(awk 'BEGIN{sum=0} $12 == "o" {sum += $8} END{ print sum }' $log )" 75 | time="$(awk 'BEGIN{sum=0} {sum += $6} END{ print sum }' $log)" 76 | 77 | echo -n "Summary of xferlog from " 78 | echo -n $(head -1 $log | awk '{print $1, $2, $3, $4, $5 }') 79 | echo " to $(tail -1 $log | awk '{print $1, $2, $3, $4, $5}')" 80 | echo " bytes in: $($nicenum $bytesin)" 81 | echo " bytes out: $($nicenum $bytesout)" 82 | echo " transfer time: $time seconds" 83 | 84 | accessmode="$(awk '{print $13}' $log | sort -u)" 85 | 86 | extract "a" "Anonymous Access" 87 | extract "g" "Guest Account Access" 88 | extract "r" "Real User Account Access" 89 | 90 | exit 0 91 | -------------------------------------------------------------------------------- /022-timein.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # timein - show the current time in the specified timezone or 4 | # geographic zone. Without any argument, show UTC/GMT. Use 5 | # the word "list" to see a list of known geographic regions 6 | # Note that it's possible to match a zone directory (a region) 7 | # but that only timezone files are valid specifications. 8 | 9 | # Timezone database ref: http://www.twinsun.com/tz/tz-link.htm 10 | 11 | zonedir="/usr/share/zoneinfo" 12 | 13 | if [ ! -d $zonedir ] ; then 14 | echo "No timezone database at $zonedir." >&2 ; exit 1 15 | fi 16 | 17 | if [ -d "$zonedir/posix" ] ; then 18 | zonedir=$zonedir/posix # modern Linux systems 19 | fi 20 | 21 | if [ $# -eq 0 ] ; then 22 | timezone="UTC" 23 | mixedzone="UTC" 24 | elif [ "$1" = "list" ] ; then 25 | ( echo "All known timezones and regions defined on this system:" 26 | cd $zonedir 27 | find * -type f -print | xargs -n 2 | \ 28 | awk '{ printf " %-38s %-38s\n", $1, $2 }' 29 | ) | more 30 | exit 0 31 | else 32 | 33 | region="$(dirname $1)" 34 | zone="$(basename $1)" 35 | 36 | # Is it a direct match? If so, we're good to go. Otherwise we need 37 | # to dig around a bit to find things. Start by just counting matches 38 | 39 | matchcnt="$(find $zonedir -name $zone -type f -print | 40 | wc -l | sed 's/[^[:digit:]]//g' )" 41 | 42 | if [ "$matchcnt" -gt 0 ] ; then # at least one file matches 43 | if [ $matchcnt -gt 1 ] ; then # more than one file match 44 | echo "\"$zone\" matches more than one possible time zone record." >&2 45 | echo "Please use 'list' to see all known regions and timezones" >&2 46 | exit 1 47 | fi 48 | match="$(find $zonedir -name $zone -type f -print)" 49 | mixedzone="$zone" 50 | else 51 | # Normalize to first upper, rest of word lowercase for region + zone 52 | mixedregion="$(echo ${region%${region#?}} | tr '[[:lower:]]' '[[:upper:]]')\ 53 | $(echo ${region#?} | tr '[[:upper:]]' '[[:lower:]]')" 54 | mixedzone="$(echo ${zone%${zone#?}} | tr '[[:lower:]]' '[[:upper:]]')\ 55 | $(echo ${zone#?} | tr '[[:upper:]]' '[[:lower:]]')" 56 | 57 | if [ "$mixedregion" != "." ] ; then 58 | # only look for specified zone in specified region 59 | # to let users specify unique matches when there's more than one 60 | # possibility (e.g., "Atlantic") 61 | match="$(find $zonedir/$mixedregion -type f -name $mixedzone -print)" 62 | else 63 | match="$(find $zonedir -name $mixedzone -type f -print)" 64 | fi 65 | 66 | if [ -z "$match" ] ; then # no file matches specified pattern 67 | if [ ! -z $(find $zonedir -name $mixedzone -type d -print) ] ; then 68 | echo \ 69 | "The region \"$1\" has more than one timezone. Please use 'list'" >&2 70 | else # just not a match at all 71 | echo "Can't find an exact match for \"$1\". Please use 'list'" >&2 72 | fi 73 | echo "to see all known regions and timezones." >&2 74 | exit 1 75 | fi 76 | fi 77 | timezone="$match" 78 | fi 79 | 80 | nicetz=$(echo $timezone | sed "s|$zonedir/||g") # pretty up the output 81 | 82 | echo It\'s $(TZ=$timezone date '+%A, %B %e, %Y, at %l:%M %p') in $nicetz 83 | 84 | exit 0 85 | -------------------------------------------------------------------------------- /016-unrm.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # unrm - search the deleted files archive for the specified file. If 4 | # there is more than one match, show a list ordered by timestamp, and 5 | # let the user specify which they want restored. 6 | 7 | # Big Important Warning: you'll want a cron job or similar to keep the 8 | # individual trash directories tamed, otherwise nothing will ever 9 | # actually be deleted on the system and you'll run out of disk space! 10 | 11 | mydir="$HOME/.deleted-files" 12 | realrm="/bin/rm" 13 | move="/bin/mv" 14 | 15 | dest=$(pwd) 16 | 17 | if [ ! -d $mydir ] ; then 18 | echo "$0: No deleted files directory: nothing to unrm" >&2 ; exit 1 19 | fi 20 | 21 | cd $mydir 22 | 23 | if [ $# -eq 0 ] ; then # no args, just show listing 24 | echo "Contents of your deleted files archive (sorted by date):" 25 | # ls -FC | sed -e 's/[[:digit:]][[:digit:]]\.//g' -e 's/^/ /' 26 | ls -FC | sed -e 's/\([[:digit:]][[:digit:]]\.\)\{5\}//g' \ 27 | -e 's/^/ /' 28 | exit 0 29 | fi 30 | 31 | # Otherwise we must have a pattern to work with. Let's see if the 32 | # user-specified pattern matches more than one file or directory 33 | # in the archive. 34 | 35 | matches="$(ls *"$1" 2> /dev/null | wc -l)" 36 | 37 | if [ $matches -eq 0 ] ; then 38 | echo "No match for \"$1\" in the deleted file archive." >&2 39 | exit 1 40 | fi 41 | 42 | if [ $matches -gt 1 ] ; then 43 | echo "More than one file or directory match in the archive:" 44 | index=1 45 | for name in $(ls -td *"$1") 46 | do 47 | datetime="$(echo $name | cut -c1-14| \ 48 | awk -F. '{ print $5"/"$4" at "$3":"$2":"$1 }')" 49 | if [ -d $name ] ; then 50 | size="$(ls $name | wc -l | sed 's/[^0-9]//g')" 51 | echo " $index) $1 (contents = ${size} items, deleted = $datetime)" 52 | else 53 | size="$(ls -sdk1 $name | awk '{print $1}')" 54 | echo " $index) $1 (size = ${size}Kb, deleted = $datetime)" 55 | fi 56 | index=$(( $index + 1)) 57 | done 58 | 59 | echo "" 60 | echo -n "Which version of $1 do you want to restore ('0' to quit)? [1] : " 61 | read desired 62 | 63 | if [ ${desired:=1} -ge $index ] ; then 64 | echo "$0: Restore cancelled by user: index value too big." >&2 65 | exit 1 66 | fi 67 | 68 | if [ $desired -lt 1 ] ; then 69 | echo "$0: restore cancelled by user." >&2 ; exit 1 70 | fi 71 | 72 | restore="$(ls -td1 *"$1" | sed -n "${desired}p")" 73 | 74 | if [ -e "$dest/$1" ] ; then 75 | echo "\"$1\" already exists in this directory. Cannot overwrite." >&2 76 | exit 1 77 | fi 78 | 79 | echo -n "Restoring file \"$1\" ..." 80 | $move "$restore" "$dest/$1" 81 | echo "done." 82 | 83 | echo -n "Delete the additional copies of this file? [y] " 84 | read answer 85 | 86 | if [ ${answer:=y} = "y" ] ; then 87 | $realrm -rf *"$1" 88 | echo "deleted." 89 | else 90 | echo "additional copies retained." 91 | fi 92 | else 93 | if [ -e "$dest/$1" ] ; then 94 | echo "\"$1\" already exists in this directory. Cannot overwrite." >&2 95 | exit 1 96 | fi 97 | 98 | restore="$(ls -d *"$1")" 99 | 100 | echo -n "Restoring file \"$1\" ... " 101 | $move "$restore" "$dest/$1" 102 | echo "done." 103 | fi 104 | 105 | exit 0 106 | -------------------------------------------------------------------------------- /026-shpell.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # shpell - An interactive spell checking program that lets you step 4 | # through all known spelling errors in a document, indicate which 5 | # ones you'd like to fix (and the correction), then applies them 6 | # all to the file. The original version of the file is saved with a 7 | # .shp suffix and the new version replaces the old. 8 | # 9 | # Note that you need a standard 'spell' command for this to work, which 10 | # might involve you installing aspell, ispell, or pspell on your system. 11 | 12 | tempfile="/tmp/$0.$$" 13 | changerequests="/tmp/$0.$$.sed" 14 | spell="ispell -l" # modify as neede for your own spell 15 | 16 | trap "rm -f $tempfile $changerequests" EXIT HUP INT QUIT TERM 17 | 18 | # include the ansi color sequence definitions 19 | 20 | . 012-library.sh 21 | initializeANSI 22 | 23 | getfix() 24 | { 25 | # asks for a correction. Keeps track of nesting, 26 | # and only level 1 can output "replacing" message. 27 | 28 | word=$1 29 | filename=$2 30 | misspelled=1 31 | 32 | while [ $misspelled -eq 1 ] 33 | do 34 | echo ""; echo "${boldon}Misspelled word ${word}:${boldoff}" 35 | grep -n $word $filename | 36 | sed -e 's/^/ /' -e "s/$word/$boldon$word$boldoff/g" 37 | echo -n "i)gnore, q)uit, or type replacement: " 38 | read fix 39 | if [ "$fix" = "q" -o "$fix" = "quit" ] ; then 40 | echo "Exiting without applying any fixes."; exit 0 41 | elif [ "${fix%${fix#?}}" = "!" ] ; then 42 | misspelled=0 # once we see spaces, we stop checking 43 | echo "s/$word/${fix#?}/g" >> $changerequests 44 | elif [ "$fix" = "i" -o -z "$fix" ] ; then 45 | misspelled=0 46 | else 47 | if [ ! -z "$(echo $fix | sed 's/[^ ]//g')" ] ; then 48 | misspelled=0 # once we see spaces, we stop checking 49 | echo "s/$word/$fix/g" >> $changerequests 50 | else 51 | # it's a single word replacement, let's spell check that too 52 | if [ ! -z "$(echo $fix | $spell)" ] ; then 53 | echo "" 54 | echo "*** Your suggested replacement $fix is misspelled." 55 | echo "*** Prefix the word with '!' to force acceptance." 56 | else 57 | misspelled=0 # suggested replacement word is acceptable 58 | echo "s/$word/$fix/g" >> $changerequests 59 | fi 60 | fi 61 | fi 62 | done 63 | } 64 | 65 | ### beginning of actual script body 66 | 67 | if [ $# -lt 1 ] ; then 68 | echo "Usage: $0 filename" >&2 ; exit 1 69 | fi 70 | 71 | if [ ! -r $1 ] ; then 72 | echo "$0: Cannot read file $1 to check spelling" >&2 ; exit 1 73 | fi 74 | 75 | # note that the following invocation fills $tempfile along the way 76 | 77 | errors="$($spell < $1 | tee $tempfile | wc -l | sed 's/[^[:digit:]]//g')" 78 | 79 | if [ $errors -eq 0 ] ; then 80 | echo "There are no spelling errors in $1."; exit 0 81 | fi 82 | 83 | echo "We need to fix $errors misspellings in the document. Remember that the" 84 | echo "default answer to the spelling prompt is 'ignore', if you're lazy." 85 | 86 | touch $changerequests 87 | 88 | for word in $(cat $tempfile) 89 | do 90 | getfix $word $1 1 91 | done 92 | 93 | if [ $(wc -l < $changerequests) -gt 0 ] ; then 94 | sed -f $changerequests $1 > $1.new 95 | mv $1 $1.shp 96 | mv $1.new $1 97 | echo Done. Made $(wc -l < $changerequests) changes. 98 | fi 99 | 100 | exit 0 101 | -------------------------------------------------------------------------------- /092-addvirtual.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # addvirtual - add a virtual host to an Apache configuration file 4 | 5 | # you'll want to modify all of these to point to the proper directories 6 | 7 | docroot="/etc/httpd/html" 8 | logroot="/var/log/httpd/" 9 | httpconf="/etc/httpd/conf/httpd.conf" 10 | 11 | # some sites use 'apachectl' rather than restart_apache: 12 | restart="/usr/local/bin/restart_apache" 13 | 14 | showonly=0 15 | tempout="/tmp/addvirtual.$$"; trap "rm -f $tempout $tempout.2" 0 16 | 17 | if [ "$1" = "-n" ] ; then 18 | showonly=1 ; shift 19 | fi 20 | 21 | if [ $# -ne 3 ] ; then 22 | echo "Usage: $(basename $0) [-n] domain admin-email owner-id" >&2 23 | echo " Where -n shows what it would do, but doesn't do anything" >&2 24 | exit 1 25 | fi 26 | 27 | # check for common and probable errors 28 | 29 | if [ $(id -u) != "root" -a $showonly = 0 ] ; then 30 | echo "Error: $(basename $0) can only be run as root." >&2 31 | exit 1 32 | fi 33 | if [ ! -z "$(echo $1 | grep -E '^www\.')" ] ; then 34 | echo "Please omit the www. prefix on the domain name" >&2 35 | exit 0 36 | fi 37 | if [ "$(echo $1 | sed 's/ //g')" != "$1" ] ; then 38 | echo "Error: Domain names cannot have spaces." >&2 39 | exit 1 40 | fi 41 | if [ -z "$(grep -E "^$3" /etc/passwd)" ] ; then 42 | echo "Account $3 not found in password file" >&2 43 | exit 1 44 | fi 45 | 46 | # build the directory structure and drop a few files therein 47 | 48 | if [ $showonly -eq 1 ] ; then 49 | tempout="/dev/tty" # to output virtualhost to stdout 50 | echo "mkdir $docroot/$1 $logroot/$1" 51 | echo "chown $3 $docroot/$1 $logroot/$1" 52 | else 53 | if [ ! -d $docroot/$1 ] ; then 54 | if mkdir $docroot/$1 ; then 55 | echo "Failed on mkdir $docroot/$1: exiting." >&2 ; exit 1 56 | fi 57 | fi 58 | if [ ! -d $logroot/$1 ] ; then 59 | mkdir $logroot/$1 60 | if [ $? -ne 0 -a $? -ne 17 ] ; then 61 | # error code 17 = directory already exists 62 | echo "Failed on mkdir $docroot/$1: exiting." >&2 ; exit 1 63 | fi 64 | fi 65 | chown $3 $docroot/$1 $logroot/$1 66 | fi 67 | 68 | # now let's drop the necessary block into the httpd.conf file 69 | 70 | cat << EOF > $tempout 71 | 72 | ####### Virtual Host setup for $1 ########### 73 | 74 | 75 | ServerName www.$1 76 | ServerAdmin $2 77 | DocumentRoot $docroot/$1 78 | ErrorLog logs/$1/error_log 79 | TransferLog logs/$1/access_log 80 | 81 | 82 | 83 | Options Indexes FollowSymLinks Includes 84 | AllowOverride All 85 | order allow,deny 86 | allow from all 87 | 88 | 89 | EOF 90 | 91 | if [ $showonly -eq 1 ]; then 92 | echo "Tip: Copy the above block into $httpconf and" 93 | echo "restart the server with $restart and you're done." 94 | exit 0 95 | fi 96 | 97 | # let's hack the httpd.conf file 98 | 99 | date="$(date +%m%d%H%m)" # month day hour minute 100 | cp $httpconf $httpconf.$date # backup copy of config file 101 | 102 | # Figure out what line in the file has the last entry 103 | # Yes, this means that the script won't work if there are NO virtualhost 104 | # entries already in the httpd.conf file. If that's the case, just use 105 | # the -n flag and paste the material in manually... 106 | 107 | addafter="$(cat -n $httpconf|grep ''|awk 'NR==1 {print $1}')" 108 | 109 | if [ -z "$addafter" ]; then 110 | echo "Error: Can't find a line in $httpconf" >&2 111 | /bin/rm -f $httpconf.$date; exit 1 112 | fi 113 | 114 | sed "${addafter}r $tempout" < $httpconf > $tempout.2 115 | mv $tempout.2 $httpconf 116 | 117 | if $restart ; then 118 | mv $httpconf $httpconf.failed.$date 119 | mv $httpconf.$date $httpconf 120 | $restart 121 | echo "Configuration appears to have failed; restarted with old conf file" >&2 122 | echo "Failed configuration is in $httpconf.failed.$date" >&2 123 | exit 1 124 | fi 125 | 126 | exit 0 127 | -------------------------------------------------------------------------------- /090-netperf.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # netperf - analyze the netstat running performance log, identifying important 4 | # results and trends. 5 | 6 | log="/var/log/netstat.log" 7 | scriptbc="$HOME/bin/scriptbc" 8 | stats="/tmp/netperf.stats.$$" 9 | awktmp="/tmp/netperf.awk.$$" 10 | 11 | trap "/bin/rm -f $awktmp $stats" 0 12 | 13 | if [ ! -r $log ] ; then 14 | echo "Error: can't read netstat log file $log" >&2 15 | exit 1 16 | fi 17 | 18 | # first, report the basic statistics of the latest entry in the log file... 19 | 20 | eval $(tail -1 $log) # all values turn into shell variables 21 | 22 | rep="$($scriptbc -p 3 $re/$snt\*100)" 23 | repn="$($scriptbc -p 4 $re/$snt\*10000 | cut -d. -f1)" 24 | repn="$(( $repn / 100 ))" 25 | retop="$($scriptbc -p 3 $reto/$snt\*100)"; 26 | retopn="$($scriptbc -p 4 $reto/$snt\*10000 | cut -d. -f1)" 27 | retopn="$(( $retopn / 100 ))" 28 | dupp="$($scriptbc -p 3 $dup/$rec\*100)"; 29 | duppn="$($scriptbc -p 4 $dup/$rec\*10000 | cut -d. -f1)" 30 | duppn="$(( $duppn / 100 ))" 31 | oop="$($scriptbc -p 3 $oo/$rec\*100)"; 32 | oopn="$($scriptbc -p 4 $oo/$rec\*10000 | cut -d. -f1)" 33 | oopn="$(( $oopn / 100 ))" 34 | 35 | echo "Netstat is currently reporting the following:" 36 | 37 | echo -n " $snt packets sent, with $re retransmits ($rep%) " 38 | echo "and $reto retransmit timeouts ($retop%)" 39 | echo -n " $rec packets received, with $dup dupes ($dupp%)" 40 | echo " and $oo out of order ($oop%)" 41 | echo " $creq total connection requests, of which $cacc were accepted" 42 | echo "" 43 | 44 | ## now let's see if there are any important problems to flag 45 | 46 | if [ $repn -ge 5 ] ; then 47 | echo "*** Warning: Retransmits of >= 5% indicates a problem " 48 | echo "(gateway or router flooded?)" 49 | fi 50 | if [ $retopn -ge 5 ] ; then 51 | echo "*** Warning: Transmit timeouts of >= 5% indicates a problem " 52 | echo "(gateway or router flooded?)" 53 | fi 54 | if [ $duppn -ge 5 ] ; then 55 | echo "*** Warning: Duplicate receives of >= 5% indicates a problem " 56 | echo "(probably on the other end)" 57 | fi 58 | if [ $oopn -ge 5 ] ; then 59 | echo "*** Warning: Out of orders of >= 5% indicates a problem " 60 | echo "(busy network or router/gateway flood)" 61 | fi 62 | 63 | # now let's look at some historical trends... 64 | 65 | echo "analyzing trends...." 66 | 67 | while read logline ; do 68 | eval "$logline" 69 | rep2="$($scriptbc -p 4 $re / $snt \* 10000 | cut -d. -f1)" 70 | retop2="$($scriptbc -p 4 $reto / $snt \* 10000 | cut -d. -f1)" 71 | dupp2="$($scriptbc -p 4 $dup / $rec \* 10000 | cut -d. -f1)" 72 | oop2="$($scriptbc -p 4 $oo / $rec \* 10000 | cut -d. -f1)" 73 | echo "$rep2 $retop2 $dupp2 $oop2" >> $stats 74 | done < $log 75 | 76 | echo "" 77 | 78 | # now calculate some statistics, and compare them to the current values 79 | 80 | cat << "EOF" > $awktmp 81 | { rep += $1; retop += $2; dupp += $3; oop += $4 } 82 | END { rep /= 100; retop /= 100; dupp /= 100; oop /= 100; 83 | print "reps="int(rep/NR) ";retops=" int(retop/NR) \ 84 | ";dupps=" int(dupp/NR) ";oops="int(oop/NR) } 85 | EOF 86 | 87 | eval $(awk -f $awktmp < $stats) 88 | 89 | if [ $repn -gt $reps ] ; then 90 | echo "*** Warning: Retransmit rate is currently higher than average." 91 | echo " (average is $reps% and current is $repn%)" 92 | fi 93 | if [ $retopn -gt $retops ] ; then 94 | echo "*** Warning: Transmit timeouts are currently higher than average." 95 | echo " (average is $retops% and current is $retopn%)" 96 | fi 97 | if [ $duppn -gt $dupps ] ; then 98 | echo "*** Warning: Duplicate receives are currently higher than average." 99 | echo " (average is $dupps% and current is $duppn%)" 100 | fi 101 | if [ $oopn -gt $oops ] ; then 102 | echo "*** Warning: Out of orders are currently higher than average." 103 | echo " (average is $oops% and current is $oopn%)" 104 | fi 105 | 106 | echo \(analyzed $(wc -l < $stats) netstat log entries for calculations\) 107 | exit 0 108 | -------------------------------------------------------------------------------- /053-verifycron.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # verifycron - script checks a crontab file to ensure that it's 4 | # formatted properly. Expects standard cron notation of 5 | # min hr dom mon dow CMD 6 | # where min is 0-59, hr 0-23, dom is 1-31, mon is 1-12 (or names) 7 | # and dow is 0-7 (or names). Fields can have ranges (a-e), lists 8 | # separated by commas (a,c,z), or an asterisk. Note that the step 9 | # value notation of Vixie cron is not supported (e.g., 2-6/2). 10 | 11 | 12 | validNum() 13 | { 14 | # return 0 if valid, 1 if not. Specify number and maxvalue as args 15 | num=$1 max=$2 16 | 17 | if [ "$num" = "X" ] ; then 18 | return 0 19 | elif [ ! -z $(echo $num | sed 's/[[:digit:]]//g') ] ; then 20 | return 1 21 | elif [ $num -lt 0 -o $num -gt $max ] ; then 22 | return 1 23 | else 24 | return 0 25 | fi 26 | } 27 | 28 | validDay() 29 | { 30 | # return 0 if a valid dayname, 1 otherwise 31 | 32 | case $(echo $1 | tr '[:upper:]' '[:lower:]') in 33 | sun*|mon*|tue*|wed*|thu*|fri*|sat*) return 0 ;; 34 | X) return 0 ;; # special case - it's an "*" 35 | *) return 1 36 | esac 37 | } 38 | 39 | validMon() 40 | { 41 | # return 0 if a valid month name, 1 otherwise 42 | 43 | case $(echo $1 | tr '[:upper:]' '[:lower:]') in 44 | jan*|feb*|mar*|apr*|may|jun*|jul*|aug*) return 0 ;; 45 | sep*|oct*|nov*|dec*) return 0 ;; 46 | X) return 0 ;; # special case, it's an "*" 47 | *) return 1 ;; 48 | esac 49 | } 50 | 51 | fixvars() 52 | { 53 | # translate all '*' into 'X' to bypass shell expansion hassles 54 | # save original as "sourceline" for error messages 55 | 56 | sourceline="$min $hour $dom $mon $dow $command" 57 | min=$(echo "$min" | tr '*' 'X') 58 | hour=$(echo "$hour" | tr '*' 'X') 59 | dom=$(echo "$dom" | tr '*' 'X') 60 | mon=$(echo "$mon" | tr '*' 'X') 61 | dow=$(echo "$dow" | tr '*' 'X') 62 | } 63 | 64 | if [ $# -ne 1 ] || [ ! -r $1 ] ; then 65 | echo "Usage: $0 usercrontabfile" >&2; exit 1 66 | fi 67 | 68 | lines=0 entries=0 totalerrors=0 69 | 70 | while read min hour dom mon dow command 71 | do 72 | lines="$(( $lines + 1 ))" 73 | errors=0 74 | 75 | if [ -z "$min" -o "${min%${min#?}}" = "#" ] ; then 76 | continue # nothing to check 77 | elif [ ! -z $(echo ${min%${min#?}} | sed 's/[[:digit:]]//') ] ; then 78 | continue # first char not digit: skip! 79 | fi 80 | 81 | entries="$(($entries + 1))" 82 | 83 | fixvars 84 | 85 | #### Broken into fields, all '*' replaced with 'X' 86 | # minute check 87 | 88 | for minslice in $(echo "$min" | sed 's/[,-]/ /g') ; do 89 | if ! validNum $minslice 60 ; then 90 | echo "Line ${lines}: Invalid minute value \"$minslice\"" 91 | errors=1 92 | fi 93 | done 94 | 95 | # hour check 96 | 97 | for hrslice in $(echo "$hour" | sed 's/[,-]/ /g') ; do 98 | if ! validNum $hrslice 24 ; then 99 | echo "Line ${lines}: Invalid hour value \"$hrslice\"" 100 | errors=1 101 | fi 102 | done 103 | 104 | # day of month check 105 | 106 | for domslice in $(echo $dom | sed 's/[,-]/ /g') ; do 107 | if ! validNum $domslice 31 ; then 108 | echo "Line ${lines}: Invalid day of month value \"$domslice\"" 109 | errors=1 110 | fi 111 | done 112 | 113 | # month check 114 | 115 | for monslice in $(echo "$mon" | sed 's/[,-]/ /g') ; do 116 | if ! validNum $monslice 12 ; then 117 | if ! validMon "$monslice" ; then 118 | echo "Line ${lines}: Invalid month value \"$monslice\"" 119 | errors=1 120 | fi 121 | fi 122 | done 123 | 124 | # day of week check 125 | 126 | for dowslice in $(echo "$dow" | sed 's/[,-]/ /g') ; do 127 | if ! validNum $dowslice 7 ; then 128 | if ! validDay $dowslice ; then 129 | echo "Line ${lines}: Invalid day of week value \"$dowslice\"" 130 | errors=1 131 | fi 132 | fi 133 | done 134 | 135 | if [ $errors -gt 0 ] ; then 136 | echo ">>>> ${lines}: $sourceline" 137 | echo "" 138 | totalerrors="$(( $totalerrors + 1 ))" 139 | fi 140 | done < $1 141 | 142 | echo "Done. Found $totalerrors errors in $entries crontab entries." 143 | 144 | exit 0 145 | -------------------------------------------------------------------------------- /080-apm.cgi: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | # apm - Apache Password Manager - allows the administrator to easily 4 | # manage the addition, update, or deletion of accounts and passwords 5 | # for a subdirectory of a typical Apache configuration (where the 6 | # config file is called .htaccess) 7 | 8 | echo "Content-type: text/html" 9 | echo "" 10 | echo "Apache Password Manager Utility" 11 | 12 | myname="$(basename $0)" 13 | temppwfile="/tmp/apm.$$"; trap "/bin/rm -f $temppwfile" 0 14 | footer="apm-footer.html" 15 | htaccess=".htaccess" 16 | 17 | # Modern versions of 'htpasswd' include a -b flag that lets you specify 18 | # the password on the command line. If yours can do that, specify it 19 | # here, with the '-b' flag: 20 | # htpasswd="/usr/local/bin/htpasswd -b" 21 | # otherwise, there's a simple Perl rewrite of this script that is a good 22 | # substitute, at http://www.intuitive.com/shellhacks/examples/httpasswd-b.pl 23 | 24 | htpasswd="/web/intuitive/wicked/examples/protected/htpasswd-b.pl" 25 | 26 | if [ "$REMOTE_USER" != "admin" -a -s $htpasswd ] ; then 27 | echo "Error: you must be user admin to use APM." 28 | exit 0 29 | fi 30 | 31 | # now get the password filename from the .htaccess file 32 | 33 | if [ ! -r "$htaccess" ] ; then 34 | echo "Error: cannot read $htaccess file in this directory." 35 | exit 0 36 | fi 37 | 38 | passwdfile="$(grep "AuthUserFile" $htaccess | cut -d\ -f2)" 39 | 40 | if [ ! -r $passwdfile ] ; then 41 | echo "Error: can't read password file: can't make updates." 42 | exit 0 43 | elif [ ! -w $passwdfile ] ; then 44 | echo "Error: can't write to password file: can't update." 45 | exit 0 46 | fi 47 | 48 | echo "

    Apache Password Manager

    " 49 | 50 | action="$(echo $QUERY_STRING | cut -c3)" 51 | user="$(echo $QUERY_STRING|cut -d\& -f2|cut -d= -f2|tr '[:upper:]' '[:lower:]')" 52 | 53 | case "$action" in 54 | A ) echo "

    Adding New User $user

    " 55 | if [ ! -z "$(grep -E "^${user}:" $passwdfile)" ] ; then 56 | echo "Error: user $user already appears in the file." 57 | else 58 | pass="$(echo $QUERY_STRING|cut -d\& -f3|cut -d= -f2)" 59 | if [ ! -z "$(echo $pass | tr -d '[[:upper:][:lower:][:digit:]]')" ] ; then 60 | echo "Error: passwords can only contain a-z A-Z 0-9 ($pass)" 61 | else 62 | $htpasswd $passwdfile $user $pass 63 | echo "Added!
    " 64 | fi 65 | fi 66 | ;; 67 | U ) echo "

    Updating Password for user $user

    " 68 | if [ -z "$(grep -E "^${user}:" $passwdfile)" ] ; then 69 | echo "Error: user $user isn't in the password file?" 70 | echo "
    ";cat $passwdfile;echo "
    " 71 | echo "searched for "^${user}:" in $passwdfile" 72 | else 73 | pass="$(echo $QUERY_STRING|cut -d\& -f3|cut -d= -f2)" 74 | if [ ! -z "$(echo $pass | tr -d '[[:upper:][:lower:][:digit:]]')" ] ; then 75 | echo "Error: passwords can only contain a-z A-Z 0-9 ($pass)" 76 | else 77 | grep -vE "^${user}:" $passwdfile > $temppwfile 78 | mv $temppwfile $passwdfile 79 | $htpasswd $passwdfile $user $pass 80 | echo "Updated!
    " 81 | fi 82 | fi 83 | ;; 84 | D ) echo "

    Deleting User $user

    " 85 | if [ -z "$(grep -E "^${user}:" $passwdfile)" ] ; then 86 | echo "Error: user $user isn't in the password file?" 87 | elif [ "$user" = "admin" ] ; then 88 | echo "Error: you can't delete the 'admin' account." 89 | else 90 | grep -vE "^${user}:" $passwdfile > $temppwfile 91 | mv $temppwfile $passwdfile 92 | echo "Deleted!
    " 93 | fi 94 | ;; 95 | esac 96 | 97 | # always list the current users in the password file... 98 | 99 | echo "

    " 100 | echo "" 102 | oldIFS=$IFS ; IFS=":" # change word split delimiter 103 | while read acct pw ; do 104 | echo "" 106 | done < $passwdfile 107 | echo "
    List " 101 | echo "of all current users
    $acct" 105 | echo "[delete]
    " 108 | IFS=$oldIFS # and restore it 109 | 110 | # build selectstring with all accounts included 111 | optionstring="$(cut -d: -f1 $passwdfile | sed 's/^/