/* obtain ticket & session key */
memset((char *)&creds, 0, sizeof(creds));
- if ((retval = krb5_copy_principal(context, server, &creds.server)))
+ if ((retval = krb5_copy_principal(context, server, &creds.server))) {
+ DEBUG(1,("krb5_copy_principal failed (%s)\n",
+ error_message(retval)));
goto cleanup_princ;
+ }
- if ((retval = krb5_cc_get_principal(context, ccache, &creds.client)))
+ if ((retval = krb5_cc_get_principal(context, ccache, &creds.client))) {
+ DEBUG(1,("krb5_cc_get_principal failed (%s)\n",
+ error_message(retval)));
goto cleanup_creds;
+ }
if ((retval = krb5_get_credentials(context, 0,
ccache, &creds, &credsp))) {
- DEBUG(1,("krb5_get_credentials failed (%d)\n", retval));
+ DEBUG(1,("krb5_get_credentials failed (%s)\n",
+ error_message(retval)));
goto cleanup_creds;
}
retval = krb5_mk_req_extended(context, auth_context, ap_req_options,
&in_data, credsp, outbuf);
if (retval) {
- DEBUG(1,("krb5_mk_req_extended failed (%d)\n", retval));
+ DEBUG(1,("krb5_mk_req_extended failed (%s)\n",
+ error_message(retval)));
}
krb5_free_creds(context, credsp);
retval = krb5_init_context(&context);
if (retval) {
- DEBUG(1,("krb5_init_context failed\n"));
+ DEBUG(1,("krb5_init_context failed (%s)\n",
+ error_message(retval)));
goto failed;
}
if ((retval = krb5_cc_default(context, &ccdef))) {
- DEBUG(1,("krb5_cc_default failed\n"));
+ DEBUG(1,("krb5_cc_default failed (%s)\n",
+ error_message(retval)));
goto failed;
}
0,
service, realm,
ccdef, &packet))) {
- DEBUG(1,("krb5_mk_req2 failed\n"));
goto failed;
}
ret = krb5_init_context(&context);
if (ret) {
+ DEBUG(1,("krb5_init_context failed (%s)\n", error_message(ret)));
return ERROR_NT(NT_STATUS_LOGON_FAILURE);
}
ret = krb5_build_principal(context, &server, strlen(realm),
realm, service, NULL);
if (ret) {
+ DEBUG(1,("krb5_build_principal failed (%s)\n", error_message(ret)));
return ERROR_NT(NT_STATUS_LOGON_FAILURE);
}
if ((ret = krb5_rd_req(context, &auth_context, &packet,
server, keytab, NULL, &tkt))) {
- DEBUG(3,("krb5_rd_req failed with code %08x\n", ret));
+ DEBUG(3,("krb5_rd_req failed (%s)\n",
+ error_message(ret)));
return ERROR_NT(NT_STATUS_LOGON_FAILURE);
}
if ((ret = krb5_unparse_name(context, tkt->enc_part2->client,
&client))) {
+ DEBUG(3,("krb5_unparse_name failed (%s)\n",
+ error_message(ret)));
return ERROR_NT(NT_STATUS_LOGON_FAILURE);
}