Initial revision
[mod_auth_kerb.cvs/.git] / krb4 / validate.c
1 int kerb4_password_validate(const char *user, const char *pass) {
2         int ret;
3         char realm[REALM_SZ];
4
5         ret = krb_get_lrealm(realm, 1);
6         if (ret != KSUCCESS)
7                 return !KRB4_OK;
8
9         ret = krb_get_pw_in_tkt(user, "", realm, "krbtgt", realm,
10                                         DEFAULT_TKT_LIFE, (char *)pass);
11         switch (ret) {
12                 case INTK_OK:
13                 case INTK_W_NOTALL:
14                         return KRB4_OK;
15                         break;
16
17                 default:
18                         return !KRB4_OK;
19                         break;
20         }
21 }