Initial import from FreeBSD RELENG_4:
[dragonfly.git] / crypto / heimdal / lib / krb5 / dump_config.c
1 /*
2  * Copyright (c) 1999 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 KTH nor the names of its contributors may be
18  *    used to endorse or promote products derived from this software without
19  *    specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY KTH AND ITS CONTRIBUTORS ``AS IS'' AND ANY
22  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24  * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL KTH OR ITS CONTRIBUTORS BE
25  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
28  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
30  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
31  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
32
33 #include "krb5_locl.h"
34
35 RCSID("$Id: dump_config.c,v 1.2 1999/10/28 23:22:41 assar Exp $");
36
37 /* print contents of krb5.conf */
38
39 static void
40 print_tree(struct krb5_config_binding *b, int level)
41 {
42     if (b == NULL)
43         return;
44
45     printf("%*s%s%s%s", level * 4, "", 
46            (level == 0) ? "[" : "", b->name, (level == 0) ? "]" : "");
47     if(b->type == krb5_config_list) {
48         if(level > 0)
49             printf(" = {");
50         printf("\n");
51         print_tree(b->u.list, level + 1);
52         if(level > 0)
53             printf("%*s}\n", level * 4, "");
54     } else if(b->type == krb5_config_string) {
55         printf(" = %s\n", b->u.string);
56     }
57     if(b->next)
58         print_tree(b->next, level);
59 }
60
61 int
62 main(int argc, char **argv)
63 {
64     krb5_context context;
65     krb5_error_code ret = krb5_init_context(&context);
66     if(ret == 0) {
67         print_tree(context->cf, 0);
68         return 0;
69     }
70     return 1;
71 }