===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
collectl-4.3.1/docs/OpenStack.html-162-#<----------------------Replicator----------------------><-----------------------Server----------------------->
collectl-4.3.1/docs/OpenStack.html:163:# Diff DCap Nochg Hasm Rsync RMerg Atmpt Fail Remov Succ Put Get Post Dele Head Repl Errs Quar Asyn PutTime
collectl-4.3.1/docs/OpenStack.html-164- 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.000
##############################################
collectl-4.3.1/initd/collectl-suse-70-if [ -f $PIDFILE ]; then
collectl-4.3.1/initd/collectl-suse:71: pid=`cat $PIDFILE`
collectl-4.3.1/initd/collectl-suse:72: pid=`ps ax opid,cmd | grep $PROCNAME | grep $pid | grep -v grep | awk '{ print $1 }'`
collectl-4.3.1/initd/collectl-suse-73-fi
##############################################
collectl-4.3.1/initd/collectl-suse-101- if [ -f $PIDFILE ]; then
collectl-4.3.1/initd/collectl-suse:102: pid=`cat $PIDFILE`
collectl-4.3.1/initd/collectl-suse-103- echo Flushing buffers for $PNAME
##############################################
collectl-4.3.1/initd/collectl-generic-61-if [ -f $PIDFILE ]; then
collectl-4.3.1/initd/collectl-generic:62: pid=`cat $PIDFILE`
collectl-4.3.1/initd/collectl-generic:63: pid=`ps ax opid,cmd | grep $PROCNAME | grep $pid | grep -v grep | awk '{ print $1 }'`
collectl-4.3.1/initd/collectl-generic-64-fi
##############################################
collectl-4.3.1/initd/collectl-94- if [ -f $PIDFILE ]; then
collectl-4.3.1/initd/collectl:95: pid=`cat $PIDFILE`
collectl-4.3.1/initd/collectl-96- echo Flushing buffers for $PNAME
##############################################
collectl-4.3.1/initd/collectl-debian-93- echo "Flushing buffers for $PNAME"
collectl-4.3.1/initd/collectl-debian:94: kill -s USR1 `cat $PIDFILE`
collectl-4.3.1/initd/collectl-debian-95- else
##############################################
collectl-4.3.1/statsd.ph-22-$headers{'accreap'}='Errs CFail CDel CRem CPoss OFail ODel ORem OPoss';
collectl-4.3.1/statsd.ph:23:$headers{'accrepl'}='Diff DCap Nochg Hasm Rsync RMerg Atmpt Fail Remov Succ';
collectl-4.3.1/statsd.ph-24-$headers{'accsrvr'}=' Put Get Post Dele Head Repl Errs';
collectl-4.3.1/statsd.ph-25-$headers{'conaudt'}='Errs Pass Fail';
collectl-4.3.1/statsd.ph:26:$headers{'conrepl'}='Diff DCap Nochg Hasm Rsync RMerg Atmpt Fail Remov Succ';
collectl-4.3.1/statsd.ph-27-$headers{'consrvr'}=' Put Get Post Dele Head Repl Errs';
##############################################
collectl-4.3.1/formatit.ph-79-
collectl-4.3.1/formatit.ph:80: $processCtxFlag=($subsys=~/Z/ && `$Grep ctxt /proc/self/status` ne '') ? 1 : 0;
collectl-4.3.1/formatit.ph-81-
##############################################
collectl-4.3.1/formatit.ph-98- # kernel that will set the CPU states (or let us change them), enable CPU flag
collectl-4.3.1/formatit.ph:99: $NumCpus=`$Grep cpu /proc/stat | wc -l`;
collectl-4.3.1/formatit.ph-100- $NumCpus=~/(\d+)/;
##############################################
collectl-4.3.1/formatit.ph-114- {
collectl-4.3.1/formatit.ph:115: my $totalCpus=`ls /sys/devices/system/cpu/|$Grep '^cpu[0-9]'|wc -l`;
collectl-4.3.1/formatit.ph-116- chomp $totalCpus;
##############################################
collectl-4.3.1/formatit.ph-134- {
collectl-4.3.1/formatit.ph:135: my $online=`cat /sys/devices/system/cpu/cpu$i/online`;
collectl-4.3.1/formatit.ph-136- chomp $online;
##############################################
collectl-4.3.1/formatit.ph-145-
collectl-4.3.1/formatit.ph:146: $temp=`$Grep vendor_id /proc/cpuinfo`;
collectl-4.3.1/formatit.ph-147- $CpuVendor=($temp=~/: (.*)/) ? $1 : '???';
collectl-4.3.1/formatit.ph:148: $temp=`$Grep siblings /proc/cpuinfo`;
collectl-4.3.1/formatit.ph-149- $CpuSiblings=($temp=~/: (\d+)/) ? $1 : 1; # if not there assume 1
collectl-4.3.1/formatit.ph:150: $temp=`$Grep "cpu cores" /proc/cpuinfo`;
collectl-4.3.1/formatit.ph-151- $CpuCores=($temp=~/: (\d+)/) ? $1 : 1; # if not there assume 1
collectl-4.3.1/formatit.ph:152: $temp=`$Grep "cpu MHz" /proc/cpuinfo`;
collectl-4.3.1/formatit.ph-153- $CpuMHz=($temp=~/: (.*)/) ? $1 : '???';
##############################################
collectl-4.3.1/formatit.ph-156- {
collectl-4.3.1/formatit.ph:157: $CpuNodes=`ls /sys/devices/system/node |$Grep '^node[0-9]'|wc -l`;
collectl-4.3.1/formatit.ph-158- }
##############################################
collectl-4.3.1/formatit.ph-201-
collectl-4.3.1/formatit.ph:202: $Memory=`$Grep MemTotal /proc/meminfo`;
collectl-4.3.1/formatit.ph-203- $Memory=(split(/\s+/, $Memory, 2))[1];
collectl-4.3.1/formatit.ph-204- chomp $Memory;
collectl-4.3.1/formatit.ph:205: $Swap=`$Grep SwapTotal /proc/meminfo`;
collectl-4.3.1/formatit.ph-206- $Swap=(split(/\s+/, $Swap, 2))[1];
##############################################
collectl-4.3.1/formatit.ph-231- $dskIndexNext=0;
collectl-4.3.1/formatit.ph:232: my @temp=`$Cat /proc/diskstats`;
collectl-4.3.1/formatit.ph-233- foreach my $line (@temp)
##############################################
collectl-4.3.1/formatit.ph-281- {
collectl-4.3.1/formatit.ph:282: my $lspciVer=`$Lspci --version`;
collectl-4.3.1/formatit.ph-283- $lspciVer=~/ (\d+\.\d+)/;
##############################################
collectl-4.3.1/formatit.ph-295- print "Command: $command\n" if $debug & 1;
collectl-4.3.1/formatit.ph:296: @pci=`$command`;
collectl-4.3.1/formatit.ph-297- $HCANames='';
##############################################
collectl-4.3.1/formatit.ph-370- my $message='';
collectl-4.3.1/formatit.ph:371: my $temp=`$PQuery 2>/dev/null`;
collectl-4.3.1/formatit.ph-372-
##############################################
collectl-4.3.1/formatit.ph-386- # Can you believe it? PQuery writes its version output to stderr!
collectl-4.3.1/formatit.ph:387: $temp=`$PQuery -V 2>&1`;
collectl-4.3.1/formatit.ph-388- $temp=~/VERSION: (\d+\.\d+\.\d+)/;
##############################################
collectl-4.3.1/formatit.ph-403- # line at front end so let's look at first 10 lines for version.
collectl-4.3.1/formatit.ph:404: $IBVersion=($OfedInfo ne '' && `$OfedInfo|head -n10`=~/OFED-(.*)/) ? $1 : '???';
collectl-4.3.1/formatit.ph-405- }
##############################################
collectl-4.3.1/formatit.ph-408- # available with perfquery so let's see
collectl-4.3.1/formatit.ph:409: $PQopt = '-x' if !($debug & 16384) && `$PQuery -h 2>&1`=~/--extended/m;
collectl-4.3.1/formatit.ph-410- }
##############################################
collectl-4.3.1/formatit.ph-426- $command="$Ps axo pid,cmd | $Grep collectl | $Grep -vE 'grep|ssh'";
collectl-4.3.1/formatit.ph:427: foreach my $line (`$command`)
collectl-4.3.1/formatit.ph-428- {
##############################################
collectl-4.3.1/formatit.ph-440- # the last uncommented one.
collectl-4.3.1/formatit.ph:441: foreach my $cmd (`$Grep 'DaemonCommands =' $configFile`)
collectl-4.3.1/formatit.ph-442- {
##############################################
collectl-4.3.1/formatit.ph-504- {
collectl-4.3.1/formatit.ph:505: $ProductName=($rootFlag) ? `$Dmidecode | grep -m1 'Product Name'` : '';
collectl-4.3.1/formatit.ph-506- $ProductName=~s/\s*Product Name: //;
##############################################
collectl-4.3.1/formatit.ph-537- # never execute it
collectl-4.3.1/formatit.ph:538: $message=`$command 2>&1`;
collectl-4.3.1/formatit.ph-539- if ($message=~/^Dumping/)
##############################################
collectl-4.3.1/formatit.ph-550- my $command="$Ipmitool -S $IpmiCache sdr type $type";
collectl-4.3.1/formatit.ph:551: next if `$command` eq '';
collectl-4.3.1/formatit.ph-552- print EXEC "sdr type $type\n";
##############################################
collectl-4.3.1/formatit.ph-598- undef @netOrder;
collectl-4.3.1/formatit.ph:599: @temp=`$Grep -v -E "Inter|face" /proc/net/dev`;
collectl-4.3.1/formatit.ph-600- foreach my $temp (@temp)
##############################################
collectl-4.3.1/formatit.ph-629- {
collectl-4.3.1/formatit.ph:630: @temp=`$Grep -E "Host|Type" /proc/scsi/scsi`;
collectl-4.3.1/formatit.ph-631- foreach $temp (@temp)
##############################################
collectl-4.3.1/formatit.ph-684- # XC and client enabler
collectl-4.3.1/formatit.ph:685: $llite=`$Rpm -qa | $Grep lustre-client`;
collectl-4.3.1/formatit.ph-686- $llite=~/lustre-client-(.*)/;
##############################################
collectl-4.3.1/formatit.ph-4123- # won't do anything with speed until we create a new file, but then we'll get a new header
collectl-4.3.1/formatit.ph:4124: my $line=`find /sys/devices/ 2>&1 | grep net | grep $netName | grep speed`;
collectl-4.3.1/formatit.ph-4125- $netSpeeds{$netName}='??';
##############################################
collectl-4.3.1/formatit.ph-4127- {
collectl-4.3.1/formatit.ph:4128: $speed=`cat $line 2>&1`;
collectl-4.3.1/formatit.ph-4129- chomp $speed;
##############################################
collectl-4.3.1/formatit.ph-9856- print "Command: $command\n" if $debug & 2;
collectl-4.3.1/formatit.ph:9857: $found=`$command`;
collectl-4.3.1/formatit.ph-9858- if ($found ne '')
##############################################
collectl-4.3.1/formatit.ph-9863- logmsg('I', "Adding '$found' to '$label' in $configFile");
collectl-4.3.1/formatit.ph:9864: my $conf=`$Cat $configFile`;
collectl-4.3.1/formatit.ph-9865- $conf=~s/($label\s+=\s+)(.*)$/$1$found:$2/m;
##############################################
collectl-4.3.1/colmux-116-{
collectl-4.3.1/colmux:117: `$resize`=~/LINES.*?(\d+)/m;
collectl-4.3.1/colmux-118- $termHeight=$1;
collectl-4.3.1/colmux:119: `$resize`=~/COLUMNS.*?(\d+)/m;
collectl-4.3.1/colmux-120- $termWidth=$1;
##############################################
collectl-4.3.1/colmux-512- print "Killing ssh with pid: $pid\n" if $debug & 1;
collectl-4.3.1/colmux:513: `kill $pid`;
collectl-4.3.1/colmux-514- }
##############################################
collectl-4.3.1/colmux-792- print "Command: $colCommand\n" if $debug & 1;
collectl-4.3.1/colmux:793: system($colCommand) unless $debug & 4;
collectl-4.3.1/colmux-794- }
##############################################
collectl-4.3.1/colmux-985- print "Killing ssh with pid: $pid\n" if $debug & 1;
collectl-4.3.1/colmux:986: `kill $pid`;
collectl-4.3.1/colmux-987- }
##############################################
collectl-4.3.1/colmux-1057- print "Command: $cmd\n" if $debug & 1;
collectl-4.3.1/colmux:1058: my $header=`$cmd`;
collectl-4.3.1/colmux-1059- error($1) if $header=~/(Error.*?)\n/;
##############################################
collectl-4.3.1/colmux-1181- print "Killing pid $files{$host}->{pid} for '$host'\n" if $debug & 1;
collectl-4.3.1/colmux:1182: `kill -9 $files{$host}->{pid}`;
collectl-4.3.1/colmux-1183- #close $files{$host}->{fd} or error("Failed to close playback file for '$host'");
##############################################
collectl-4.3.1/colmux-1192- # /bin/ping should be installed natively with suid privs so we CAN use that.
collectl-4.3.1/colmux:1193: my $out=`$Ping -c1 -w$pingTimeout $hostnames[$i] 2>&1`;
collectl-4.3.1/colmux-1194- $out=~/(\d+)% packet loss/;
##############################################
collectl-4.3.1/colmux-1220- print "Command: $command" if $debug & 512;
collectl-4.3.1/colmux:1221: my $collectl=`$command`;
collectl-4.3.1/colmux-1222-
##############################################
collectl-4.3.1/colmux-1251- print "Command: $command" if $debug & 512;
collectl-4.3.1/colmux:1252: $dates[$i]=`$command`;
collectl-4.3.1/colmux-1253- }
##############################################
collectl-4.3.1/colmux-1485- my $addressList='';
collectl-4.3.1/colmux:1486: foreach my $addr (split(/[ ,]/, $address))
collectl-4.3.1/colmux-1487- {
##############################################
collectl-4.3.1/colmux-1541-
collectl-4.3.1/colmux:1542: my @numbers=eval("($piece)");
collectl-4.3.1/colmux-1543-
##############################################
collectl-4.3.1/colmux-1572- print "Command: $cmd\n" if $debug & 1;
collectl-4.3.1/colmux:1573: my @lines=`$cmd`;
collectl-4.3.1/colmux-1574- if (@lines==1)
##############################################
collectl-4.3.1/colmux-1604- close ROUTES;
collectl-4.3.1/colmux:1605: $myaddr=`$Ifconfig $interface | grep 'inet '`;
collectl-4.3.1/colmux-1606- $myaddr=(split(/\s+/, $myaddr))[2];
##############################################
collectl-4.3.1/colmux-2148- print "Command: '$cmd'\n" if $debug & 1;
collectl-4.3.1/colmux:2149: my $headers=`$cmd 2>&1`;
collectl-4.3.1/colmux-2150-
##############################################
collectl-4.3.1/colmux-2183- print "Command: '$cmd'\n" if $debug & 1;
collectl-4.3.1/colmux:2184: $headers=`$cmd 2>&1`;
collectl-4.3.1/colmux-2185-
##############################################
collectl-4.3.1/collectl-319-
collectl-4.3.1/collectl:320: `$Resize`=~/LINES.*?(\d+)/m;
collectl-4.3.1/collectl-321- $termHeight=$1;
##############################################
collectl-4.3.1/collectl-511- {
collectl-4.3.1/collectl:512: $runasUid=(split(/:/, `grep ^$runasUser: /etc/passwd`))[2];
collectl-4.3.1/collectl-513- error("can't find '$runasUser' in /etc/passwd. Consider UID.") if !defined($runasUid);
##############################################
collectl-4.3.1/collectl-516- {
collectl-4.3.1/collectl:517: $runasGid=(split(/:/, `grep ^$runasGroup: /etc/group`))[2];
collectl-4.3.1/collectl-518- error("can't find '$runasGroup' in /etc/group. Consider GID.") if !defined($runasGid);
##############################################
collectl-4.3.1/collectl-1063-{
collectl-4.3.1/collectl:1064: my @cpus=eval("($cpuRange)");
collectl-4.3.1/collectl-1065- foreach my $cpu (@cpus)
##############################################
collectl-4.3.1/collectl-1273- # it further on so not to worry, but at least record a warning.
collectl-4.3.1/collectl:1274: $pid=`$Cat $PidFile`;
collectl-4.3.1/collectl-1275- chomp $pid;
##############################################
collectl-4.3.1/collectl-1552-# if -N, set priority to 20
collectl-4.3.1/collectl:1553:`renice 20 $$` if $niceFlag;
collectl-4.3.1/collectl-1554-
##############################################
collectl-4.3.1/collectl-1559-# get parent pid so we can check later to see it still there
collectl-4.3.1/collectl:1560:$stat=`cat /proc/$$/stat`;
collectl-4.3.1/collectl-1561-$myPpid=(split(/\s+/, $stat))[3];
##############################################
collectl-4.3.1/collectl-2454- open STDERR, '>/dev/null' or logmsg("F", "Can't write to /dev/null: $!");
collectl-4.3.1/collectl:2455: `echo $$ > $PidFile`;
collectl-4.3.1/collectl-2456-
##############################################
collectl-4.3.1/collectl-2470-
collectl-4.3.1/collectl:2471: `chown $runasUid $logname`;
collectl-4.3.1/collectl:2472: `chgrp $runasGid $logname` if defined($runasGid);
collectl-4.3.1/collectl-2473-
##############################################
collectl-4.3.1/collectl-2989- {
collectl-4.3.1/collectl:2990: getExec(5, "/sbin/opapmaquery -h $HCAId[$i] -p $j -o getdatacounters", "ib$i-$j:opa");
collectl-4.3.1/collectl-2991- }
##############################################
collectl-4.3.1/collectl-3006- {
collectl-4.3.1/collectl:3007: getExec(1, "$PQuery $PQopt -C $HCAId[$i] -P $j", "ib$i-$j:pquery");
collectl-4.3.1/collectl-3008- }
##############################################
collectl-4.3.1/collectl-3170- $command="$Ipmitool sdr dump $IpmiCache";
collectl-4.3.1/collectl:3171: `$command`;
collectl-4.3.1/collectl-3172- }
##############################################
collectl-4.3.1/collectl-3174- # About the same overhead to invoke ipmitool twice but much less elapsed time.
collectl-4.3.1/collectl:3175: getExec(3, "$Ipmitool -c -S $IpmiCache exec $ipmiExec", 'ipmi');
collectl-4.3.1/collectl-3176- $counted3=0;
##############################################
collectl-4.3.1/collectl-4351- logmsg('W', "Creating directory '$temp'");
collectl-4.3.1/collectl:4352: `mkdir $temp`;
collectl-4.3.1/collectl-4353- }
##############################################
collectl-4.3.1/collectl-5406- $SubsysExcore="$SubsysCore$SubsysExcore";
collectl-4.3.1/collectl:5407: error("config file entry for '$param' contains invalid subsystem(s) - $value")
collectl-4.3.1/collectl-5408- if $value!~/^[$SubsysExcore]+$/;
##############################################
collectl-4.3.1/collectl-5902-
collectl-4.3.1/collectl:5903: @passwd=`$Cat $passwd`;
collectl-4.3.1/collectl-5904- foreach $line (@passwd)
##############################################
collectl-4.3.1/.pc/03_INIT.D_LSB_FIX.patch/initd/collectl-debian-91- echo "Flushing buffers for $PNAME"
collectl-4.3.1/.pc/03_INIT.D_LSB_FIX.patch/initd/collectl-debian:92: kill -s USR1 `cat $PIDFILE`
collectl-4.3.1/.pc/03_INIT.D_LSB_FIX.patch/initd/collectl-debian-93- else