50     krb5_error_code ret;  in test_default_name()  local
59     ret = krb5_cc_set_default_name(context, NULL);  in test_default_name()
71     ret = krb5_cc_set_default_name(context, test_cc_name);  in test_default_name()
101     krb5_error_code ret;  in test_mcache()  local
107     ret = krb5_parse_name(context, "lha@SU.SE", &p);  in test_mcache()
108     if (ret)  in test_mcache()
109 	krb5_err(context, 1, ret, "krb5_parse_name");  in test_mcache()
111     ret = krb5_cc_new_unique(context, krb5_cc_type_memory, NULL, &id);  in test_mcache()
112     if (ret)  in test_mcache()
113 	krb5_err(context, 1, ret, "krb5_cc_new_unique");  in test_mcache()
115     ret = krb5_cc_initialize(context, id, p);  in test_mcache()
116     if (ret)  in test_mcache()
117 	krb5_err(context, 1, ret, "krb5_cc_initialize");  in test_mcache()
132     ret = krb5_cc_resolve(context, c, &id2);  in test_mcache()
133     if (ret)  in test_mcache()
134 	krb5_err(context, 1, ret, "krb5_cc_resolve");  in test_mcache()
136     ret = krb5_cc_get_principal(context, id2, &p2);  in test_mcache()
137     if (ret)  in test_mcache()
138 	krb5_err(context, 1, ret, "krb5_cc_get_principal");  in test_mcache()
147     ret = krb5_cc_resolve(context, c, &id2);  in test_mcache()
148     if (ret)  in test_mcache()
149 	krb5_err(context, 1, ret, "krb5_cc_resolve");  in test_mcache()
151     ret = krb5_cc_get_principal(context, id2, &p2);  in test_mcache()
152     if (ret == 0)  in test_mcache()
166     krb5_error_code ret;  in test_init_vs_destroy()  local
171     ret = krb5_parse_name(context, "lha@SU.SE", &p);  in test_init_vs_destroy()
172     if (ret)  in test_init_vs_destroy()
173 	krb5_err(context, 1, ret, "krb5_parse_name");  in test_init_vs_destroy()
175     ret = krb5_cc_new_unique(context, type, NULL, &id);  in test_init_vs_destroy()
176     if (ret)  in test_init_vs_destroy()
177 	krb5_err(context, 1, ret, "krb5_cc_new_unique: %s", type);  in test_init_vs_destroy()
185     ret = krb5_cc_resolve(context, n, &id2);  in test_init_vs_destroy()
187     if (ret)  in test_init_vs_destroy()
188 	krb5_err(context, 1, ret, "krb5_cc_resolve");  in test_init_vs_destroy()
192     ret = krb5_cc_initialize(context, id2, p);  in test_init_vs_destroy()
193     if (ret)  in test_init_vs_destroy()
194 	krb5_err(context, 1, ret, "krb5_cc_initialize");  in test_init_vs_destroy()
196     ret = krb5_cc_get_principal(context, id2, &p2);  in test_init_vs_destroy()
197     if (ret)  in test_init_vs_destroy()
198 	krb5_err(context, 1, ret, "krb5_cc_get_principal");  in test_init_vs_destroy()
208     krb5_error_code ret;  in test_cache_remove()  local
213     ret = krb5_parse_name(context, "lha@SU.SE", &p);  in test_cache_remove()
214     if (ret)  in test_cache_remove()
215 	krb5_err(context, 1, ret, "krb5_parse_name");  in test_cache_remove()
217     ret = krb5_cc_new_unique(context, type, NULL, &id);  in test_cache_remove()
218     if (ret)  in test_cache_remove()
219 	krb5_err(context, 1, ret, "krb5_cc_gen_new: %s", type);  in test_cache_remove()
221     ret = krb5_cc_initialize(context, id, p);  in test_cache_remove()
222     if (ret)  in test_cache_remove()
223 	krb5_err(context, 1, ret, "krb5_cc_initialize");  in test_cache_remove()
227     ret = krb5_parse_name(context, "krbtgt/SU.SE@SU.SE", &cred.server);  in test_cache_remove()
228     if (ret)  in test_cache_remove()
229 	krb5_err(context, 1, ret, "krb5_parse_name");  in test_cache_remove()
230     ret = krb5_parse_name(context, "lha@SU.SE", &cred.client);  in test_cache_remove()
231     if (ret)  in test_cache_remove()
232 	krb5_err(context, 1, ret, "krb5_parse_name");  in test_cache_remove()
234     ret = krb5_cc_store_cred(context, id, &cred);  in test_cache_remove()
235     if (ret)  in test_cache_remove()
236 	krb5_err(context, 1, ret, "krb5_cc_store_cred");  in test_cache_remove()
238     ret = krb5_cc_remove_cred(context, id, 0, &cred);  in test_cache_remove()
239     if (ret)  in test_cache_remove()
240 	krb5_err(context, 1, ret, "krb5_cc_remove_cred");  in test_cache_remove()
242     ret = krb5_cc_destroy(context, id);  in test_cache_remove()
243     if (ret)  in test_cache_remove()
244 	krb5_err(context, 1, ret, "krb5_cc_destroy");  in test_cache_remove()
255     krb5_error_code ret;  in test_mcc_default()  local
261 	ret = krb5_init_context(&context);  in test_mcc_default()
262 	if (ret)  in test_mcc_default()
263 	    krb5_err(context, 1, ret, "krb5_init_context");  in test_mcc_default()
265 	ret = krb5_cc_set_default_name(context, "MEMORY:foo");  in test_mcc_default()
266 	if (ret)  in test_mcc_default()
267 	    krb5_err(context, 1, ret, "krb5_cc_set_default_name");  in test_mcc_default()
269 	ret = krb5_cc_default(context, &id);  in test_mcc_default()
270 	if (ret)  in test_mcc_default()
271 	    krb5_err(context, 1, ret, "krb5_cc_default");  in test_mcc_default()
273 	ret = krb5_cc_default(context, &id2);  in test_mcc_default()
274 	if (ret)  in test_mcc_default()
275 	    krb5_err(context, 1, ret, "krb5_cc_default");  in test_mcc_default()
277 	ret = krb5_cc_close(context, id);  in test_mcc_default()
278 	if (ret)  in test_mcc_default()
279 	    krb5_err(context, 1, ret, "krb5_cc_close");  in test_mcc_default()
281 	ret = krb5_cc_close(context, id2);  in test_mcc_default()
282 	if (ret)  in test_mcc_default()
283 	    krb5_err(context, 1, ret, "krb5_cc_close");  in test_mcc_default()
327     krb5_error_code ret;  in test_def_cc_name()  local
332 	ret = _krb5_expand_default_cc_name(context, cc_names[i].str, &str);  in test_def_cc_name()
333 	if (ret) {  in test_def_cc_name()
355     krb5_error_code ret;  in test_cache_find()  local
358     ret = krb5_parse_name(context, principal, &client);  in test_cache_find()
359     if (ret)  in test_cache_find()
360 	krb5_err(context, 1, ret, "parse_name for %s failed", principal);  in test_cache_find()
362     ret = krb5_cc_cache_match(context, client, &id);  in test_cache_find()
363     if (ret && find)  in test_cache_find()
364 	krb5_err(context, 1, ret, "cc_cache_match for %s failed", principal);  in test_cache_find()
365     if (ret == 0 && !find)  in test_cache_find()
366 	krb5_err(context, 1, ret, "cc_cache_match for %s found", principal);  in test_cache_find()
378     krb5_error_code ret;  in test_cache_iter()  local
381     ret = krb5_cc_cache_get_first (context, type, &cursor);  in test_cache_iter()
382     if (ret == KRB5_CC_NOSUPP)  in test_cache_iter()
384     else if (ret)  in test_cache_iter()
385 	krb5_err(context, 1, ret, "krb5_cc_cache_get_first(%s)", type);  in test_cache_iter()
388     while ((ret = krb5_cc_cache_next (context, cursor, &id)) == 0) {  in test_cache_iter()
394 	ret = krb5_cc_get_principal(context, id, &principal);  in test_cache_iter()
395 	if (ret == 0) {  in test_cache_iter()
396 	    ret = krb5_unparse_name(context, principal, &name);  in test_cache_iter()
397 	    if (ret == 0) {  in test_cache_iter()
417     krb5_error_code ret;  in test_cache_iter_all()  local
420     ret = krb5_cccol_cursor_new (context, &cursor);  in test_cache_iter_all()
421     if (ret)  in test_cache_iter_all()
422 	krb5_err(context, 1, ret, "krb5_cccol_cursor_new");  in test_cache_iter_all()
425     while ((ret = krb5_cccol_cursor_next (context, cursor, &id)) == 0 && id != NULL) {  in test_cache_iter_all()
431 	ret = krb5_cc_get_principal(context, id, &principal);  in test_cache_iter_all()
432 	if (ret == 0) {  in test_cache_iter_all()
433 	    ret = krb5_unparse_name(context, principal, &name);  in test_cache_iter_all()
434 	    if (ret == 0) {  in test_cache_iter_all()
452     krb5_error_code ret;  in test_copy()  local
455     ret = krb5_parse_name(context, "lha@SU.SE", &p);  in test_copy()
456     if (ret)  in test_copy()
457 	krb5_err(context, 1, ret, "krb5_parse_name");  in test_copy()
459     ret = krb5_cc_new_unique(context, from, NULL, &fromid);  in test_copy()
460     if (ret)  in test_copy()
461 	krb5_err(context, 1, ret, "krb5_cc_new_unique: %s", from);  in test_copy()
463     ret = krb5_cc_initialize(context, fromid, p);  in test_copy()
464     if (ret)  in test_copy()
465 	krb5_err(context, 1, ret, "krb5_cc_initialize");  in test_copy()
467     ret = krb5_cc_new_unique(context, to, NULL, &toid);  in test_copy()
468     if (ret)  in test_copy()
469 	krb5_err(context, 1, ret, "krb5_cc_gen_new: %s", to);  in test_copy()
471     ret = krb5_cc_copy_cache(context, fromid, toid);  in test_copy()
472     if (ret)  in test_copy()
473 	krb5_err(context, 1, ret, "krb5_cc_copy_cache");  in test_copy()
475     ret = krb5_cc_get_principal(context, toid, &p2);  in test_copy()
476     if (ret)  in test_copy()
477 	krb5_err(context, 1, ret, "krb5_cc_get_principal");  in test_copy()
494     krb5_error_code ret;  in test_move()  local
501     ret = krb5_cc_new_unique(context, type, NULL, &fromid);  in test_move()
502     if (ret == KRB5_CC_NOSUPP)  in test_move()
504     else if (ret)  in test_move()
505 	krb5_err(context, 1, ret, "krb5_cc_new_unique: %s", type);  in test_move()
507     ret = krb5_parse_name(context, "lha@SU.SE", &p);  in test_move()
508     if (ret)  in test_move()
509 	krb5_err(context, 1, ret, "krb5_parse_name");  in test_move()
511     ret = krb5_cc_initialize(context, fromid, p);  in test_move()
512     if (ret)  in test_move()
513 	krb5_err(context, 1, ret, "krb5_cc_initialize");  in test_move()
515     ret = krb5_cc_new_unique(context, type, NULL, &toid);  in test_move()
516     if (ret)  in test_move()
517 	krb5_err(context, 1, ret, "krb5_cc_new_unique");  in test_move()
519     ret = krb5_cc_initialize(context, toid, p);  in test_move()
520     if (ret)  in test_move()
521 	krb5_err(context, 1, ret, "krb5_cc_initialize");  in test_move()
523     ret = krb5_cc_get_principal(context, toid, &p2);  in test_move()
524     if (ret)  in test_move()
525 	krb5_err(context, 1, ret, "krb5_cc_get_principal");  in test_move()
554     krb5_error_code ret;  in test_cc_config()  local
559     ret = krb5_cc_new_unique(context, "MEMORY", "bar", &id);  in test_cc_config()
560     if (ret)  in test_cc_config()
561 	krb5_err(context, 1, ret, "krb5_cc_new_unique");  in test_cc_config()
563     ret = krb5_parse_name(context, "lha@SU.SE", &p);  in test_cc_config()
564     if (ret)  in test_cc_config()
565 	krb5_err(context, 1, ret, "krb5_parse_name");  in test_cc_config()
567     ret = krb5_cc_initialize(context, id, p);  in test_cc_config()
568     if (ret)  in test_cc_config()
569 	krb5_err(context, 1, ret, "krb5_cc_initialize");  in test_cc_config()
582 	ret = krb5_cc_set_config(context, id, p1, "FriendlyName", &data);  in test_cc_config()
583 	if (ret)  in test_cc_config()
586 	ret = krb5_cc_get_config(context, id, p1, "FriendlyName", &data2);  in test_cc_config()
587 	if (ret)  in test_cc_config()
591 	ret = krb5_cc_set_config(context, id, p1, "FriendlyName", &data);  in test_cc_config()
592 	if (ret)  in test_cc_config()
595 	ret = krb5_cc_get_config(context, id, p1, "FriendlyName", &data2);  in test_cc_config()
596 	if (ret)  in test_cc_config()
600 	ret = krb5_cc_set_config(context, id, p1, "FriendlyName", NULL);  in test_cc_config()
601 	if (ret)  in test_cc_config()
604 	ret = krb5_cc_get_config(context, id, p1, "FriendlyName", &data2);  in test_cc_config()
605 	if (ret == 0)  in test_cc_config()
624 usage (int ret)  in usage()  argument
627     exit (ret);  in usage()
634     krb5_error_code ret;  in main()  local
654     ret = krb5_init_context(&context);  in main()
655     if (ret)  in main()
656 	errx (1, "krb5_init_context failed: %d", ret);  in main()