2 * Copyright (c) 2006 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
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.
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.
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. */
33 #include "krb5_locl.h"
36 RCSID("$Id: test_store.c 20192 2007-02-05 23:21:03Z lha $");
39 test_int8(krb5_context context, krb5_storage *sp)
47 for (i = 0; i < sizeof(val[0])/sizeof(val); i++) {
49 ret = krb5_store_int8(sp, val[i]);
51 krb5_err(context, 1, ret, "krb5_store_int8");
52 krb5_storage_seek(sp, 0, SEEK_SET);
53 ret = krb5_ret_int8(sp, &v);
55 krb5_err(context, 1, ret, "krb5_ret_int8");
57 krb5_errx(context, 1, "store and ret mismatch");
62 test_int16(krb5_context context, krb5_storage *sp)
67 0, 1, -1, 32768, -32767
70 for (i = 0; i < sizeof(val[0])/sizeof(val); i++) {
72 ret = krb5_store_int16(sp, val[i]);
74 krb5_err(context, 1, ret, "krb5_store_int16");
75 krb5_storage_seek(sp, 0, SEEK_SET);
76 ret = krb5_ret_int16(sp, &v);
78 krb5_err(context, 1, ret, "krb5_ret_int16");
80 krb5_errx(context, 1, "store and ret mismatch");
85 test_int32(krb5_context context, krb5_storage *sp)
90 0, 1, -1, 2147483647, -2147483646
93 for (i = 0; i < sizeof(val[0])/sizeof(val); i++) {
95 ret = krb5_store_int32(sp, val[i]);
97 krb5_err(context, 1, ret, "krb5_store_int32");
98 krb5_storage_seek(sp, 0, SEEK_SET);
99 ret = krb5_ret_int32(sp, &v);
101 krb5_err(context, 1, ret, "krb5_ret_int32");
103 krb5_errx(context, 1, "store and ret mismatch");
108 test_uint8(krb5_context context, krb5_storage *sp)
116 for (i = 0; i < sizeof(val[0])/sizeof(val); i++) {
118 ret = krb5_store_uint8(sp, val[i]);
120 krb5_err(context, 1, ret, "krb5_store_uint8");
121 krb5_storage_seek(sp, 0, SEEK_SET);
122 ret = krb5_ret_uint8(sp, &v);
124 krb5_err(context, 1, ret, "krb5_ret_uint8");
126 krb5_errx(context, 1, "store and ret mismatch");
131 test_uint16(krb5_context context, krb5_storage *sp)
139 for (i = 0; i < sizeof(val[0])/sizeof(val); i++) {
141 ret = krb5_store_uint16(sp, val[i]);
143 krb5_err(context, 1, ret, "krb5_store_uint16");
144 krb5_storage_seek(sp, 0, SEEK_SET);
145 ret = krb5_ret_uint16(sp, &v);
147 krb5_err(context, 1, ret, "krb5_ret_uint16");
149 krb5_errx(context, 1, "store and ret mismatch");
154 test_uint32(krb5_context context, krb5_storage *sp)
162 for (i = 0; i < sizeof(val[0])/sizeof(val); i++) {
164 ret = krb5_store_uint32(sp, val[i]);
166 krb5_err(context, 1, ret, "krb5_store_uint32");
167 krb5_storage_seek(sp, 0, SEEK_SET);
168 ret = krb5_ret_uint32(sp, &v);
170 krb5_err(context, 1, ret, "krb5_ret_uint32");
172 krb5_errx(context, 1, "store and ret mismatch");
178 test_storage(krb5_context context)
182 sp = krb5_storage_emem();
184 krb5_errx(context, 1, "krb5_storage_emem: no mem");
186 test_int8(context, sp);
187 test_int16(context, sp);
188 test_int32(context, sp);
189 test_uint8(context, sp);
190 test_uint16(context, sp);
191 test_uint32(context, sp);
193 krb5_storage_free(sp);
200 static int version_flag = 0;
201 static int help_flag = 0;
203 static struct getargs args[] = {
204 {"version", 0, arg_flag, &version_flag,
205 "print version", NULL },
206 {"help", 0, arg_flag, &help_flag,
213 arg_printusage (args,
214 sizeof(args)/sizeof(*args),
221 main(int argc, char **argv)
223 krb5_context context;
227 setprogname(argv[0]);
229 if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &optidx))
243 ret = krb5_init_context (&context);
245 errx (1, "krb5_init_context failed: %d", ret);
247 test_storage(context);
249 krb5_free_context(context);