Initialize IPMI variables earlier

In some scenarios, an IPMI instance could be called to handle
data earlier than it should.  Ensure the state of the object is
in adequate shape to react as soon as possible.

xCAT-server/lib/perl/xCAT/IPMI.pm

@@ -123,6 +123,7 @@ sub new {
     my $self  = {};
     bless $self, $class;
     my %args = @_;
+    $self->init();
     unless ($ipmi2support) {
         $self->{ipmi15only} = 1;
     }
@@ -180,7 +181,6 @@ sub new {
     } else {
         $self->{peeraddr} = sockaddr_in($self->{port}, $bmc_n);
     }
-    $self->init();
     return $self;
 }