1#! /bin/sh
2# This is a shell archive.  Remove anything before this line, then unpack
3# it by saving it into a file and typing "sh file".  To overwrite existing
4# files, type "sh file -c".  You can also feed this as standard input via
5# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
6# will see the following message at the end:
7#		"End of shell archive."
8# Contents:  Poll uudemon.poll
9# Wrapped by dburr@sbanet on Fri Jul 23 20:15:18 1993
10PATH=/bin:/usr/bin:/usr/ucb ; export PATH
11if test -f 'Poll' -a "${1}" != "-c" ; then 
12  echo shar: Will not clobber existing file \"'Poll'\"
13else
14echo shar: Extracting \"'Poll'\" \(244 characters\)
15sed "s/^X//" >'Poll' <<'END_OF_FILE'
16X# HDB-ish poll file
17X#
18X# Format: <site><tab><hour1> <hour2> ...
19X# ONLY ONE TAB BETWEEN FIELDS... more may work, but I have absolutely no
20X# idea if it will work at all.
21X#
22X# comment lines (begin with `#') are ignored.
23X
24Xdschub	20 21 22
25Xgd	20 21 22
26END_OF_FILE
27if test 244 -ne `wc -c <'Poll'`; then
28    echo shar: \"'Poll'\" unpacked with wrong size!
29fi
30# end of 'Poll'
31fi
32if test -f 'uudemon.poll' -a "${1}" != "-c" ; then 
33  echo shar: Will not clobber existing file \"'uudemon.poll'\"
34else
35echo shar: Extracting \"'uudemon.poll'\" \(941 characters\)
36sed "s/^X//" >'uudemon.poll' <<'END_OF_FILE'
37X#!/bin/sh
38X#
39X# This is my impersonation of the HDB uudemon.poll script.
40X# Yes, I know, this is very clumsy and clunky... ahh well, I've always
41X# been better at C/pascal/etc than Shell programming... :(
42X
43X# change LIBDIR to where UUCP library/conf. files are
44X# change SPOOLDIR to the UUCP spool directory.  It must be HDB-ish.
45XLIBDIR=/usr/lib/uucp; export LIBDIR
46XSPOOLDIR=/usr/spool/uucp; export SPOOLDIR
47X
48X###  no changes needed past here  ###
49X
50XHOUR=`date +%H`; export HOUR
51X
52Xif [ -f ${LIBDIR}/Poll ]; then
53X	for SYS in `uuname`
54X	do
55X		CHOICES="`grep "^$SYS[	]" ${LIBDIR}/Poll | awk -F'	' \
56X			'{ print $2 }'`"
57X		DOIT="no"
58X		for H in $CHOICES
59X		do
60X			if [ "$HOUR" = "$H" ]; then
61X				DOIT="yes"
62X			fi
63X		done
64X		if [ "$DOIT" = "yes" ]; then
65X			if [ ! -d ${SPOOLDIR}/${SYS} ]; then
66X				mkdir ${SPOOLDIR}/${SYS}
67X			fi
68X			chmod 755 ${SPOOLDIR}/${SYS}
69X			touch ${SPOOLDIR}/${SYS}/C.${SYS}n0000
70X			chmod 644 ${SPOOLDIR}/${SYS}/C.${SYS}n0000
71X		fi
72X	done
73Xfi
74END_OF_FILE
75if test 941 -ne `wc -c <'uudemon.poll'`; then
76    echo shar: \"'uudemon.poll'\" unpacked with wrong size!
77fi
78chmod +x 'uudemon.poll'
79# end of 'uudemon.poll'
80fi
81echo shar: End of shell archive.
82exit 0
83