heimdal: import heimdal's trunk svn rev 23697 + lorikeet-heimdal patches
[metze/samba/wip.git] / source / 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$");
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 = NULL;
76     hx509_name n;
77     char *s;
78     int ret;
79
80     hx509_env_add(context, &env, "uid", "lha");
81
82     ret = hx509_parse_name(context, name, &n);
83     if (ret)
84         return 1;
85
86     ret = hx509_name_expand(context, n, env);
87     hx509_env_free(&env);
88     if (ret)
89         return 1;
90
91     ret = hx509_name_to_string(n, &s);
92     hx509_name_free(&n);
93     if (ret)
94         return 1;
95     
96     ret = strcmp(s, expected) != 0;
97     free(s);
98     if (ret)
99         return 1;
100
101     return 0;
102 }
103
104 int
105 main(int argc, char **argv)
106 {
107     hx509_context context;
108     int ret = 0;
109
110     ret = hx509_context_init(&context);
111     if (ret)
112         errx(1, "hx509_context_init failed with %d", ret);
113
114     ret += test_name(context, "CN=foo,C=SE");
115     ret += test_name(context, "CN=foo,CN=kaka,CN=FOO,DC=ad1,C=SE");
116     ret += test_name(context, "1.2.3.4=foo,C=SE");
117     ret += test_name_fail(context, "=");
118     ret += test_name_fail(context, "CN=foo,=foo");
119     ret += test_name_fail(context, "CN=foo,really-unknown-type=foo");
120
121     ret += test_expand(context, "UID=${uid},C=SE", "UID=lha,C=SE");
122     ret += test_expand(context, "UID=foo${uid},C=SE", "UID=foolha,C=SE");
123     ret += test_expand(context, "UID=${uid}bar,C=SE", "UID=lhabar,C=SE");
124     ret += test_expand(context, "UID=f${uid}b,C=SE", "UID=flhab,C=SE");
125     ret += test_expand(context, "UID=${uid}${uid},C=SE", "UID=lhalha,C=SE");
126     ret += test_expand(context, "UID=${uid}{uid},C=SE", "UID=lha{uid},C=SE");
127
128     hx509_context_free(&context);
129
130     return ret;
131 }