#!/bin/sh
gen_suiddb() {
d=/
[ "$1" != "" ] && d=$@
find $d \( -perm -04000 -o -perm -02000 \) -type f -ls 2> /dev/null | awk '{print $3,$5,$6,$11; }' | sort | uniq > ~/.suid.tmp
}
gen_suid_xml() {
DATESTR=$(date +%Y%m%d)
cat <<__EOF__
"
cat <<__EOF__
__EOF__
cat ~/.suid.tmp | while read line ; do
perm=`echo $line | awk '{print $1}'`
usr=`echo $line | awk '{print $2}'`
grp=`echo $line | awk '{print $3}'`
fname=`echo $line | awk '{print $4}'`
pkg=$(qpkg -nc -f $fname)
[ "${pkg}" != "" ] &&
echo -ne "\tPackage Name
Permissions
Owner
Group
Filename
\n\t\t \n"
done
echo "