2 * Copyright (c) 2001 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"
35 RCSID("$Id: store-test.c,v 1.1 2001/05/11 16:06:25 joda Exp $");
38 print_data(unsigned char *data
, size_t len
)
41 for(i
= 0; i
< len
; i
++) {
42 if(i
> 0 && (i
% 16) == 0)
44 printf("%02x ", data
[i
]);
50 compare(const char *name
, krb5_storage
*sp
, void *expected
, size_t len
)
54 krb5_storage_to_data(sp
, &data
);
55 krb5_storage_free(sp
);
56 if(data
.length
!= len
|| memcmp(data
.data
, expected
, len
) != 0) {
57 printf("%s mismatch\n", name
);
58 printf(" Expected: ");
59 print_data(expected
, len
);
61 print_data(data
.data
, data
.length
);
64 krb5_data_free(&data
);
69 main(int argc
, char **argv
)
74 krb5_principal principal
;
77 krb5_init_context(&context
);
79 sp
= krb5_storage_emem();
80 krb5_store_int32(sp
, 0x01020304);
81 nerr
+= compare("Integer", sp
, "\x1\x2\x3\x4", 4);
83 sp
= krb5_storage_emem();
84 krb5_storage_set_byteorder(sp
, KRB5_STORAGE_BYTEORDER_LE
);
85 krb5_store_int32(sp
, 0x01020304);
86 nerr
+= compare("Integer (LE)", sp
, "\x4\x3\x2\x1", 4);
88 sp
= krb5_storage_emem();
89 krb5_storage_set_byteorder(sp
, KRB5_STORAGE_BYTEORDER_BE
);
90 krb5_store_int32(sp
, 0x01020304);
91 nerr
+= compare("Integer (BE)", sp
, "\x1\x2\x3\x4", 4);
93 sp
= krb5_storage_emem();
94 krb5_storage_set_byteorder(sp
, KRB5_STORAGE_BYTEORDER_HOST
);
95 krb5_store_int32(sp
, 0x01020304);
100 data
= "\x4\x3\x2\x1";
102 data
= "\x1\x2\x3\x4";
103 nerr
+= compare("Integer (host)", sp
, data
, 4);
106 sp
= krb5_storage_emem();
107 krb5_make_principal(context
, &principal
, "TEST", "foobar", NULL
);
108 krb5_store_principal(sp
, principal
);
109 nerr
+= compare("Principal", sp
, "\x0\x0\x0\x1"
112 "\x0\x0\x0\x6""foobar", 26);