=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== hw-probe-1.6~beta/OBS/appimage.yml-189- - install -D ./perl $BUILD_APPDIR/usr/bin/perl hw-probe-1.6~beta/OBS/appimage.yml:190: - cd lib && cat $BUILD_SOURCE_DIR/PERL5_BASE | while read i; do mkdir -p $BUILD_APPDIR/usr/lib/perl5/`dirname $i`; cp -fr $i $BUILD_APPDIR/usr/lib/perl5/$i; done hw-probe-1.6~beta/OBS/appimage.yml-191- # meta info ############################################## hw-probe-1.6~beta/README.md-197- hw-probe-1.6~beta/README.md:198:Note: The 'Launch' button doesn't display the probe window currently due to [bug 552](https://gitlab.gnome.org/GNOME/gnome-software/issues/552) in GNOME Software, but the probe is still created silently in the background process. Use desktop icon instead to launch the hardware probe properly or see probe log in `$HOME/.var/app/org.linux_hardware.hw-probe/data/HW_PROBE/LOG`. hw-probe-1.6~beta/README.md-199- ############################################## hw-probe-1.6~beta/flatpak/org.linux_hardware.hw-probe.yaml-436- - install -D ./perl $FLATPAK_DEST/bin/perl hw-probe-1.6~beta/flatpak/org.linux_hardware.hw-probe.yaml:437: - cd lib && cat $FLATPAK_DEST/share/PERL5_BASE | while read i; do mkdir -p $FLATPAK_DEST/share/perl5/`dirname $i`; cp -fr $i $FLATPAK_DEST/share/perl5/$i; done hw-probe-1.6~beta/flatpak/org.linux_hardware.hw-probe.yaml-438- sources: ############################################## hw-probe-1.6~beta/hw-probe.pl-2177- hw-probe-1.6~beta/hw-probe.pl:2178: return `LC_ALL=$LOCALE $AddPath$Cmd`; hw-probe-1.6~beta/hw-probe.pl-2179-} ############################################## hw-probe-1.6~beta/hw-probe.pl-2615- hw-probe-1.6~beta/hw-probe.pl:2616: system("(EDITOR=cat crontab -e 2>/dev/null | grep -v 'hw-probe' ; echo \"$CronTime * * * hw-probe -all -check -upload -monitoring -i ".$Opt{"Group"}."\") | crontab -"); hw-probe-1.6~beta/hw-probe.pl-2617- } ############################################## hw-probe-1.6~beta/hw-probe.pl-2653- hw-probe-1.6~beta/hw-probe.pl:2654: system("tar", "--directory", $TMP_DIR, "-xf", $Pkg); hw-probe-1.6~beta/hw-probe.pl-2655- if($?) ############################################## hw-probe-1.6~beta/hw-probe.pl-2754- $Pkg = $TMP_DIR."/hw.info.tgz"; hw-probe-1.6~beta/hw-probe.pl:2755: system("tar", "-czf", $Pkg, basename($DATA_DIR)); hw-probe-1.6~beta/hw-probe.pl-2756- } ############################################## hw-probe-1.6~beta/hw-probe.pl-2759- $Pkg = $TMP_DIR."/hw.info.txz"; hw-probe-1.6~beta/hw-probe.pl:2760: system("tar", "-cJf", $Pkg, basename($DATA_DIR)); hw-probe-1.6~beta/hw-probe.pl-2761- } ############################################## hw-probe-1.6~beta/hw-probe.pl-2800- my $Path = $_[0]; hw-probe-1.6~beta/hw-probe.pl:2801: return ($Path=~/\.(tar\.xz|txz|tar\.gz|tgz)\Z/ or `file "$Path"`=~/(XZ|gzip) compressed data/); hw-probe-1.6~beta/hw-probe.pl-2802-} ############################################## hw-probe-1.6~beta/hw-probe.pl-3436- printMsg("INFO", "Installing dependencies ..."); hw-probe-1.6~beta/hw-probe.pl:3437: system($NeedCmd); hw-probe-1.6~beta/hw-probe.pl-3438- } ############################################## hw-probe-1.6~beta/hw-probe.pl-3809- { # Live hw-probe-1.6~beta/hw-probe.pl:3810: my $Build = `head -n 1 $RpmLst 2>&1`; # iso build No.11506 hw-probe-1.6~beta/hw-probe.pl-3811- ############################################## hw-probe-1.6~beta/hw-probe.pl-5023- { hw-probe-1.6~beta/hw-probe.pl:5024: if($UsbLine=~/\A(\w+\d+) at (\w+\d+).+? addr (\d+)\Z/) hw-probe-1.6~beta/hw-probe.pl-5025- { ############################################## hw-probe-1.6~beta/hw-probe.pl-5033- { hw-probe-1.6~beta/hw-probe.pl:5034: if($UsbLine=~/\A(\w+\d+): .+? addr (\d+)\Z/) hw-probe-1.6~beta/hw-probe.pl-5035- { ############################################## hw-probe-1.6~beta/hw-probe.pl-5045- { hw-probe-1.6~beta/hw-probe.pl:5046: if($UsbLine=~/\A(\w+\d+): .+? class ([a-f\d]+)\/([a-f\d]+).+? addr (\d+).+? on (\w+\d+)\Z/) hw-probe-1.6~beta/hw-probe.pl-5047- { ############################################## hw-probe-1.6~beta/hw-probe.pl-12409- hw-probe-1.6~beta/hw-probe.pl:12410:sub probeHWaddr() hw-probe-1.6~beta/hw-probe.pl-12411-{ ############################################## hw-probe-1.6~beta/hw-probe.pl-12414- if($Opt{"FixProbe"}) { hw-probe-1.6~beta/hw-probe.pl:12415: $IFConfig = fixHWaddr(); hw-probe-1.6~beta/hw-probe.pl-12416- } ############################################## hw-probe-1.6~beta/hw-probe.pl-12462- { hw-probe-1.6~beta/hw-probe.pl:12463: if(my $Mac = $Socket->if_hwaddr($If)) hw-probe-1.6~beta/hw-probe.pl-12464- { ############################################## hw-probe-1.6~beta/hw-probe.pl-12478- hw-probe-1.6~beta/hw-probe.pl:12479: $Sys{"HWaddr"} = selectHWAddr(\@Ifs, \%Addrs); hw-probe-1.6~beta/hw-probe.pl-12480- } ############################################## hw-probe-1.6~beta/hw-probe.pl-12492- hw-probe-1.6~beta/hw-probe.pl:12493: $Sys{"HWaddr"} = detectHWaddr($IFConfig, $ByIPaddr); hw-probe-1.6~beta/hw-probe.pl-12494- ############################################## hw-probe-1.6~beta/hw-probe.pl-12541- hw-probe-1.6~beta/hw-probe.pl:12542:sub fixHWaddr() hw-probe-1.6~beta/hw-probe.pl-12543-{ ############################################## hw-probe-1.6~beta/hw-probe.pl-12578- { hw-probe-1.6~beta/hw-probe.pl:12579: if(my $NewAddr = detectHWaddr($IFConfig, $ByIPaddr)) { hw-probe-1.6~beta/hw-probe.pl-12580- $Sys{"HWaddr"} = $NewAddr; ############################################## hw-probe-1.6~beta/hw-probe.pl-12614- hw-probe-1.6~beta/hw-probe.pl:12615:sub detectHWaddr(@) hw-probe-1.6~beta/hw-probe.pl-12616-{ ############################################## hw-probe-1.6~beta/hw-probe.pl-12674- hw-probe-1.6~beta/hw-probe.pl:12675: return selectHWAddr(\@Devs, \%Addrs, $ByIPaddr, \%Blocks); hw-probe-1.6~beta/hw-probe.pl-12676-} ############################################## hw-probe-1.6~beta/hw-probe.pl-12698- hw-probe-1.6~beta/hw-probe.pl:12699:sub selectHWAddr(@) hw-probe-1.6~beta/hw-probe.pl-12700-{ ############################################## hw-probe-1.6~beta/hw-probe.pl-12726- { hw-probe-1.6~beta/hw-probe.pl:12727: if(my $RealMac = getRealHWaddr($NetDev)) { hw-probe-1.6~beta/hw-probe.pl-12728- $PermanentAddr{$NetDev} = clientHash($RealMac); ############################################## hw-probe-1.6~beta/hw-probe.pl-12810- hw-probe-1.6~beta/hw-probe.pl:12811:sub getRealHWaddr($) hw-probe-1.6~beta/hw-probe.pl-12812-{ ############################################## hw-probe-1.6~beta/hw-probe.pl-14477- listProbe("logs", "alsactl"); hw-probe-1.6~beta/hw-probe.pl:14478: system("alsactl store -f $TMP_DIR/alsactl 2>/dev/null"); hw-probe-1.6~beta/hw-probe.pl-14479- if(-f "$TMP_DIR/alsactl") { ############################################## hw-probe-1.6~beta/hw-probe.pl-14888- { hw-probe-1.6~beta/hw-probe.pl:14889: if(not `$Dir/$Cmd --version 2>/dev/null`) { hw-probe-1.6~beta/hw-probe.pl-14890- next; ############################################## hw-probe-1.6~beta/hw-probe.pl-14929- # extract *.dat hw-probe-1.6~beta/hw-probe.pl:14930: system("acpixtract -a \"$Dump\" >/dev/null 2>&1"); hw-probe-1.6~beta/hw-probe.pl-14931- ############################################## hw-probe-1.6~beta/hw-probe.pl-15007- chdir($TMP_DIR); hw-probe-1.6~beta/hw-probe.pl:15008: system("tar", "-m", "-xf", $Pkg); hw-probe-1.6~beta/hw-probe.pl-15009- chdir($ORIG_DIR); ############################################## hw-probe-1.6~beta/hw-probe.pl-16153- my $Cmd = getCurlCmd($Url); hw-probe-1.6~beta/hw-probe.pl:16154: return `$Cmd`; hw-probe-1.6~beta/hw-probe.pl-16155- ############################################## hw-probe-1.6~beta/hw-probe.pl-16168- my $Cmd = getCurlCmd($Url)." --output \"$Output\""; hw-probe-1.6~beta/hw-probe.pl:16169: return `$Cmd`; hw-probe-1.6~beta/hw-probe.pl-16170- ############################################## hw-probe-1.6~beta/hw-probe.pl-16208- hw-probe-1.6~beta/hw-probe.pl:16209: my $IndexInfo = eval ( readFile($Dir."/index.info") ) || {}; hw-probe-1.6~beta/hw-probe.pl-16210- ############################################## hw-probe-1.6~beta/hw-probe.pl-16295- my $TmpDir = $TMP_DIR."/hw.info"; hw-probe-1.6~beta/hw-probe.pl:16296: system("tar -xf $D/* -C $TMP_DIR"); hw-probe-1.6~beta/hw-probe.pl-16297- ############################################## hw-probe-1.6~beta/hw-probe.pl-16336- my $D = $Dir."/".$P; hw-probe-1.6~beta/hw-probe.pl:16337: my $Prop = eval ( readFile($D."/probe.info") ) || {}; hw-probe-1.6~beta/hw-probe.pl-16338- $Indexed{uc($Prop->{"hwaddr"})}{$P} = $Prop; ############################################## hw-probe-1.6~beta/hw-probe.pl-16346- my $LIST = ""; hw-probe-1.6~beta/hw-probe.pl:16347: foreach my $HWaddr (sort keys(%Indexed)) hw-probe-1.6~beta/hw-probe.pl-16348- { ############################################## hw-probe-1.6~beta/hw-probe.pl-16946- probeDmi(); hw-probe-1.6~beta/hw-probe.pl:16947: probeHWaddr(); hw-probe-1.6~beta/hw-probe.pl-16948- probeHW(); ############################################## hw-probe-1.6~beta/hw-probe.pl-16950- if(keys(%ExtraConnection)) { hw-probe-1.6~beta/hw-probe.pl:16951: fixHWaddr(); hw-probe-1.6~beta/hw-probe.pl-16952- } ############################################## hw-probe-1.6~beta/hw-probe.pl-17429- chdir($TmpDir); hw-probe-1.6~beta/hw-probe.pl:17430: system("tar", "-m", "-xf", $PName); hw-probe-1.6~beta/hw-probe.pl-17431- chdir($ORIG_DIR); ############################################## hw-probe-1.6~beta/hw-probe.pl-17585- fixChassis(); hw-probe-1.6~beta/hw-probe.pl:17586: probeHWaddr(); hw-probe-1.6~beta/hw-probe.pl-17587- probeHW(); ############################################## hw-probe-1.6~beta/hw-probe.pl-17589- if(keys(%ExtraConnection)) { hw-probe-1.6~beta/hw-probe.pl:17590: fixHWaddr(); hw-probe-1.6~beta/hw-probe.pl-17591- } ############################################## hw-probe-1.6~beta/hw-probe.pl-17725- { hw-probe-1.6~beta/hw-probe.pl:17726: probeHWaddr(); hw-probe-1.6~beta/hw-probe.pl-17727- if(not $Sys{"HWaddr"}) ############################################## hw-probe-1.6~beta/hw-probe.pl-17761- $Opt{"Probe"} = 1; hw-probe-1.6~beta/hw-probe.pl:17762: probeHWaddr(); hw-probe-1.6~beta/hw-probe.pl-17763- }