Add a method to generate a root cert context, for talking to the

Cluster XMLRPC entrypoint.

apt/APT_Geni.pm.in

@@ -45,6 +45,8 @@ my $TB		  = "@prefix@";
 my $MAINSITE      = @TBMAINSITE@;
 my $TBOPS         = "@TBOPSEMAIL@";
 my $SACERT	  = "$TB/etc/genisa.pem";
+my $EMCERT	  = "$TB/etc/emulab.pem";
+my $EMKEY	  = "$TB/etc/emulab.key";
 
 # Cache credentials so we do not keep regenerating down inside the
 # libraries that make the XMLRPC calls.
@@ -242,6 +244,11 @@ sub GeniContext()
     return Genixmlrpc->Context($certificate);
 }
 
+sub RootContext()
+{
+    return Genixmlrpc->Context($EMCERT, $EMKEY);
+}
+
 #
 # Generate an SA credential (sorta like an admin credential).
 #