![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to uudemon.cleanu CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv8dc / cmd / uucp|
Return to uudemon.cleanu CVS log | Up to [Research Unix] / researchv8dc / cmd / uucp |
1.1 root 1: #!/bin/sh
2: # @(#)uudemon.clea 1.7
3: #
4: # This demon cleans up uucp directories.
5: # It is started by /usr/lib/crontab;
6: # it can be run daily, weekly, whatever depending on the system
7: # uucp load.
8: # The log files get large so you may have to up the ulimit.
9: # e.g.
10: #
11: # 45 23 * * * ulimit 5000; /bin/su uucp -c "/usr/lib/uucp/uudemon.cleanu"
12: #
13:
14: MAILTO=${mailto:-uucp}
15: export PATH
16: PATH=/bin:/usr/bin:/usr/lib/uucp:/usr/lbin
17: TMP=/tmp/uu$$
18: WISDOM=/tmp/uv$$
19: >$WISDOM; chmod 0700 $WISDOM
20:
21: #
22: # These are taken from the Makefile. If changed in Makefile
23: # they must be changed here also.
24: #
25: PUBDIR=/usr/spool/uucppublic
26: SPOOL=/usr/spool/uucp
27: LOCKS=/usr/spool/locks
28: XQTDIR=/usr/spool/uucp/.Xqtdir
29: CORRUPT=/usr/spool/uucp/.Corrupt
30: LOGDIR=/usr/spool/uucp/.Log
31: SEQDIR=/usr/spool/uucp/.Sequence
32: STATDIR=/usr/spool/uucp/.Status
33: WORKDIR=/usr/spool/uucp/.Workspace
34: ADMIN=/usr/spool/uucp/.Admin
35:
36: # OLD is the directory for archiving old admin/log files
37: OLD=$SPOOL/.Old
38: O_LOGS=$OLD/Old-Log
39:
40: mv $ADMIN/xferstats $OLD/xferstats
41: mv $ADMIN/audit $OLD/audit
42: mv $ADMIN/errors $OLD/errors
43: mv $ADMIN/Foreign $OLD/Foreign
44:
45: > $ADMIN/xferstats
46: > $ADMIN/audit
47: > $ADMIN/errors
48: > $ADMIN/Foreign
49:
50: #
51: # The list in the for controls how many old LOG files are retained.
52: # O_LOGS-2 goes to O_LOGS-3, O_LOGS-1 goes to O_LOGS-2.
53: # Todays goes to O_LOGS-1
54: #
55: max=${1:-1}
56: for i in `seq $max -1 2`
57: do
58: j=`expr $i - 1`
59: mv ${O_LOGS}-$j ${O_LOGS}-$i
60: done
61:
62: #
63: # Combine all log files into O_LOGS-1.
64: # Add a name separator between each system.
65: #
66: > ${O_LOGS}-1
67: for i in uucico uucp uux uuxqt
68: do
69: cd $LOGDIR/$i
70: for j in *
71: do
72: if [ "$j" = "*" ]
73: then
74: break
75: fi
76: echo "********** $j **********" >> ${O_LOGS}-1
77: cat $j >> ${O_LOGS}-1
78: rm -f $j
79: done
80: done
81:
82: # Execute the system directory cleanup program
83: # See uucleanup.1m for details.
84: uucleanup -D7 -C7 -X2 -o2 -W1
85: # Use the grep instead of the mv to ignore warnings to uucp
86: # grep -v 'warning message sent to uucp' $ADMIN/uucleanup > $OLD/uucleanup
87: mv $ADMIN/uucleanup $OLD/uucleanup
88: if [ -s $OLD/uucleanup ]
89: then
90: (echo "cleanup:"; cat $OLD/uucleanup) >>$WISDOM
91: fi
92: >$ADMIN/uucleanup
93:
94: # cleanup funny directories that may have been created in the spool areas
95: for d in $SPOOL/[A-z]*
96: do
97: if [ -z "`ls $d`" ]; then
98: continue
99: fi
100:
101: cd $d
102: for s in *
103: do
104: if [ "$s" = "*" ]
105: then
106: break
107: fi
108: if [ -d $s ]
109: then
110: rm -fr $s
111: fi
112: done
113:
114: # if it is now empty, remove it.
115: cd ..
116: rmdir $d
117: done 2>&1 >/dev/null
118:
119: #
120: # Find old cores
121: #
122: find $SPOOL -name core -print > $TMP
123: if [ -s $TMP ]
124: then
125: (echo "cores:"; cat $TMP) >>$WISDOM
126: fi
127:
128: #
129: # Remove old files and directories
130: #
131: find $PUBDIR -type f -mtime +30 -exec rm -f "{}" \;
132: find $PUBDIR/* -type d -exec rmdir "{}" \;
133: find $SEQDIR -mtime +30 -exec rm -f "{}" \;
134: find $WORKDIR -mtime +1 -exec rm -f "{}" \;
135: find $STATDIR -mtime +2 -exec rm -f "{}" \;
136: find $CORRUPT -mtime +10 -exec rm -f "{}" \;
137:
138: rm -f $LOCKS/LTMP*
139: rmdir $SPOOL/[A-z]* 2>/dev/null
140:
141: #
142: # Mail a daily summary of status
143: #
144: grep passwd ${O_LOGS}-1 > $TMP
145: # grep "REQUEST.*/" ${O_LOGS}-1 >> $TMP
146: if [ -s $TMP ]
147: then
148: (echo "passwd requests:"; cat $TMP) >>$WISDOM
149: fi
150:
151: awk '/(DENIED)/ {print prev}
152: {prev = $0}' ${O_LOGS}-1 > $TMP
153: if [ -s $TMP ]
154: then
155: (echo "denied:"; cat $TMP) >>$WISDOM
156: fi
157: #
158: # uustat -q > $TMP
159: # if [ -s $TMP ]
160: # then
161: # (echo "Subject: uu-status"; cat $TMP) >>$WISDOM
162: # fi
163:
164: ls $CORRUPT > $TMP
165: if [ -s $TMP ]
166: then
167: (echo "$CORRUPT:"; cat $TMP) >>$WISDOM
168: fi
169:
170: tail $OLD/errors 2>/dev/null > $TMP
171: tail $OLD/Foreign 2>/dev/null >> $TMP
172: if [ -s $TMP ]
173: then
174: (echo "Admin stuff:"; cat $TMP) >>$WISDOM
175: fi
176: # (echo "Subject: uucleanup ran; $SPOOL du"; du $SPOOL) >>$WISDOM
177:
178: if [ -s $WISDOM ]; then
179: mail $MAILTO <$WISDOM
180: fi
181: rm -f $WISDOM
182:
183: #
184: # Dispose of mail to uucp and nuucp
185: #
186: # rm -f $MAILDIR/uucp $MAILDIR/nuucp $TMP
187: rm -f $TMP
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.