Return to get_svc_in_tkt.c CVS log

Up to [CSRG BSD Unix] / 43BSDReno / kerberosIV / krb

Annotation of 43BSDReno/kerberosIV/krb/get_svc_in_tkt.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * $Source: /usr/src/kerberosIV/krb/RCS/get_svc_in_tkt.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_svc_in_tkt_c[] =
                     13: "$Header: /usr/src/kerberosIV/krb/RCS/get_svc_in_tkt.c,v 4.10 90/06/25 20:56:10 kfall Exp $";
                     14: #endif /* lint */
                     15: 
                     16: #include <mit-copyright.h>
                     17: #include <des.h>
                     18: #include <krb.h>
                     19: #include <prot.h>
                     20: 
                     21: #ifndef NULL
                     22: #define NULL 0
                     23: #endif
                     24: 
                     25: /*
                     26:  * This file contains two routines: srvtab_to_key(), which gets
                     27:  * a server's key from a srvtab file, and krb_get_svc_in_tkt() which
                     28:  * gets an initial ticket for a server.
                     29:  */
                     30: 
                     31: /*
                     32:  * srvtab_to_key(): given a "srvtab" file (where the keys for the
                     33:  * service on a host are stored), return the private key of the
                     34:  * given service (user.instance@realm).
                     35:  *
                     36:  * srvtab_to_key() passes its arguments on to read_service_key(),
                     37:  * plus one additional argument, the key version number.
                     38:  * (Currently, the key version number is always 0; this value
                     39:  * is treated as a wildcard by read_service_key().)
                     40:  *
                     41:  * If the "srvtab" argument is null, KEYFILE (defined in "krb.h")
                     42:  * is passed in its place.
                     43:  *
                     44:  * It returns the return value of the read_service_key() call.
                     45:  * The service key is placed in "key".
                     46:  */
                     47: 
                     48: static int srvtab_to_key(user, instance, realm, srvtab, key)
                     49:     char *user, *instance, *realm, *srvtab;
                     50:     C_Block key;
                     51: {
                     52:     if (!srvtab)
                     53:         srvtab = KEYFILE;
                     54: 
                     55:     return(read_service_key(user, instance, realm, 0, srvtab,
                     56:                             (char *)key));
                     57: }
                     58: 
                     59: /*
                     60:  * krb_get_svc_in_tkt() passes its arguments on to krb_get_in_tkt(),
                     61:  * plus two additional arguments: a pointer to the srvtab_to_key()
                     62:  * function to be used to get the key from the key file and a NULL
                     63:  * for the decryption procedure indicating that krb_get_in_tkt should 
                     64:  * use the default method of decrypting the response from the KDC.
                     65:  *
                     66:  * It returns the return value of the krb_get_in_tkt() call.
                     67:  */
                     68: 
                     69: krb_get_svc_in_tkt(user, instance, realm, service, sinstance, life, srvtab)
                     70:     char *user, *instance, *realm, *service, *sinstance;
                     71:     int life;
                     72:     char *srvtab;
                     73: {
                     74:     return(krb_get_in_tkt(user, instance, realm, service, sinstance,
                     75:                           life, srvtab_to_key, NULL, srvtab));
                     76: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.