|
|
1.1 root 1: /*
2: * $Source: /usr/src/kerberosIV/krb/RCS/get_tf_realm.c,v $
3: * $Author: kfall $
4: *
5: * Copyright 1987, 1988 by the Massachusetts Institute of Technology.
6: *
7: * For copying and distribution information, please see the file
8: * <mit-copyright.h>.
9: */
10:
11: #ifndef lint
12: static char rcsid_get_tf_realm_c[] =
13: "$Id: get_tf_realm.c,v 4.3 90/06/25 20:56:18 kfall Exp $";
14: #endif /* lint */
15:
16: #include <mit-copyright.h>
17: #include <des.h>
18: #include <krb.h>
19: #include <strings.h>
20:
21: /*
22: * This file contains a routine to extract the realm of a kerberos
23: * ticket file.
24: */
25:
26: /*
27: * krb_get_tf_realm() takes two arguments: the name of a ticket
28: * and a variable to store the name of the realm in.
29: *
30: */
31:
32: krb_get_tf_realm(ticket_file, realm)
33: char *ticket_file;
34: char *realm;
35: {
36: return(krb_get_tf_fullname(ticket_file, 0, 0, realm));
37: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.