immortalday 14.03.2011 16:40

СкриптыПроверка срока жизни пароля в AIX

Написал вот такой вот скрипт проверки срока действия пароля в AIX с отправкой предупреждения админу. Скрипт проверяет срок действия пароля для всех пользователей у которых он есть.

 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
#!/bin/sh
# 604800 seconds on week, 86400 second on 24 hour
# expd - days when the warning that the password ends

h=`hostname`
expd="7"

function pass_chk {

r=`lsuser -a lastupdate $var | cut -d'=' -f2`

mxg=`lsuser -a maxage $var | cut -d'=' -f2`
fmxg=`expr $mxg \* 604800`

t=`expr $r + $fmxg`

end=`perl -e 'print scalar(localtime('$t')), "\n";'`

cr=`perl -e 'print time."\n"'`

crt=`perl -e 'print scalar(localtime('$cr')), "\n";'`

tr=`expr $t - $cr`

qw=`expr $tr / 86400`

if < "$qw" -le "$expd" >; then
echo "This is $h server. AIX system password will expire in $qw days for $var user. Have nice day!" | mail -s "AIX expire password $var" example@mail.mail

fi

}

for var in `lsuser -a lastupdate ALL | grep lastupdate | awk '{print $1}'`

do

pass_chk

done



Тэги: AIX bash
+ 3 -
Похожие Поделиться

cyrus 15.03.2011 12:27 #
А где вы используете AIX??
immortalday 15.03.2011 15:33 #
AIX используется для Arcsight и DLP , также на них крутятся их бд(oracle)
kstep 16.03.2011 21:58 #
Глядя на количесво перла в скрипте (и разных вычислений, которые в перле делаются проще, без expr), у меня возникает вывернуть этот скрипт «наизнанку»: написать его полностью на перле, где надо вставив вызов shell-команд.
kstep 16.03.2011 21:58 #
* возникает желание вывернуть...