One Hat Cyber Team

Your IP: 216.73.216.13
Server IP: 109.199.105.153
Server: Linux connect.inboxifs.com 5.15.0-152-generic #162-Ubuntu SMP Wed Jul 23 09:48:42 UTC 2025 x86_64
Server Software: Apache
PHP Version: 8.2.29
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'});