One Hat Cyber Team

Your IP: 216.73.216.133
Server IP: 185.119.109.197
Server: Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software: Apache
PHP Version: 8.1.33
Buat File | Buat Folder

View File Name : ports_upgrade.cgi

#!/usr/bin/perl
# Update ports snapshot

require './software-lib.pl';
&foreign_require("proc");

&ui_print_unbuffered_header(undef, $text{'ports_upgrade'}, "");

foreach my $cmd ("portsnap fetch",
		 "portsnap update || portsnap extract") {
	print &text('ports_running', "<tt>$cmd</tt>"),"<br>\n";
	print "<pre>";
	($fh, $pid) = &proc::pty_process_exec($cmd);
	while(<$fh>) {
		print &html_escape($_);
		}
	close($fh);
	print "</pre>";
	last if ($?);
	}

&ui_print_footer("?tab=update", $text{'index_return'});