r23456: Update Samba4 to current lorikeet-heimdal.
[sfrench/samba-autobuild/.git] / source4 / heimdal / lib / hx509 / test_name.c
1 /*
2  * Copyright (c) 2006 - 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 "hx_locl.h"
35 RCSID("$Id: test_name.c 19882 2007-01-13 01:02:57Z lha $");
36
37 static int
38 test_name(hx509_context context, const char *name)
39 {
40     hx509_name n;
41     char *s;
42     int ret;
43
44     ret = hx509_parse_name(context, name, &n);
45     if (ret)
46         return 1;
47
48     ret = hx509_name_to_string(n, &s);
49     if (ret)
50         return 1;
51
52     if (strcmp(s, name) != 0)
53         return 1;
54
55     hx509_name_free(&n);
56     free(s);
57
58     return 0;
59 }
60
61 static int
62 test_name_fail(hx509_context context, const char *name)
63 {
64     hx509_name n;
65
66     if (hx509_parse_name(context, name, &n) == HX509_NAME_MALFORMED)
67         return 0;
68     hx509_name_free(&n);
69     return 1;
70 }
71
72 static int
73 test_expand(hx509_context context, const char *name, const char *expected)
74 {
75     hx509_env env;
76     hx509_name n;
77     char *s;
78     int ret;
79
80     hx509_env_init(context, &env);
81     hx509_env_add(context, env, "uid", "lha");
82
83     ret = hx509_parse_name(context, name, &n);
84     if (ret)
85         return 1;
86
87     ret = hx509_name_expand(context, n, env);
88     hx509_env_free(&env);
89     if (ret)
90         return 1;
91
92     ret = hx509_name_to_string(n, &s);
93     hx509_name_free(&n);
94     if (ret)
95         return 1;
96     
97     ret = strcmp(s, expected) != 0;
98     free(s);
99     if (ret)
100         return 1;
101
102     return 0;
103 }
104
105 int
106 main(int argc, char **argv)
107 {
108     hx509_context context;
109     int ret = 0;
110
111     ret = hx509_context_init(&context);
112     if (ret)
113         errx(1, "hx509_context_init failed with %d", ret);
114
115     ret += test_name(context, "CN=foo,C=SE");
116     ret += test_name(context, "CN=foo,CN=kaka,CN=FOO,DC=ad1,C=SE");
117     ret += test_name(context, "1.2.3.4=foo,C=SE");
118     ret += test_name_fail(context, "=");
119     ret += test_name_fail(context, "CN=foo,=foo");
120     ret += test_name_fail(context, "CN=foo,really-unknown-type=foo");
121
122     ret += test_expand(context, "UID=${uid},C=SE", "UID=lha,C=SE");
123     ret += test_expand(context, "UID=foo${uid},C=SE", "UID=foolha,C=SE");
124     ret += test_expand(context, "UID=${uid}bar,C=SE", "UID=lhabar,C=SE");
125     ret += test_expand(context, "UID=f${uid}b,C=SE", "UID=flhab,C=SE");
126     ret += test_expand(context, "UID=${uid}${uid},C=SE", "UID=lhalha,C=SE");
127     ret += test_expand(context, "UID=${uid}{uid},C=SE", "UID=lha{uid},C=SE");
128
129     hx509_context_free(&context);
130
131     return ret;
132 }