bin/pvebanner

   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);