Merge branch 'v4-0-test' of ssh://git.samba.org/data/git/samba into 4-0-local
[tprouty/samba.git] / source4 / heimdal / kdc / windc.c
1 /*
2  * Copyright (c) 2007 Kungliga Tekniska Högskolan
3  * (Royal Institute of Technology, Stockholm, Sweden). 
4  * All rights reserved. 
5  *
6  * Redistribution and use in source and binary forms, with or without 
7  * modification, are permitted provided that the following conditions 
8  * are met: 
9  *
10  * 1. Redistributions of source code must retain the above copyright 
11  *    notice, this list of conditions and the following disclaimer. 
12  *
13  * 2. Redistributions in binary form must reproduce the above copyright 
14  *    notice, this list of conditions and the following disclaimer in the 
15  *    documentation and/or other materials provided with the distribution. 
16  *
17  * 3. Neither the name of the Institute nor the names of its contributors 
18  *    may be used to endorse or promote products derived from this software 
19  *    without specific prior written permission. 
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND 
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE 
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 
31  * SUCH DAMAGE. 
32  */
33
34 #include "kdc_locl.h"
35
36 RCSID("$Id: windc.c 20559 2007-04-24 16:00:07Z lha $");
37
38 static krb5plugin_windc_ftable *windcft;
39 static void *windcctx;
40
41 /*
42  * Pick the first WINDC module that we find.
43  */
44
45 krb5_error_code
46 krb5_kdc_windc_init(krb5_context context)
47 {
48     struct krb5_plugin *list = NULL, *e;
49     krb5_error_code ret;
50
51     ret = _krb5_plugin_find(context, PLUGIN_TYPE_DATA, "windc", &list);
52     if(ret != 0 || list == NULL)
53         return 0;
54
55     for (e = list; e != NULL; e = _krb5_plugin_get_next(e)) {
56
57         windcft = _krb5_plugin_get_symbol(e);
58         if (windcft->minor_version < KRB5_WINDC_PLUGING_MINOR)
59             continue;
60         
61         (*windcft->init)(context, &windcctx);
62         break;
63     }
64     if (e == NULL) {
65         _krb5_plugin_free(list);
66         krb5_set_error_string(context, "Did not find any WINDC plugin");
67         windcft = NULL;
68         return ENOENT;
69     }
70
71     return 0;
72 }
73
74
75 krb5_error_code 
76 _kdc_pac_generate(krb5_context context,
77                   hdb_entry_ex *client, 
78                   krb5_pac *pac)
79 {
80     *pac = NULL;
81     if (windcft == NULL)
82         return 0;
83     return (windcft->pac_generate)(windcctx, context, client, pac);
84 }
85
86 krb5_error_code 
87 _kdc_pac_verify(krb5_context context, 
88                 const krb5_principal client_principal,
89                 hdb_entry_ex *client,
90                 hdb_entry_ex *server,
91                 krb5_pac *pac)
92 {
93     if (windcft == NULL) {
94         krb5_set_error_string(context, "Can't verify PAC, no function");
95         return EINVAL;
96     }
97     return (windcft->pac_verify)(windcctx, context, 
98                                  client_principal, client, server, pac);
99 }
100
101 krb5_error_code
102 _kdc_windc_client_access(krb5_context context,
103                          struct hdb_entry_ex *client,
104                          KDC_REQ *req)
105 {
106     if (windcft == NULL)
107         return 0;
108     return (windcft->client_access)(windcctx, context, client, req);
109 }