third_party/heimdal/lib/hdb/test_dbinfo.c

   1 /*
   2  * Copyright (c) 2005 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 "hdb_locl.h"
  35 #include <getarg.h>
  36
  37 static int help_flag;
  38 static int version_flag;
  39
  40 struct getargs args[] = {
  41     { "help",           'h',    arg_flag,   &help_flag,    NULL, NULL },
  42     { "version",        0,      arg_flag,   &version_flag, NULL, NULL }
  43 };
  44
  45 static int num_args = sizeof(args) / sizeof(args[0]);
  46
  47 /*
  48  * Prove that HDB_EntryOrAlias being a CHOICE of hdb_entry or hdb_entry_alias
  49  * adds nothing to the encoding of those types.
  50  */
  51 static
  52 void
  53 check_HDB_EntryOrAlias(krb5_context context)
  54 {
  55     HDB_EntryOrAlias eoa;
  56     hdb_entry entry;
  57     hdb_entry_alias alias;
  58     krb5_data v;
  59     size_t len;
  60     int ret;
  61
  62     memset(&entry, 0, sizeof(entry));
  63     memset(&alias, 0, sizeof(alias));
  64     memset(&eoa, 0, sizeof(eoa));
  65     krb5_data_zero(&v);
  66
  67     ret = krb5_make_principal(context, &alias.principal, "KTH.SE", "foo",
  68                               NULL);
  69     if (ret)
  70         krb5_err(context, 1, ret, "krb5_make_principal");
  71     ASN1_MALLOC_ENCODE(HDB_entry_alias, v.data, v.length, &alias, &len, ret);
  72     if (ret)
  73         krb5_err(context, 1, ret, "encode_HDB_EntryOrAlias");
  74     if (v.length != len)
  75         abort();
  76     ret = decode_HDB_EntryOrAlias(v.data, v.length, &eoa, &len);
  77     if (ret)
  78         krb5_err(context, 1, ret, "decode_HDB_EntryOrAlias");
  79     if (v.length != len)
  80         abort();
  81     free_HDB_EntryOrAlias(&eoa);
  82     free_HDB_entry_alias(&alias);
  83     krb5_data_free(&v);
  84
  85     ret = krb5_make_principal(context, &entry.principal, "KTH.SE", "foo",
  86                               NULL);
  87     if (ret)
  88         krb5_err(context, 1, ret, "krb5_make_principal");
  89     entry.kvno = 5;
  90     entry.flags.initial = 1;
  91     ASN1_MALLOC_ENCODE(HDB_entry, v.data, v.length, &entry, &len, ret);
  92     if (ret)
  93         krb5_err(context, 1, ret, "encode_HDB_EntryOrAlias");
  94     if (v.length != len)
  95         abort();
  96     ret = decode_HDB_EntryOrAlias(v.data, v.length, &eoa, &len);
  97     if (ret)
  98         krb5_err(context, 1, ret, "decode_HDB_EntryOrAlias");
  99     if (v.length != len)
 100         abort();
 101     free_HDB_EntryOrAlias(&eoa);
 102     free_HDB_entry(&entry);
 103     krb5_data_free(&v);
 104 }
 105
 106 int
 107 main(int argc, char **argv)
 108 {
 109     struct hdb_dbinfo *info, *d;
 110     krb5_context context;
 111     int ret, o = 0;
 112
 113     setprogname(argv[0]);
 114
 115     if(getarg(args, num_args, argc, argv, &o))
 116         krb5_std_usage(1, args, num_args);
 117
 118     if(help_flag)
 119         krb5_std_usage(0, args, num_args);
 120
 121     if(version_flag){
 122         print_version(NULL);
 123         exit(0);
 124     }
 125
 126     ret = krb5_init_context(&context);
 127     if (ret)
 128         errx (1, "krb5_init_context failed: %d", ret);
 129
 130     check_HDB_EntryOrAlias(context);
 131
 132     ret = hdb_get_dbinfo(context, &info);
 133     if (ret)
 134         krb5_err(context, 1, ret, "hdb_get_dbinfo");
 135
 136     d = NULL;
 137     while ((d = hdb_dbinfo_get_next(info, d)) != NULL) {
 138         const char *s;
 139         s = hdb_dbinfo_get_label(context, d);
 140         printf("label: %s\n", s ? s : "no label");
 141         s = hdb_dbinfo_get_realm(context, d);
 142         printf("\trealm: %s\n", s ? s : "no realm");
 143         s = hdb_dbinfo_get_dbname(context, d);
 144         printf("\tdbname: %s\n", s ? s : "no dbname");
 145         s = hdb_dbinfo_get_mkey_file(context, d);
 146         printf("\tmkey_file: %s\n", s ? s : "no mkey file");
 147         s = hdb_dbinfo_get_acl_file(context, d);
 148         printf("\tacl_file: %s\n", s ? s : "no acl file");
 149     }
 150
 151     hdb_free_dbinfo(context, &info);
 152
 153     krb5_free_context(context);
 154
 155     return 0;
 156 }