aboutsummaryrefslogtreecommitdiff
path: root/src/lib/krb4/g_krbrlm.c
blob: 608e1b884e8bf1d1761ec8c2dd7afdef56fb70f0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
/*
 * g_krbrlm.c
 *
 * Copyright 1985, 1986, 1987, 1988 by the Massachusetts Institute
 * of Technology.
 *
 * For copying and distribution information, please see the file
 * <mit-copyright.h>.
 */

#include "mit-copyright.h"
#include <stdio.h>
#include "krb.h"
#include <string.h>
#include "krb4int.h"

/*
 * krb_get_lrealm takes a pointer to a string, and a number, n.  It fills
 * in the string, r, with the name of the nth realm specified on the
 * first line of the kerberos config file (KRB_CONF, defined in "krb.h").
 * It returns 0 (KSUCCESS) on success, and KFAILURE on failure.  If the
 * config file does not exist, and if n=1, a successful return will occur
 * with r = KRB_REALM (also defined in "krb.h").
 *
 * NOTE: for archaic & compatibility reasons, this routine will only return
 * valid results when n = 1.
 *
 * For the format of the KRB_CONF file, see comments describing the routine
 * krb_get_krbhst().  This will also look in KRB_FB_CONF is
 * ATHENA_CONF_FALLBACK is defined.
 */
int KRB5_CALLCONV
krb_get_lrealm(r,n)
    char *r;
    int n;
{
    FILE *cnffile;

    if (n > 1)
	return(KFAILURE);  /* Temporary restriction */

    cnffile = krb__get_cnffile();
    if (!cnffile) {
	if (n == 1) {
	    (void) strncpy(r, KRB_REALM, REALM_SZ);
	    r[REALM_SZ - 1] = '\0';
	    return(KSUCCESS);
	}
	else
	    return(KFAILURE);
    }

    /*
     * XXX This assumes REALM_SZ == 40,
     * and that r is 40 characters long.
     */
    if (fscanf(cnffile,"%39s",r) != 1) {
        (void) fclose(cnffile);
        return(KFAILURE);
    }
    (void) fclose(cnffile);
    return(KSUCCESS);
}