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

1.1       root        1: /*
                      2:  * $Source: /usr/src/kerberosIV/krb/RCS/get_krbhst.c,v $
                      3:  * $Author: kfall $
                      4:  *
                      5:  * Copyright 1985, 1986, 1987, 1988 by the Massachusetts Institute
                      6:  * of Technology.
                      7:  *
                      8:  * For copying and distribution information, please see the file
                      9:  * <mit-copyright.h>.
                     10:  */
                     11: 
                     12: #ifndef lint
                     13: static char *rcsid_get_krbhst_c =
                     14: "$Header: /usr/src/kerberosIV/krb/RCS/get_krbhst.c,v 4.9 90/06/25 20:55:54 kfall Exp $";
                     15: #endif /* lint */
                     16: 
                     17: #include <mit-copyright.h>
                     18: #include <stdio.h>
                     19: #include <des.h>
                     20: #include <krb.h>
                     21: #include <strings.h>
                     22: 
                     23: /*
                     24:  * Given a Kerberos realm, find a host on which the Kerberos authenti-
                     25:  * cation server can be found.
                     26:  *
                     27:  * krb_get_krbhst takes a pointer to be filled in, a pointer to the name
                     28:  * of the realm for which a server is desired, and an integer, n, and
                     29:  * returns (in h) the nth entry from the configuration file (KRB_CONF,
                     30:  * defined in "krb.h") associated with the specified realm.
                     31:  *
                     32:  * On end-of-file, krb_get_krbhst returns KFAILURE.  If n=1 and the
                     33:  * configuration file does not exist, krb_get_krbhst will return KRB_HOST
                     34:  * (also defined in "krb.h").  If all goes well, the routine returnes
                     35:  * KSUCCESS.
                     36:  *
                     37:  * The KRB_CONF file contains the name of the local realm in the first
                     38:  * line (not used by this routine), followed by lines indicating realm/host
                     39:  * entries.  The words "admin server" following the hostname indicate that 
                     40:  * the host provides an administrative database server.
                     41:  *
                     42:  * For example:
                     43:  *
                     44:  *     ATHENA.MIT.EDU
                     45:  *     ATHENA.MIT.EDU kerberos-1.mit.edu admin server
                     46:  *     ATHENA.MIT.EDU kerberos-2.mit.edu
                     47:  *     LCS.MIT.EDU kerberos.lcs.mit.edu admin server
                     48:  *
                     49:  * This is a temporary hack to allow us to find the nearest system running
                     50:  * kerberos.  In the long run, this functionality will be provided by a
                     51:  * nameserver.
                     52:  */
                     53: 
                     54: krb_get_krbhst(h,r,n)
                     55:     char *h;
                     56:     char *r;
                     57:     int n;
                     58: {
                     59:     FILE *cnffile;
                     60:     char tr[REALM_SZ];
                     61:     char linebuf[BUFSIZ];
                     62:     register int i;
                     63: 
                     64:     if ((cnffile = fopen(KRB_CONF,"r")) == NULL) {
                     65:         if (n==1) {
                     66:             (void) strcpy(h,KRB_HOST);
                     67:             return(KSUCCESS);
                     68:         }
                     69:         else
                     70:             return(KFAILURE);
                     71:     }
                     72:     if (fscanf(cnffile,"%s",tr) == EOF)
                     73:         return(KFAILURE);
                     74:     /* run through the file, looking for the nth server for this realm */
                     75:     for (i = 1; i <= n;) {
                     76:        if (fgets(linebuf, BUFSIZ, cnffile) == NULL) {
                     77:             (void) fclose(cnffile);
                     78:             return(KFAILURE);
                     79:         }
                     80:        if (sscanf(linebuf, "%s %s", tr, h) != 2)
                     81:            continue;
                     82:         if (!strcmp(tr,r))
                     83:             i++;
                     84:     }
                     85:     (void) fclose(cnffile);
                     86:     return(KSUCCESS);
                     87: }

unix.superglobalmegacorp.com

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