[pve-manager.git] / bin / pvebanner

#!/usr/bin/perl

use strict;
use PVE::INotify;
use PVE::Cluster;

my $nodename = PVE::INotify::nodename();
my $localip = PVE::Cluster::remote_node_ip($nodename, 1);

my $xline = '-' x 78;

my $banner = '';

if ($localip) {
    $banner .= <<__EOBANNER;

$xline

Welcome to the Proxmox Virtual Environment. Please use your web browser to 
configure this server - connect to:

  https://${localip}:8006/

$xline

__EOBANNER

}

open(ISSUE, ">/etc/issue");

print ISSUE $banner;

close(ISSUE);

exit (0);
Commit	Line	Data
	1	#!/usr/bin/perl
	2
	3	use strict;
	4	use PVE::INotify;
	5	use PVE::Cluster;
	6
	7	my $nodename = PVE::INotify::nodename();
	8	my $localip = PVE::Cluster::remote_node_ip($nodename, 1);
	9
	10	my $xline = '-' x 78;
	11
	12	my $banner = '';
	13
	14	if ($localip) {
	15	$banner .= <<__EOBANNER;
	16
	17	$xline
	18
	19	Welcome to the Proxmox Virtual Environment. Please use your web browser to
	20	configure this server - connect to:
	21
	22	https://${localip}:8006/
	23
	24	$xline
	25
	26	__EOBANNER
	27
	28	}
	29
	30	open(ISSUE, ">/etc/issue");
	31
	32	print ISSUE $banner;
	33
	34	close(ISSUE);
	35
	36	exit (0);