===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
backuppc-3.3.2/bin/BackupPC_archiveHost-144-#
backuppc-3.3.2/bin/BackupPC_archiveHost:145:my $ret = system(@shell, $cmd);
backuppc-3.3.2/bin/BackupPC_archiveHost-146-if ( $ret ) {
##############################################
backuppc-3.3.2/bin/BackupPC_archiveHost-159- my $parCmd = "$parPath c -r$parfile $outLocE/$host.$bkupNum.tar$fileExt.par2 $outLocE/$host.$bkupNum.tar$fileExt*";
backuppc-3.3.2/bin/BackupPC_archiveHost:160: $ret = system($parCmd);
backuppc-3.3.2/bin/BackupPC_archiveHost-161- if ( $ret ) {
##############################################
backuppc-3.3.2/bin/BackupPC_nightly-113- $reply = $1 if ( $reply =~ /(.*)/s );
backuppc-3.3.2/bin/BackupPC_nightly:114: eval($reply);
backuppc-3.3.2/bin/BackupPC_nightly-115-}
##############################################
backuppc-3.3.2/bin/BackupPC_nightly-230- print("log BackupPC_nightly now running BackupPC_sendEmail\n");
backuppc-3.3.2/bin/BackupPC_nightly:231: system("$BinDir/BackupPC_sendEmail");
backuppc-3.3.2/bin/BackupPC_nightly-232- doBackupInfoUpdate();
##############################################
backuppc-3.3.2/bin/BackupPC_sendEmail-154-my(%Status, %Info, %Jobs, @BgQueue, @UserQueue, @CmdQueue);
backuppc-3.3.2/bin/BackupPC_sendEmail:155:eval($reply);
backuppc-3.3.2/bin/BackupPC_sendEmail-156-
##############################################
backuppc-3.3.2/bin/BackupPC_sendEmail-295- if ( $lastGoodOutlook == 0 ) {
backuppc-3.3.2/bin/BackupPC_sendEmail:296: $howLong = eval("qq{$Lang->{howLong_not_been_backed_up}}");
backuppc-3.3.2/bin/BackupPC_sendEmail-297- } else {
backuppc-3.3.2/bin/BackupPC_sendEmail-298- $days = sprintf("%.1f", (time - $lastGoodOutlook) / (24*3600));
backuppc-3.3.2/bin/BackupPC_sendEmail:299: $howLong = eval("qq{$Lang->{howLong_not_been_backed_up_for_days_days}}");
backuppc-3.3.2/bin/BackupPC_sendEmail-300- }
##############################################
backuppc-3.3.2/bin/BackupPC-537- POSIX::nice($Conf{CmdQueueNice}) if ( $Conf{CmdQueueNice} );
backuppc-3.3.2/bin/BackupPC:538: exec(@$cmd);
backuppc-3.3.2/bin/BackupPC-539- print(LOG $bpc->timeStamp, "can't exec @$cmd for $host\n");
##############################################
backuppc-3.3.2/bin/BackupPC-709- setpgrp 0,0;
backuppc-3.3.2/bin/BackupPC:710: exec("$BinDir/$progName", @args);
backuppc-3.3.2/bin/BackupPC-711- print(LOG $bpc->timeStamp, "can't exec $progName for $host\n");
##############################################
backuppc-3.3.2/bin/BackupPC-1203- if (! -f "$LogDir/pool.rrd") {
backuppc-3.3.2/bin/BackupPC:1204: system("/usr/bin/rrdtool create $LogDir/pool.rrd --step 86400 DS:ckb:GAUGE:172800:0:U RRA:AVERAGE:0.5:1:1400");
backuppc-3.3.2/bin/BackupPC-1205- }
backuppc-3.3.2/bin/BackupPC:1206: system("/usr/bin/rrdtool update $LogDir/pool.rrd --template ckb $date:".($Info{"cpoolKb"}+$Info{"poolKb"}));
backuppc-3.3.2/bin/BackupPC-1207- #print(LOG $bpc->timeStamp, "RRD data\n");
##############################################
backuppc-3.3.2/bin/BackupPC-1604- my($port,$iaddr) = sockaddr_in($paddr);
backuppc-3.3.2/bin/BackupPC:1605: my $name = gethostbyaddr($iaddr, AF_INET);
backuppc-3.3.2/bin/BackupPC-1606- $ClientConnCnt++;
##############################################
backuppc-3.3.2/bin/BackupPC_dump-267-my(%StatusHost);
backuppc-3.3.2/bin/BackupPC_dump:268:eval($reply);
backuppc-3.3.2/bin/BackupPC_dump-269-$bpc->ServerDisconnect();
##############################################
backuppc-3.3.2/bin/BackupPC_restore-351- alarm(0);
backuppc-3.3.2/bin/BackupPC_restore:352: exec("$BinDir/BackupPC_tarCreate", @tarArgs);
backuppc-3.3.2/bin/BackupPC_restore-353- print(LOG $bpc->timeStamp, "can't exec $BinDir/BackupPC_tarCreate\n");
##############################################
backuppc-3.3.2/doc/BackupPC.html-652-
backuppc-3.3.2/doc/BackupPC.html:653:<p>As an alternative to setting <a href="#_conf_xfermethod_">$Conf{XferMethod}</a> to "smb" (using smbclient) for WinXX clients, you can use an smb network filesystem (eg: ksmbfs or similar) on your linux/unix server to mount the share, and then set <a href="#_conf_xfermethod_">$Conf{XferMethod}</a> to "tar" (use tar on the network mounted file system).</p>
backuppc-3.3.2/doc/BackupPC.html-654-
##############################################
backuppc-3.3.2/doc/BackupPC.html-974-
backuppc-3.3.2/doc/BackupPC.html:975:<p>where W.X.Y.Z is each candidate address from <a href="#_conf_dhcpaddressranges_">$Conf{DHCPAddressRanges}</a>. Any host that has a valid NetBIOS name returned by this command (ie: matching an entry in the hosts file) will be backed up. You can modify the specific nmblookup command if necessary via <a href="#_conf_nmblookupcmd_">$Conf{NmbLookupCmd}</a>.</p>
backuppc-3.3.2/doc/BackupPC.html-976-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/AdminOptions.pm-46- }
backuppc-3.3.2/lib/BackupPC/CGI/AdminOptions.pm:47: my $content = eval("qq{$Lang->{Admin_Options_Page}}");
backuppc-3.3.2/lib/BackupPC/CGI/AdminOptions.pm:48: Header(eval("qq{$Lang->{H_Admin_Options}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/AdminOptions.pm-49- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-94-EOF
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:95: my $content = eval("qq{$Lang->{BackupPC_Archive}}");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:96: Header(eval("qq{$Lang->{BackupPC__Archive}}"), $content, 1);
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-97- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-170- if ( $Conf{ArchiveClientCmd} =~ /\$archiveloc\b/ ) {
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:171: $paramStr .= eval("qq{$Lang->{BackupPC_Archive2_location}}");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-172- }
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-173- if ( $Conf{ArchiveClientCmd} =~ /\$compression\b/ ) {
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:174: $paramStr .= eval("qq{$Lang->{BackupPC_Archive2_compression}}");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-175- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-177- && -x $Conf{ParPath} ) {
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:178: $paramStr .= eval("qq{$Lang->{BackupPC_Archive2_parity}}");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-179- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-181- && -x $Conf{SplitPath} ) {
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:182: $paramStr .= eval("qq{$Lang->{BackupPC_Archive2_split}}");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-183- }
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:184: my $content = eval("qq{$Lang->{BackupPC_Archive2}}");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:185: Header(eval("qq{$Lang->{BackupPC__Archive}}"), $content, 1);
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-186- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-233- } else {
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:234: ErrorExit(eval("qq{$Lang->{Can_t_open_create__openPath}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-235- }
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-236- $reply = $bpc->ServerMesg("archive $User $archivehost $reqFileName");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:237: $str = eval("qq{$Lang->{Archive_requested}}");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-238-
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:239: my $content = eval("qq{$Lang->{BackupPC_Archive_Reply_from_server}}");
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm:240: Header(eval("qq{$Lang->{BackupPC__Archive}}"), $content, 1);
backuppc-3.3.2/lib/BackupPC/CGI/Archive.pm-241- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/ArchiveInfo.pm-59- if ( $i >= @Archives ) {
backuppc-3.3.2/lib/BackupPC/CGI/ArchiveInfo.pm:60: ErrorExit(eval("qq{$Lang->{Archive_number__num_for_host__does_not_exist}}"));
backuppc-3.3.2/lib/BackupPC/CGI/ArchiveInfo.pm-61- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/ArchiveInfo.pm-81-
backuppc-3.3.2/lib/BackupPC/CGI/ArchiveInfo.pm:82: my $content = eval("qq{$Lang->{Archive___num_details_for__host2 }}");
backuppc-3.3.2/lib/BackupPC/CGI/ArchiveInfo.pm:83: Header(eval("qq{$Lang->{Archive___num_details_for__host}}"), $content, 1);
backuppc-3.3.2/lib/BackupPC/CGI/ArchiveInfo.pm-84- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-51- if ( !$Privileged ) {
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:52: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_browse_backup_files}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-53- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-90- } else {
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:91: ErrorExit(eval("qq{$Lang->{Directory___EscHTML}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-92- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-110- $relDir = decode_utf8($relDir);
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:111: ErrorExit(eval("qq{$Lang->{Can_t_browse_bad_directory_name2}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-112- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-291- my $numF = join(", #", @mergeNums);
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:292: $filledBackup = eval("qq{$Lang->{This_display_is_merged_with_backup}}");
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-293- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-301- if ( $fileStr ) {
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:302: $fileHeader = eval("qq{$Lang->{fileHeader}}");
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-303-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-311- } else {
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:312: $fileStr = eval("qq{$Lang->{The_directory_is_empty}}");
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-313- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-324- }
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:325: $filledBackup .= eval("qq{$Lang->{Visit_this_directory_in_backup}}");
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-326- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-329-
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:330: my $content = eval("qq{$Lang->{Backup_browse_for__host}}");
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm:331: Header(eval("qq{$Lang->{Browse_backup__num_for__host}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/Browse.pm-332- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/DirHistory.pm-51- if ( !$Privileged ) {
backuppc-3.3.2/lib/BackupPC/CGI/DirHistory.pm:52: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_browse_backup_files}}"));
backuppc-3.3.2/lib/BackupPC/CGI/DirHistory.pm-53- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/DirHistory.pm-191- }
backuppc-3.3.2/lib/BackupPC/CGI/DirHistory.pm:192: my $content = eval("qq{$Lang->{DirHistory_for__host}}");
backuppc-3.3.2/lib/BackupPC/CGI/DirHistory.pm:193: Header(eval("qq{$Lang->{DirHistory_backup_for__host}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/DirHistory.pm-194- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EmailSummary.pm-82- }
backuppc-3.3.2/lib/BackupPC/CGI/EmailSummary.pm:83: my $content = eval("qq{$Lang->{Recent_Email_Summary}}");
backuppc-3.3.2/lib/BackupPC/CGI/EmailSummary.pm-84- Header($Lang->{Email_Summary}, $content);
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-49- if ( $host eq "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:50: ErrorExit(eval("qq{$Lang->{Unknown_host_or_user}}"));
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-51- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-66- CheckPermission();
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:67: ErrorExit(eval("qq{$Lang->{Unknown_host_or_user}}"))
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-68- if ( !defined($Hosts->{$host}) );
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-76- if ( !$Privileged ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:77: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_view_information_about}}"));
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-78- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-100- if ( $ArchiveStr ne "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:101: $ArchiveStr = eval("qq{$Lang->{Archive_Summary}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-102- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-106- if ( $StatusHost{BgQueueOn} ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:107: $statusStr .= eval("qq{$Lang->{Host_host_is_queued_on_the_background_queue_will_be_backed_up_soon}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-108- }
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-109- if ( $StatusHost{UserQueueOn} ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:110: $statusStr .= eval("qq{$Lang->{Host_host_is_queued_on_the_user_queue__will_be_backed_up_soon}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-111- }
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-112- if ( $StatusHost{CmdQueueOn} ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:113: $statusStr .= eval("qq{$Lang->{A_command_for_host_is_on_the_command_queue_will_run_soon}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-114- }
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-115-
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:116: my $content = eval("qq{$Lang->{Host__host_Archive_Summary2}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:117: Header(eval("qq{$Lang->{Host__host_Archive_Summary}}"), $content, 1);
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-118- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-229- if ( $restoreStr ne "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:230: $restoreStr = eval("qq{$Lang->{Restore_Summary}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-231- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-248- if ( $user ne "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:249: $statusStr .= eval("qq{$Lang->{This_PC_is_used_by}$moreUserStr}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-250- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-255- my $subj = $UserEmailInfo{$user}{$host}{lastSubj};
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:256: $statusStr .= eval("qq{$Lang->{Last_email_sent_to__was_at___subject}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-257- } elsif ( defined($UserEmailInfo{$user})
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-264- my $subj = $UserEmailInfo{$user}{lastSubj};
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:265: $statusStr .= eval("qq{$Lang->{Last_email_sent_to__was_at___subject}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-266- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-270- (my $cmd = $Jobs{$host}{cmd}) =~ s/$BinDir\///g;
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:271: $statusStr .= eval("qq{$Lang->{The_command_cmd_is_currently_running_for_started}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-272- }
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-273- if ( $StatusHost{BgQueueOn} ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:274: $statusStr .= eval("qq{$Lang->{Host_host_is_queued_on_the_background_queue_will_be_backed_up_soon}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-275- }
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-276- if ( $StatusHost{UserQueueOn} ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:277: $statusStr .= eval("qq{$Lang->{Host_host_is_queued_on_the_user_queue__will_be_backed_up_soon}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-278- }
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-279- if ( $StatusHost{CmdQueueOn} ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:280: $statusStr .= eval("qq{$Lang->{A_command_for_host_is_on_the_command_queue_will_run_soon}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-281- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-287- }
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:288: $statusStr .= eval("qq{$Lang->{Last_status_is_state_StatusHost_state_reason_as_of_startTime}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-289-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-292- && $StatusHost{error} ne "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:293: $statusStr .= eval("qq{$Lang->{Last_error_is____EscHTML_StatusHost_error}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-294- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-296- if ( $StatusHost{deadCnt} > 0 ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:297: $statusStr .= eval("qq{$Lang->{Pings_to_host_have_failed_StatusHost_deadCnt__consecutive_times}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-298- $priorStr = $Lang->{Prior_to_that__pings};
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-300- if ( $StatusHost{aliveCnt} > 0 ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:301: $statusStr .= eval("qq{$Lang->{priorStr_to_host_have_succeeded_StatusHostaliveCnt_consecutive_times}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-302-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-340- if ( $periodCnt == @{$Conf{BlackoutPeriods}} - 1 ) {
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:341: $blackoutStr .= eval("qq{$Lang->{and}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-342- $blackoutStr .= " ";
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-345- $blackoutStr
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:346: .= eval("qq{$Lang->{__time0_to__time1_on__days}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-347- $periodCnt++;
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-348- }
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:349: $statusStr .= eval("qq{$Lang->{Because__host_has_been_on_the_network_at_least__Conf_BlackoutGoodCnt_consecutive_times___}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-350- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-353- my $hours = sprintf("%.1f", ($StatusHost{backoffTime} - time) / 3600);
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:354: $statusStr .= eval("qq{$Lang->{Backups_are_deferred_for_hours_hours_change_this_number}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-355-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-365-
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:366: $startIncrStr = eval("qq{$startIncrStr}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:367: my $content = eval("qq{$Lang->{Host__host_Backup_Summary2}}");
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm:368: Header(eval("qq{$Lang->{Host__host_Backup_Summary}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/HostInfo.pm-369- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/LOGlist.pm-71- }
backuppc-3.3.2/lib/BackupPC/CGI/LOGlist.pm:72: my $content = eval("qq{$Lang->{Log_File_History__hdr}}");
backuppc-3.3.2/lib/BackupPC/CGI/LOGlist.pm-73- Header($Lang->{BackupPC__Log_File_History},
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Queue.pm-81- }
backuppc-3.3.2/lib/BackupPC/CGI/Queue.pm:82: my $content = eval ( "qq{$Lang->{Backup_Queue_Summary}}");
backuppc-3.3.2/lib/BackupPC/CGI/Queue.pm-83- Header($Lang->{BackupPC__Queue_Summary}, $content);
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-50- if ( !$Privileged ) {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:51: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_restore_backup_files}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-52- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-60- if ( !defined($Hosts->{$host}) ) {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:61: ErrorExit(eval("qq{$Lang->{Bad_host_name}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-62- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-138- $share = decode_utf8($share);
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:139: $content = eval("qq{$Lang->{Restore_Options_for__host2}}");
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-140-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-158- if ( eval { require Archive::Zip } ) {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:159: $content .= eval("qq{$Lang->{Option_2__Download_Zip_archive}}");
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-160- } else {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:161: $content .= eval("qq{$Lang->{Option_2__Download_Zip_archive2}}");
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-162- }
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:163: $content .= eval("qq{$Lang->{Option_3__Download_Zip_archive}}");
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:164: Header(eval("qq{$Lang->{Restore_Options_for__host}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-165- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-272- if ( !defined($Hosts->{$In{hostDest}}) ) {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:273: ErrorExit(eval("qq{$Lang->{Host__doesn_t_exist}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-274- }
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-275- if ( !CheckPermission($In{hostDest}) ) {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:276: ErrorExit(eval("qq{$Lang->{You_don_t_have_permission_to_restore_onto_host}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-277- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-289- unless ( BackupPC::Xfer::restoreEnabled( \%Conf ) ) {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:290: ErrorExit(eval("qq{$Lang->{Restore_Options_for__host_Option1_disabled}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-291- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-309- $In{pathHdr} = decode_utf8($In{pathHdr});
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:310: my $content = eval("qq{$Lang->{Are_you_sure}}");
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:311: Header(eval("qq{$Lang->{Restore_Confirm_on__host}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-312- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-314- if ( !defined($Hosts->{$In{hostDest}}) ) {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:315: ErrorExit(eval("qq{$Lang->{Host__doesn_t_exist}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-316- }
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-317- if ( !CheckPermission($In{hostDest}) ) {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:318: ErrorExit(eval("qq{$Lang->{You_don_t_have_permission_to_restore_onto_host}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-319- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-366- } else {
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:367: ErrorExit(eval("qq{$Lang->{Can_t_open_create__openPath}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-368- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-370- . " ${EscURI($hostDest)} $User $reqFileName");
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:371: $str = eval("qq{$Lang->{Restore_requested_to_host__hostDest__backup___num}}");
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:372: my $content = eval("qq{$Lang->{Reply_from_server_was___reply}}");
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm:373: Header(eval("qq{$Lang->{Restore_Requested_on__hostDest}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/Restore.pm-374- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/RestoreFile.pm-51-
backuppc-3.3.2/lib/BackupPC/CGI/RestoreFile.pm:52: ErrorExit(eval("qq{$Lang->{Invalid_number__num}}"))
backuppc-3.3.2/lib/BackupPC/CGI/RestoreFile.pm-53- if ( $num ne "" && $num !~ /^\d+$/ );
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/RestoreFile.pm-152- if ( !$Privileged ) {
backuppc-3.3.2/lib/BackupPC/CGI/RestoreFile.pm:153: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_restore_backup_files2}}"));
backuppc-3.3.2/lib/BackupPC/CGI/RestoreFile.pm-154- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/RestoreInfo.pm-60- if ( $i >= @Restores ) {
backuppc-3.3.2/lib/BackupPC/CGI/RestoreInfo.pm:61: ErrorExit(eval("qq{$Lang->{Restore_number__num_for_host__does_not_exist}}"));
backuppc-3.3.2/lib/BackupPC/CGI/RestoreInfo.pm-62- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/RestoreInfo.pm-93- $RestoreReq{shareDest} = decode_utf8($RestoreReq{shareDest});
backuppc-3.3.2/lib/BackupPC/CGI/RestoreInfo.pm:94: my $content = eval("qq{$Lang->{Restore___num_details_for__host2}}");
backuppc-3.3.2/lib/BackupPC/CGI/RestoreInfo.pm:95: Header(eval("qq{$Lang->{Restore___num_details_for__host}}"),$content);
backuppc-3.3.2/lib/BackupPC/CGI/RestoreInfo.pm-96- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm-55-
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm:56: $rss->channel( title => eval("qq{$Lang->{RSS_Doc_Title}}"),
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm-57- link => $base_url,
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm-58- language => $Conf{Language},
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm:59: description => eval("qq{$Lang->{RSS_Doc_Description}}"),
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm-60- );
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm-125-
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm:126: $str = eval("qq{$Lang->{RSS_Host_Summary}}");
backuppc-3.3.2/lib/BackupPC/CGI/RSS.pm-127-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/StartServer.pm-52- my $serverInitdStartCmd = $bpc->cmdVarSubstitute($bpc->{Conf}{ServerInitdStartCmd}, $args);
backuppc-3.3.2/lib/BackupPC/CGI/StartServer.pm:53: $bpc->cmdSystemOrEval($serverInitdStartCmd, undef, $args);
backuppc-3.3.2/lib/BackupPC/CGI/StartServer.pm-54- for ( my $i = 0; $i < 10; $i++ ) {
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-53- if ( !$Privileged ) {
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:54: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_stop_or_start_backups}}"));
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-55- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-62- . " $User $doFull");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:63: $str = eval("qq{$Lang->{Backup_requested_on_DHCP__host}}");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-64- } else {
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-66- . " ${EscURI($host)} $User $doFull");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:67: $str = eval("qq{$Lang->{Backup_requested_on__host_by__User}}");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-68- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-70- $reply = $bpc->ServerMesg("stop ${EscURI($host)} $User $In{backoff}");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:71: $str = eval("qq{$Lang->{Backup_stopped_dequeued_on__host_by__User}}");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-72- }
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:73: my $content = eval ("qq{$Lang->{REPLY_FROM_SERVER}}");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:74: Header(eval ("qq{$Lang->{BackupPC__Backup_Requested_on__host}}"),$content);
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-75-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-86- my $buttonText = $Lang->{$In{action}};
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:87: my $content = eval("qq{$Lang->{Are_you_sure_start}}");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:88: Header(eval("qq{$Lang->{BackupPC__Start_Backup_Confirm_on__host}}"),$content);
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-89- } else {
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-96- my $buttonText = $Lang->{$In{action}};
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:97: my $content = eval ("qq{$Lang->{Are_you_sure_stop}}");
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm:98: Header(eval("qq{$Lang->{BackupPC__Stop_Backup_Confirm_on__host}}"),
backuppc-3.3.2/lib/BackupPC/CGI/StartStopBackup.pm-99- $content);
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Summary.pm-167-
backuppc-3.3.2/lib/BackupPC/CGI/Summary.pm:168: my $content = eval ("qq{$Lang->{BackupPC_Summary}}");
backuppc-3.3.2/lib/BackupPC/CGI/Summary.pm-169- Header($Lang->{BackupPC__Server_Summary}, $content);
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-147- && $> != (my $uid = (getpwnam($Conf{BackupPCUser}))[2]) ) {
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:148: ErrorExit(eval("qq{$Lang->{Wrong_user__my_userid_is___}}"), <<EOF);
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-149-This script needs to run as the user specified in \$Conf{BackupPCUser},
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-290- } else {
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:291: my $content = eval("qq{$Lang->{Error____head}}");
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:292: Header(eval("qq{$Lang->{Error}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-293- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-308- && $Conf{ServerInitdStartCmd} ne "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:309: my $content = eval("qq{$Lang->{Admin_Start_Server}}");
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:310: Header(eval("qq{$Lang->{Unable_to_connect_to_BackupPC_server}}"), $content);
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-311- Trailer();
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-313- } else {
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:314: ErrorExit(eval("qq{$Lang->{Unable_to_connect_to_BackupPC_server}}"),
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:315: eval("qq{$Lang->{Unable_to_connect_to_BackupPC_server_error_message}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-316- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-327- $reply = $1 if ( $reply =~ /(.*)/s );
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:328: eval($reply);
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-329- # ignore status related to admin and trashClean jobs
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-417- && $StatusHost{dhcpHostIP} ne $ipAddr ) {
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:418: $tryIP = eval("qq{$Lang->{tryIP}}");
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-419- ($netBiosHost, $netBiosUser)
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-422- if ( $netBiosHost ne $host ) {
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:423: ErrorExit(eval("qq{$Lang->{Can_t_find_IP_address_for}}"),
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm:424: eval("qq{$Lang->{host_is_a_DHCP_host}}"));
backuppc-3.3.2/lib/BackupPC/CGI/Lib.pm-425- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-54-
backuppc-3.3.2/lib/BackupPC/CGI/View.pm:55: ErrorExit(eval("qq{$Lang->{Invalid_number__num}}"))
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-56- if ( $num ne "" && $num !~ /^\d+$/ );
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-110- my($contentPre, $contentSub, $contentPost);
backuppc-3.3.2/lib/BackupPC/CGI/View.pm:111: $contentPre .= eval("qq{$Lang->{Log_File__file__comment}}");
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-112- if ( $file ne ""
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-117-
backuppc-3.3.2/lib/BackupPC/CGI/View.pm:118: $contentPre .= eval("qq{$Lang->{Contents_of_log_file}}");
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-119-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-132- if ( $s eq "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/View.pm:133: $c .= eval("qq{$Lang->{skipped__skipped_lines}}")
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-134- if ( $skipped );
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-161- }
backuppc-3.3.2/lib/BackupPC/CGI/View.pm:162: $c .= eval("qq{$Lang->{skipped__skipped_lines}}")
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-163- if ( $skipped );
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-253- if ( $type eq "docs" ) {
backuppc-3.3.2/lib/BackupPC/CGI/View.pm:254: ErrorExit(eval("qq{$Lang->{Unable_to_open__file__configuration_problem}}"));
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-255- }
backuppc-3.3.2/lib/BackupPC/CGI/View.pm:256: $contentPre .= eval("qq{$Lang->{_pre___Can_t_open_log_file__file}}");
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-257- }
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-258- $contentPost .= "</pre>\n" if ( $type ne "docs" );
backuppc-3.3.2/lib/BackupPC/CGI/View.pm:259: Header(eval("qq{$Lang->{Backup_PC__Log_File__file}}"),
backuppc-3.3.2/lib/BackupPC/CGI/View.pm-260- $contentPre, !-f "$TopDir/pc/$host/backups",
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-390- if ( !$Privileged ) {
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:391: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_edit_config_files}}"));
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-392- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-500- next if ( $menuDisable{$m}{top} );
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:501: my $text = eval("qq($Lang->{$ConfigMenu{$m}{text}})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-502- if ( $m eq $menu ) {
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-513- if ( $host eq "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:514: $content .= eval("qq($Lang->{CfgEdit_Header_Main})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-515- } else {
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:516: $content .= eval("qq($Lang->{CfgEdit_Header_Host})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-517- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-748- my $copyHost = $2;
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:749: $err .= eval("qq($Lang->{CfgEdit_Error_Copy_host_does_not_exist})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-750- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-765- $err .= $bpc->ConfigDataWrite(lc($host), $confData);
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:766: $mesg .= eval("qq($Lang->{CfgEdit_Log_Copy_host_config})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-767- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-811- if ( defined($paramInfo->{text}) ) {
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:812: my $text = eval("qq($Lang->{$paramInfo->{text}})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-813- $tblContent .= <<EOF;
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-841- my $topDir = $bpc->TopDir;
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:842: my $text = eval("qq($Lang->{$paramInfo->{comment}})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-843- $tblContent .= <<EOF;
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1369- && $In{"v_zZ_$varName"} ne "" ) {
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1370: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_an_integer}}");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1371- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1375- $errors->{$varName}
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1376: = eval("qq{$Lang->{CfgEdit_Error__must_be_real_valued_number}}");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1377- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1384- my $k = $i + 1;
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1385: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__entry__must_be_an_integer}}");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1386- } elsif ( $type->{child} eq "float"
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1389- my $k = $i + 1;
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1390: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__entry__must_be_real_valued_number}}");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1391- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1400- }
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1401: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_valid_option}}")
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1402- if ( !$match );
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1404- if ( $In{"v_zZ_$varName"} ne "" && !-x $In{"v_zZ_$varName"} ) {
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1405: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_executable_program}}");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1406- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1539- } elsif ( exists($oldConf->{$p}) && !exists($newConf->{$p}) ) {
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1540: $mesg .= eval("qq($Lang->{CfgEdit_Log_Delete_param})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1541- } elsif ( !exists($oldConf->{$p}) && exists($newConf->{$p}) ) {
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1552-
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1553: $mesg .= eval("qq($Lang->{CfgEdit_Log_Add_param_value})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1554- } else {
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1584-
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1585: $mesg .= eval("qq($Lang->{CfgEdit_Log_Change_param_value})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1586- }
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1598- if ( !defined($hostsNew->{$host}) ) {
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1599: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Delete})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1600- $hostChange++;
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1606- my $valueNew = $hostsNew->{$host}{$key};
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1607: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Change})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1608- $hostChange++;
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1620- $value =~ s/\r/\\r/g;
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm:1621: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Add})");
backuppc-3.3.2/lib/BackupPC/CGI/EditConfig.pm-1622- $hostChange++;
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm-52- print "Content-type: image/png\n\n";
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm:53: print `/usr/bin/rrdtool graph - --imgformat=PNG --start=end-${weeks}w --end=-300 --title="BackupPC Pool Size (${weeks} weeks)" --base=1000 --height=100 --width=600 --alt-autoscale-max --lower-limit=0 --vertical-label="" --slope-mode --font TITLE:10:Times --font AXIS:8:Times --font LEGEND:8:Times --font UNIT:8:Times -c BACK#FFFFFF DEF:ao="$LogDir/pool.rrd":ckb:AVERAGE CDEF:a=ao,1024,* AREA:a#95B8DB:"CPool in bytes" GPRINT:a:LAST:"Current\\:%8.2lf %s" GPRINT:a:AVERAGE:"Average\\:%8.2lf %s" GPRINT:a:MAX:"Maximum\\:%8.2lf %s\\n"`;
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm-54- $< = $real; ### SUID
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm-139- }
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm:140: my $generalInfo = eval("qq{$Lang->{BackupPC_Server_Status_General_Info}}")
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm-141- if ( $Privileged );
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm:142: my $content = eval("qq{$Lang->{BackupPC_Server_Status}}");
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm-143-
##############################################
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm-158- $info->{"${name}FileCntRm"} = $info->{"${name}FileCntRm"} + 0;
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm:159: return eval("qq{$Lang->{Pool_Stat}}");
backuppc-3.3.2/lib/BackupPC/CGI/GeneralInfo.pm-160-}
##############################################
backuppc-3.3.2/lib/BackupPC/Storage/Text.pm-386- $skipExpr = $1 if ( $skipExpr =~ /(.*)/s );
backuppc-3.3.2/lib/BackupPC/Storage/Text.pm:387: eval($skipExpr);
backuppc-3.3.2/lib/BackupPC/Storage/Text.pm-388- $skipExpr = undef if ( $@ eq "" );
##############################################
backuppc-3.3.2/lib/BackupPC/Xfer/Protocol.pm-392-
backuppc-3.3.2/lib/BackupPC/Xfer/Protocol.pm:393: foreach my $include ( @{$includes} ) {
backuppc-3.3.2/lib/BackupPC/Xfer/Protocol.pm-394-
##############################################
backuppc-3.3.2/lib/BackupPC/Xfer/Rsync.pm-289- $bpc->verbose(0);
backuppc-3.3.2/lib/BackupPC/Xfer/Rsync.pm:290: $bpc->cmdExecOrEval($rsyncClientCmd, $args);
backuppc-3.3.2/lib/BackupPC/Xfer/Rsync.pm-291- },
##############################################
backuppc-3.3.2/lib/BackupPC/Xfer/Tar.pm-161- alarm(0);
backuppc-3.3.2/lib/BackupPC/Xfer/Tar.pm:162: $bpc->cmdExecOrEval($tarClientCmd, $args);
backuppc-3.3.2/lib/BackupPC/Xfer/Tar.pm-163- # should not be reached, but just in case...
##############################################
backuppc-3.3.2/lib/BackupPC/Xfer/Smb.pm-168- alarm(0);
backuppc-3.3.2/lib/BackupPC/Xfer/Smb.pm:169: $bpc->cmdExecOrEval($smbClientCmd, $args);
backuppc-3.3.2/lib/BackupPC/Xfer/Smb.pm-170- # should not be reached, but just in case...
##############################################
backuppc-3.3.2/lib/BackupPC/Lib.pm-383- foreach my $module ( @{$bpc->{Conf}{PerlModuleLoad}} ) {
backuppc-3.3.2/lib/BackupPC/Lib.pm:384: eval("use $module;");
backuppc-3.3.2/lib/BackupPC/Lib.pm-385- }
##############################################
backuppc-3.3.2/lib/BackupPC/Lib.pm-1005- #
backuppc-3.3.2/lib/BackupPC/Lib.pm:1006: $s = $bpc->cmdSystemOrEval($pingCmd, undef, $args);
backuppc-3.3.2/lib/BackupPC/Lib.pm-1007- if ( $? ) {
##############################################
backuppc-3.3.2/lib/BackupPC/Lib.pm-1015- #
backuppc-3.3.2/lib/BackupPC/Lib.pm:1016: $s = $bpc->cmdSystemOrEval($pingCmd, undef, $args);
backuppc-3.3.2/lib/BackupPC/Lib.pm-1017- if ( $? ) {
##############################################
backuppc-3.3.2/lib/BackupPC/Lib.pm-1048- $dfCmd = $bpc->cmdVarSubstitute($bpc->{Conf}{DfCmd}, $args);
backuppc-3.3.2/lib/BackupPC/Lib.pm:1049: $s = $bpc->cmdSystemOrEval($dfCmd, undef, $args);
backuppc-3.3.2/lib/BackupPC/Lib.pm-1050- return 0 if ( $? || $s !~ /(\d+)%/s );
##############################################
backuppc-3.3.2/lib/BackupPC/Lib.pm-1077- $nmbCmd = $bpc->cmdVarSubstitute($bpc->{Conf}{NmbLookupCmd}, $args);
backuppc-3.3.2/lib/BackupPC/Lib.pm:1078: foreach ( split(/[\n\r]+/, $bpc->cmdSystemOrEval($nmbCmd, undef, $args)) ) {
backuppc-3.3.2/lib/BackupPC/Lib.pm-1079- #
##############################################
backuppc-3.3.2/lib/BackupPC/Lib.pm-1315- if ( $bpc->{verbose} );
backuppc-3.3.2/lib/BackupPC/Lib.pm:1316: eval($cmd);
backuppc-3.3.2/lib/BackupPC/Lib.pm-1317- print(STDERR "Perl code fragment for exec shouldn't return!!\n");
##############################################
backuppc-3.3.2/lib/BackupPC/Lib.pm-1357- if ( $bpc->{verbose} );
backuppc-3.3.2/lib/BackupPC/Lib.pm:1358: $out = eval($cmd);
backuppc-3.3.2/lib/BackupPC/Lib.pm-1359- $$stdoutCB .= $out if ( ref($stdoutCB) eq 'SCALAR' );
##############################################
backuppc-3.3.2/debian/BackupPC_deleteFile-489- $dirflag=1; #Only enforce directory check in @Baks because only deleting there
backuppc-3.3.2/debian/BackupPC_deleteFile:490: printerr "Skipping directory `$Host/*/$File` since -r flag not set\n\n";
backuppc-3.3.2/debian/BackupPC_deleteFile-491- last;
##############################################
backuppc-3.3.2/debian/patches/01-debian.patch-28-+ if (! -f "$LogDir/pool.rrd") {
backuppc-3.3.2/debian/patches/01-debian.patch:29:+ system("/usr/bin/rrdtool create $LogDir/pool.rrd --step 86400 DS:ckb:GAUGE:172800:0:U RRA:AVERAGE:0.5:1:1400");
backuppc-3.3.2/debian/patches/01-debian.patch-30-+ }
backuppc-3.3.2/debian/patches/01-debian.patch:31:+ system("/usr/bin/rrdtool update $LogDir/pool.rrd --template ckb $date:".($Info{"cpoolKb"}+$Info{"poolKb"}));
backuppc-3.3.2/debian/patches/01-debian.patch-32-+ #print(LOG $bpc->timeStamp, "RRD data\n");
##############################################
backuppc-3.3.2/debian/patches/01-debian.patch-192-@@ -390,6 +390,9 @@
backuppc-3.3.2/debian/patches/01-debian.patch:193: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_edit_config_files}}"));
backuppc-3.3.2/debian/patches/01-debian.patch-194- }
##############################################
backuppc-3.3.2/debian/patches/01-debian.patch-211-+ print "Content-type: image/png\n\n";
backuppc-3.3.2/debian/patches/01-debian.patch:212:+ print `/usr/bin/rrdtool graph - --imgformat=PNG --start=end-${weeks}w --end=-300 --title="BackupPC Pool Size (${weeks} weeks)" --base=1000 --height=100 --width=600 --alt-autoscale-max --lower-limit=0 --vertical-label="" --slope-mode --font TITLE:10:Times --font AXIS:8:Times --font LEGEND:8:Times --font UNIT:8:Times -c BACK#FFFFFF DEF:ao="$LogDir/pool.rrd":ckb:AVERAGE CDEF:a=ao,1024,* AREA:a#95B8DB:"CPool in bytes" GPRINT:a:LAST:"Current\\:%8.2lf %s" GPRINT:a:AVERAGE:"Average\\:%8.2lf %s" GPRINT:a:MAX:"Maximum\\:%8.2lf %s\\n"`;
backuppc-3.3.2/debian/patches/01-debian.patch-213-+ return;
##############################################
backuppc-3.3.2/debian/patches/01-debian.patch-219-@@ -129,6 +137,11 @@
backuppc-3.3.2/debian/patches/01-debian.patch:220: my $generalInfo = eval("qq{$Lang->{BackupPC_Server_Status_General_Info}}")
backuppc-3.3.2/debian/patches/01-debian.patch-221- if ( $Privileged );
backuppc-3.3.2/debian/patches/01-debian.patch:222: my $content = eval("qq{$Lang->{BackupPC_Server_Status}}");
backuppc-3.3.2/debian/patches/01-debian.patch-223-+
##############################################
backuppc-3.3.2/debian/patches/06-fix-rrd-graph-permissions.patch-17- print "Content-type: image/png\n\n";
backuppc-3.3.2/debian/patches/06-fix-rrd-graph-permissions.patch:18: print `/usr/bin/rrdtool graph - --imgformat=PNG --start=end-${weeks}w --end=-300 --title="BackupPC Pool Size (${weeks} weeks)" --base=1000 --height=100 --width=600 --alt-autoscale-max --lower-limit=0 --vertical-label="" --slope-mode --font TITLE:10:Times --font AXIS:8:Times --font LEGEND:8:Times --font UNIT:8:Times -c BACK#FFFFFF DEF:ao="$LogDir/pool.rrd":ckb:AVERAGE CDEF:a=ao,1024,* AREA:a#95B8DB:"CPool in bytes" GPRINT:a:LAST:"Current\\:%8.2lf %s" GPRINT:a:AVERAGE:"Average\\:%8.2lf %s" GPRINT:a:MAX:"Maximum\\:%8.2lf %s\\n"`;
backuppc-3.3.2/debian/patches/06-fix-rrd-graph-permissions.patch-19-+ $< = $real; ### SUID
##############################################
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC-537- POSIX::nice($Conf{CmdQueueNice}) if ( $Conf{CmdQueueNice} );
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC:538: exec(@$cmd);
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC-539- print(LOG $bpc->timeStamp, "can't exec @$cmd for $host\n");
##############################################
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC-709- setpgrp 0,0;
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC:710: exec("$BinDir/$progName", @args);
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC-711- print(LOG $bpc->timeStamp, "can't exec $progName for $host\n");
##############################################
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC-1595- my($port,$iaddr) = sockaddr_in($paddr);
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC:1596: my $name = gethostbyaddr($iaddr, AF_INET);
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC-1597- $ClientConnCnt++;
##############################################
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC_dump-266-my(%StatusHost);
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC_dump:267:eval($reply);
backuppc-3.3.2/.pc/01-debian.patch/bin/BackupPC_dump-268-$bpc->ServerDisconnect();
##############################################
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-51-
backuppc-3.3.2/.pc/01-debian.patch/configure.pl:52:my $EncodeVersion = eval($Encode::VERSION);
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-53-if ( $EncodeVersion < 1.99 ) {
##############################################
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-311-EOF
backuppc-3.3.2/.pc/01-debian.patch/configure.pl:312:chomp($Conf{ServerHost} = `$Conf{HostnamePath}`)
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-313- if ( defined($Conf{HostnamePath}) && !defined($Conf{ServerHost}) );
##############################################
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-808- } elsif ( ($^O eq "linux" || $^O eq "openbsd" || $^O eq "netbsd")
backuppc-3.3.2/.pc/01-debian.patch/configure.pl:809: && !system("$Conf{PingPath} -c 1 -w 3 localhost") ) {
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-810- $Conf{PingCmd} = '$pingPath -c 1 -w 3 $host';
##############################################
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-856- $str =~ s/^\s*\$Conf\{.*?\}\s*=\s*/\$new = /m;
backuppc-3.3.2/.pc/01-debian.patch/configure.pl:857: eval($str);
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-858- foreach my $p ( keys(%$new) ) {
##############################################
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-968-
backuppc-3.3.2/.pc/01-debian.patch/configure.pl:969:if ( `$Conf{PerlPath} -V` =~ /uselargefiles=undef/ ) {
backuppc-3.3.2/.pc/01-debian.patch/configure.pl-970- print <<EOF;
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-389- if ( !$Privileged ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:390: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_edit_config_files}}"));
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-391- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-496- next if ( $menuDisable{$m}{top} );
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:497: my $text = eval("qq($Lang->{$ConfigMenu{$m}{text}})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-498- if ( $m eq $menu ) {
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-509- if ( $host eq "" ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:510: $content .= eval("qq($Lang->{CfgEdit_Header_Main})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-511- } else {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:512: $content .= eval("qq($Lang->{CfgEdit_Header_Host})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-513- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-744- my $copyHost = $2;
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:745: $err .= eval("qq($Lang->{CfgEdit_Error_Copy_host_does_not_exist})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-746- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-761- $err .= $bpc->ConfigDataWrite(lc($host), $confData);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:762: $mesg .= eval("qq($Lang->{CfgEdit_Log_Copy_host_config})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-763- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-807- if ( defined($paramInfo->{text}) ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:808: my $text = eval("qq($Lang->{$paramInfo->{text}})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-809- $tblContent .= <<EOF;
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-837- my $topDir = $bpc->TopDir;
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:838: my $text = eval("qq($Lang->{$paramInfo->{comment}})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-839- $tblContent .= <<EOF;
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1365- && $In{"v_zZ_$varName"} ne "" ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1366: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_an_integer}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1367- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1371- $errors->{$varName}
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1372: = eval("qq{$Lang->{CfgEdit_Error__must_be_real_valued_number}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1373- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1380- my $k = $i + 1;
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1381: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__entry__must_be_an_integer}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1382- } elsif ( $type->{child} eq "float"
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1385- my $k = $i + 1;
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1386: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__entry__must_be_real_valued_number}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1387- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1396- }
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1397: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_valid_option}}")
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1398- if ( !$match );
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1400- if ( $In{"v_zZ_$varName"} ne "" && !-x $In{"v_zZ_$varName"} ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1401: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_executable_program}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1402- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1535- } elsif ( exists($oldConf->{$p}) && !exists($newConf->{$p}) ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1536: $mesg .= eval("qq($Lang->{CfgEdit_Log_Delete_param})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1537- } elsif ( !exists($oldConf->{$p}) && exists($newConf->{$p}) ) {
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1548-
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1549: $mesg .= eval("qq($Lang->{CfgEdit_Log_Add_param_value})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1550- } else {
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1580-
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1581: $mesg .= eval("qq($Lang->{CfgEdit_Log_Change_param_value})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1582- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1594- if ( !defined($hostsNew->{$host}) ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1595: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Delete})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1596- $hostChange++;
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1602- my $valueNew = $hostsNew->{$host}{$key};
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1603: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Change})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1604- $hostChange++;
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1616- $value =~ s/\r/\\r/g;
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm:1617: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Add})");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/EditConfig.pm-1618- $hostChange++;
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/GeneralInfo.pm-128- }
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/GeneralInfo.pm:129: my $generalInfo = eval("qq{$Lang->{BackupPC_Server_Status_General_Info}}")
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/GeneralInfo.pm-130- if ( $Privileged );
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/GeneralInfo.pm:131: my $content = eval("qq{$Lang->{BackupPC_Server_Status}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/GeneralInfo.pm-132- Header($Lang->{H_BackupPC_Server_Status}, $content);
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/GeneralInfo.pm-142- $info->{"${name}FileCntRm"} = $info->{"${name}FileCntRm"} + 0;
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/GeneralInfo.pm:143: return eval("qq{$Lang->{Pool_Stat}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/GeneralInfo.pm-144-}
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-147- && $> != (my $uid = (getpwnam($Conf{BackupPCUser}))[2]) ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:148: ErrorExit(eval("qq{$Lang->{Wrong_user__my_userid_is___}}"), <<EOF);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-149-This script needs to run as the user specified in \$Conf{BackupPCUser},
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-290- } else {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:291: my $content = eval("qq{$Lang->{Error____head}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:292: Header(eval("qq{$Lang->{Error}}"), $content);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-293- Trailer();
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-308- && $Conf{ServerInitdStartCmd} ne "" ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:309: my $content = eval("qq{$Lang->{Admin_Start_Server}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:310: Header(eval("qq{$Lang->{Unable_to_connect_to_BackupPC_server}}"), $content);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-311- Trailer();
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-313- } else {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:314: ErrorExit(eval("qq{$Lang->{Unable_to_connect_to_BackupPC_server}}"),
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:315: eval("qq{$Lang->{Unable_to_connect_to_BackupPC_server_error_message}}"));
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-316- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-327- $reply = $1 if ( $reply =~ /(.*)/s );
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:328: eval($reply);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-329- # ignore status related to admin and trashClean jobs
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-417- && $StatusHost{dhcpHostIP} ne $ipAddr ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:418: $tryIP = eval("qq{$Lang->{tryIP}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-419- ($netBiosHost, $netBiosUser)
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-422- if ( $netBiosHost ne $host ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:423: ErrorExit(eval("qq{$Lang->{Can_t_find_IP_address_for}}"),
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm:424: eval("qq{$Lang->{host_is_a_DHCP_host}}"));
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/Lib.pm-425- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-54-
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm:55: ErrorExit(eval("qq{$Lang->{Invalid_number__num}}"))
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-56- if ( $num ne "" && $num !~ /^\d+$/ );
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-110- my($contentPre, $contentSub, $contentPost);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm:111: $contentPre .= eval("qq{$Lang->{Log_File__file__comment}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-112- if ( $file ne ""
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-117-
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm:118: $contentPre .= eval("qq{$Lang->{Contents_of_log_file}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-119-
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-132- if ( $s eq "" ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm:133: $c .= eval("qq{$Lang->{skipped__skipped_lines}}")
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-134- if ( $skipped );
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-157- }
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm:158: $c .= eval("qq{$Lang->{skipped__skipped_lines}}")
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-159- if ( $skipped );
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-249- if ( $type eq "docs" ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm:250: ErrorExit(eval("qq{$Lang->{Unable_to_open__file__configuration_problem}}"));
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-251- }
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm:252: $contentPre .= eval("qq{$Lang->{_pre___Can_t_open_log_file__file}}");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-253- }
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-254- $contentPost .= "</pre>\n" if ( $type ne "docs" );
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm:255: Header(eval("qq{$Lang->{Backup_PC__Log_File__file}}"),
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/CGI/View.pm-256- $contentPre, !-f "$TopDir/pc/$host/backups",
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-382- foreach my $module ( @{$bpc->{Conf}{PerlModuleLoad}} ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm:383: eval("use $module;");
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-384- }
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-992- #
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm:993: $s = $bpc->cmdSystemOrEval($pingCmd, undef, $args);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-994- if ( $? ) {
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1002- #
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm:1003: $s = $bpc->cmdSystemOrEval($pingCmd, undef, $args);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1004- if ( $? ) {
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1035- $dfCmd = $bpc->cmdVarSubstitute($bpc->{Conf}{DfCmd}, $args);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm:1036: $s = $bpc->cmdSystemOrEval($dfCmd, undef, $args);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1037- return 0 if ( $? || $s !~ /(\d+)%/s );
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1064- $nmbCmd = $bpc->cmdVarSubstitute($bpc->{Conf}{NmbLookupCmd}, $args);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm:1065: foreach ( split(/[\n\r]+/, $bpc->cmdSystemOrEval($nmbCmd, undef, $args)) ) {
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1066- #
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1302- if ( $bpc->{verbose} );
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm:1303: eval($cmd);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1304- print(STDERR "Perl code fragment for exec shouldn't return!!\n");
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1344- if ( $bpc->{verbose} );
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm:1345: $out = eval($cmd);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Lib.pm-1346- $$stdoutCB .= $out if ( ref($stdoutCB) eq 'SCALAR' );
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Storage/Text.pm-385- $skipExpr = $1 if ( $skipExpr =~ /(.*)/s );
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Storage/Text.pm:386: eval($skipExpr);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Storage/Text.pm-387- $skipExpr = undef if ( $@ eq "" );
##############################################
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Xfer/Smb.pm-168- alarm(0);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Xfer/Smb.pm:169: $bpc->cmdExecOrEval($smbClientCmd, $args);
backuppc-3.3.2/.pc/01-debian.patch/lib/BackupPC/Xfer/Smb.pm-170- # should not be reached, but just in case...
##############################################
backuppc-3.3.2/.pc/02-fix-spelling-errors.patch/doc/BackupPC.html-652-
backuppc-3.3.2/.pc/02-fix-spelling-errors.patch/doc/BackupPC.html:653:<p>As an alternative to setting <a href="#_conf_xfermethod_">$Conf{XferMethod}</a> to "smb" (using smbclient) for WinXX clients, you can use an smb network filesystem (eg: ksmbfs or similar) on your linux/unix server to mount the share, and then set <a href="#_conf_xfermethod_">$Conf{XferMethod}</a> to "tar" (use tar on the network mounted file system).</p>
backuppc-3.3.2/.pc/02-fix-spelling-errors.patch/doc/BackupPC.html-654-
##############################################
backuppc-3.3.2/.pc/02-fix-spelling-errors.patch/doc/BackupPC.html-974-
backuppc-3.3.2/.pc/02-fix-spelling-errors.patch/doc/BackupPC.html:975:<p>where W.X.Y.Z is each candidate address from <a href="#_conf_dhcpaddressranges_">$Conf{DHCPAddressRanges}</a>. Any host that has a valid NetBIOS name returned by this command (ie: matching an entry in the hosts file) will be backed up. You can modify the specific nmblookup command if necessary via <a href="#_conf_nmblookupcmd_">$Conf{NmbLookupCmd}</a>.</p>
backuppc-3.3.2/.pc/02-fix-spelling-errors.patch/doc/BackupPC.html-976-
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/bin/BackupPC_dump-266-my(%StatusHost);
backuppc-3.3.2/.pc/03-ipv6.patch/bin/BackupPC_dump:267:eval($reply);
backuppc-3.3.2/.pc/03-ipv6.patch/bin/BackupPC_dump-268-$bpc->ServerDisconnect();
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/bin/BackupPC_restore-350- alarm(0);
backuppc-3.3.2/.pc/03-ipv6.patch/bin/BackupPC_restore:351: exec("$BinDir/BackupPC_tarCreate", @tarArgs);
backuppc-3.3.2/.pc/03-ipv6.patch/bin/BackupPC_restore-352- print(LOG $bpc->timeStamp, "can't exec $BinDir/BackupPC_tarCreate\n");
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-51-
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl:52:my $EncodeVersion = eval($Encode::VERSION);
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-53-if ( $EncodeVersion < 1.99 ) {
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-313-EOF
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl:314:chomp($Conf{ServerHost} = `$Conf{HostnamePath}`)
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-315- if ( defined($Conf{HostnamePath}) && !defined($Conf{ServerHost}) );
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-815- } elsif ( ($^O eq "linux" || $^O eq "openbsd" || $^O eq "netbsd")
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl:816: && !system("$Conf{PingPath} -c 1 -w 3 localhost") ) {
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-817- $Conf{PingCmd} = '$pingPath -c 1 -w 3 $host';
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-863- $str =~ s/^\s*\$Conf\{.*?\}\s*=\s*/\$new = /m;
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl:864: eval($str);
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-865- foreach my $p ( keys(%$new) ) {
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-975-
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl:976:if ( `$Conf{PerlPath} -V` =~ /uselargefiles=undef/ ) {
backuppc-3.3.2/.pc/03-ipv6.patch/configure.pl-977- print <<EOF;
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-382- foreach my $module ( @{$bpc->{Conf}{PerlModuleLoad}} ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm:383: eval("use $module;");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-384- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-993- #
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm:994: $s = $bpc->cmdSystemOrEval($pingCmd, undef, $args);
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-995- if ( $? ) {
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1003- #
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm:1004: $s = $bpc->cmdSystemOrEval($pingCmd, undef, $args);
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1005- if ( $? ) {
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1036- $dfCmd = $bpc->cmdVarSubstitute($bpc->{Conf}{DfCmd}, $args);
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm:1037: $s = $bpc->cmdSystemOrEval($dfCmd, undef, $args);
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1038- return 0 if ( $? || $s !~ /(\d+)%/s );
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1065- $nmbCmd = $bpc->cmdVarSubstitute($bpc->{Conf}{NmbLookupCmd}, $args);
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm:1066: foreach ( split(/[\n\r]+/, $bpc->cmdSystemOrEval($nmbCmd, undef, $args)) ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1067- #
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1303- if ( $bpc->{verbose} );
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm:1304: eval($cmd);
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1305- print(STDERR "Perl code fragment for exec shouldn't return!!\n");
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1345- if ( $bpc->{verbose} );
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm:1346: $out = eval($cmd);
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/Lib.pm-1347- $$stdoutCB .= $out if ( ref($stdoutCB) eq 'SCALAR' );
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-389- if ( !$Privileged ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:390: ErrorExit(eval("qq{$Lang->{Only_privileged_users_can_edit_config_files}}"));
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-391- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-499- next if ( $menuDisable{$m}{top} );
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:500: my $text = eval("qq($Lang->{$ConfigMenu{$m}{text}})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-501- if ( $m eq $menu ) {
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-512- if ( $host eq "" ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:513: $content .= eval("qq($Lang->{CfgEdit_Header_Main})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-514- } else {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:515: $content .= eval("qq($Lang->{CfgEdit_Header_Host})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-516- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-747- my $copyHost = $2;
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:748: $err .= eval("qq($Lang->{CfgEdit_Error_Copy_host_does_not_exist})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-749- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-764- $err .= $bpc->ConfigDataWrite(lc($host), $confData);
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:765: $mesg .= eval("qq($Lang->{CfgEdit_Log_Copy_host_config})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-766- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-810- if ( defined($paramInfo->{text}) ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:811: my $text = eval("qq($Lang->{$paramInfo->{text}})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-812- $tblContent .= <<EOF;
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-840- my $topDir = $bpc->TopDir;
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:841: my $text = eval("qq($Lang->{$paramInfo->{comment}})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-842- $tblContent .= <<EOF;
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1368- && $In{"v_zZ_$varName"} ne "" ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1369: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_an_integer}}");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1370- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1374- $errors->{$varName}
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1375: = eval("qq{$Lang->{CfgEdit_Error__must_be_real_valued_number}}");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1376- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1383- my $k = $i + 1;
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1384: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__entry__must_be_an_integer}}");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1385- } elsif ( $type->{child} eq "float"
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1388- my $k = $i + 1;
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1389: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__entry__must_be_real_valued_number}}");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1390- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1399- }
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1400: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_valid_option}}")
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1401- if ( !$match );
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1403- if ( $In{"v_zZ_$varName"} ne "" && !-x $In{"v_zZ_$varName"} ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1404: $errors->{$varName} = eval("qq{$Lang->{CfgEdit_Error__must_be_executable_program}}");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1405- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1538- } elsif ( exists($oldConf->{$p}) && !exists($newConf->{$p}) ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1539: $mesg .= eval("qq($Lang->{CfgEdit_Log_Delete_param})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1540- } elsif ( !exists($oldConf->{$p}) && exists($newConf->{$p}) ) {
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1551-
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1552: $mesg .= eval("qq($Lang->{CfgEdit_Log_Add_param_value})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1553- } else {
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1583-
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1584: $mesg .= eval("qq($Lang->{CfgEdit_Log_Change_param_value})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1585- }
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1597- if ( !defined($hostsNew->{$host}) ) {
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1598: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Delete})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1599- $hostChange++;
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1605- my $valueNew = $hostsNew->{$host}{$key};
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1606: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Change})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1607- $hostChange++;
##############################################
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1619- $value =~ s/\r/\\r/g;
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm:1620: $mesg .= eval("qq($Lang->{CfgEdit_Log_Host_Add})");
backuppc-3.3.2/.pc/03-ipv6.patch/lib/BackupPC/CGI/EditConfig.pm-1621- $hostChange++;
##############################################
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm-50- print "Content-type: image/png\n\n";
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm:51: print `/usr/bin/rrdtool graph - --imgformat=PNG --start=end-${weeks}w --end=-300 --title="BackupPC Pool Size (${weeks} weeks)" --base=1000 --height=100 --width=600 --alt-autoscale-max --lower-limit=0 --vertical-label="" --slope-mode --font TITLE:10:Times --font AXIS:8:Times --font LEGEND:8:Times --font UNIT:8:Times -c BACK#FFFFFF DEF:ao="$LogDir/pool.rrd":ckb:AVERAGE CDEF:a=ao,1024,* AREA:a#95B8DB:"CPool in bytes" GPRINT:a:LAST:"Current\\:%8.2lf %s" GPRINT:a:AVERAGE:"Average\\:%8.2lf %s" GPRINT:a:MAX:"Maximum\\:%8.2lf %s\\n"`;
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm-52- return;
##############################################
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm-136- }
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm:137: my $generalInfo = eval("qq{$Lang->{BackupPC_Server_Status_General_Info}}")
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm-138- if ( $Privileged );
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm:139: my $content = eval("qq{$Lang->{BackupPC_Server_Status}}");
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm-140-
##############################################
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm-155- $info->{"${name}FileCntRm"} = $info->{"${name}FileCntRm"} + 0;
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm:156: return eval("qq{$Lang->{Pool_Stat}}");
backuppc-3.3.2/.pc/06-fix-rrd-graph-permissions.patch/lib/BackupPC/CGI/GeneralInfo.pm-157-}
##############################################
backuppc-3.3.2/configure.pl-51-
backuppc-3.3.2/configure.pl:52:my $EncodeVersion = eval($Encode::VERSION);
backuppc-3.3.2/configure.pl-53-if ( $EncodeVersion < 1.99 ) {
##############################################
backuppc-3.3.2/configure.pl-314-EOF
backuppc-3.3.2/configure.pl:315:chomp($Conf{ServerHost} = `$Conf{HostnamePath}`)
backuppc-3.3.2/configure.pl-316- if ( defined($Conf{HostnamePath}) && !defined($Conf{ServerHost}) );
##############################################
backuppc-3.3.2/configure.pl-816- } elsif ( ($^O eq "linux" || $^O eq "openbsd" || $^O eq "netbsd")
backuppc-3.3.2/configure.pl:817: && !system("$Conf{PingPath} -c 1 -w 3 localhost") ) {
backuppc-3.3.2/configure.pl-818- $Conf{PingCmd} = '$pingPath -c 1 -w 3 $host';
##############################################
backuppc-3.3.2/configure.pl-864- $str =~ s/^\s*\$Conf\{.*?\}\s*=\s*/\$new = /m;
backuppc-3.3.2/configure.pl:865: eval($str);
backuppc-3.3.2/configure.pl-866- foreach my $p ( keys(%$new) ) {
##############################################
backuppc-3.3.2/configure.pl-976-
backuppc-3.3.2/configure.pl:977:if ( `$Conf{PerlPath} -V` =~ /uselargefiles=undef/ ) {
backuppc-3.3.2/configure.pl-978- print <<EOF;