如何通过GSS-API获取kerberos服务票？

#include <gssapi/gssapi.h>
#include <gssapi/gssapi_krb5.h>
#include<stdio.h>

int main() {
    OM_uint32 major_status, minor_status;
    gss_cred_id_t cred_handle = GSS_C_NO_CREDENTIAL;
    gss_ctx_id_t context_handle = GSS_C_NO_CONTEXT;
    gss_buffer_desc service_name_buffer, output_token;
    gss_name_t service_name = GSS_C_NO_NAME;

    // 将服务名称转换为GSS-API名称
    service_name_buffer.value = "HTTP/example.com";
    service_name_buffer.length = strlen(service_name_buffer.value);
    major_status = gss_import_name(&minor_status, &service_name_buffer, GSS_C_NT_HOSTBASED_SERVICE, &service_name);

    // 获取服务票
    major_status = gss_acquire_cred(&minor_status, service_name, GSS_C_INDEFINITE, GSS_C_NO_OID_SET, GSS_C_ACCEPT, &cred_handle, NULL, NULL);

    // 初始化上下文
    major_status = gss_init_sec_context(&minor_status, cred_handle, &context_handle, service_name, GSS_C_NO_OID, GSS_C_MUTUAL_FLAG | GSS_C_REPLAY_FLAG, GSS_C_INDEFINITE, GSS_C_NO_CHANNEL_BINDINGS, &input_token, NULL, &output_token, NULL, NULL);

    // 输出服务票
    printf("Service ticket: %s\n", (char *)output_token.value);

    // 释放资源
    gss_release_buffer(&minor_status, &output_token);
    gss_release_name(&minor_status, &service_name);
    gss_release_cred(&minor_status, &cred_handle);
    gss_delete_sec_context(&minor_status, &context_handle, NULL);

    return 0;
}