1 /* -*- mode: c; c-basic-offset: 4; indent-tabs-mode: nil -*- */
2 /* tests/asn.1/krb5_encode_test.c */
4 * Copyright (C) 1994 by the Massachusetts Institute of Technology.
7 * Export of this software from the United States of America may
8 * require a specific license from the United States Government.
9 * It is the responsibility of any person or organization contemplating
10 * export to obtain such a license before exporting.
12 * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
13 * distribute this software and its documentation for any purpose and
14 * without fee is hereby granted, provided that the above copyright
15 * notice appear in all copies and that both that copyright notice and
16 * this permission notice appear in supporting documentation, and that
17 * the name of M.I.T. not be used in advertising or publicity pertaining
18 * to distribution of the software without specific, written prior
19 * permission. Furthermore if you modify this software you must label
20 * your software as modified software and not distribute it in such a
21 * fashion that it might be confused with the original M.I.T. software.
22 * M.I.T. makes no representations about the suitability of
23 * this software for any purpose. It is provided "as is" without express
24 * or implied warranty.
34 extern int current_appl_type;
36 krb5_context test_context;
43 encoder_print_results(krb5_data *code, char *typestring, char *description)
45 char *code_string = NULL;
53 printf("encode_krb5_%s%s:\n", typestring, description);
54 r = trval2(stdout, code->data, code->length, 0, &rlen);
56 if (rlen < 0 || (unsigned int) rlen != code->length) {
57 printf("Error: length mismatch: was %d, parsed %d\n",
62 printf("Error: Return from trval2 is %d.\n", r);
65 current_appl_type = -1; /* Reset type */
67 asn1_krb5_data_unparse(code,&(code_string));
68 printf("encode_krb5_%s%s: %s\n", typestring, description,
72 ktest_destroy_data(&code);
75 static void PRS(argc, argv)
81 extern int print_types, print_krb5_types, print_id_and_len,
82 print_constructed_length, print_skip_context,
83 print_skip_tagnum, print_context_shortcut;
85 while ((optchar = getopt(argc, argv, "tp:")) != -1) {
91 sample_principal_name = optarg;
95 fprintf(stderr, "Usage: %s [-t] [-p principal]\n",
101 print_krb5_types = 1;
102 print_id_and_len = 0;
103 print_constructed_length = 0;
104 print_skip_context = 1;
105 print_skip_tagnum = 1;
106 print_context_shortcut = 1;
115 krb5_error_code retval;
119 retval = krb5_init_context(&test_context);
121 com_err(argv[0], retval, "while initializing krb5");
124 init_access(argv[0]);
126 #define encode_run(value,typestring,description,encoder) \
127 retval = encoder(&(value),&(code)); \
129 com_err("krb5_encode_test", retval,"while encoding %s", typestring); \
132 encoder_print_results(code, typestring, description);
134 /****************************************************************/
135 /* encode_krb5_authenticator */
137 krb5_authenticator authent;
138 ktest_make_sample_authenticator(&authent);
140 encode_run(authent, "authenticator", "", encode_krb5_authenticator);
142 ktest_destroy_checksum(&(authent.checksum));
143 ktest_destroy_keyblock(&(authent.subkey));
144 authent.seq_number = 0;
145 ktest_empty_authorization_data(authent.authorization_data);
146 encode_run(authent, "authenticator", "(optionals empty)",
147 encode_krb5_authenticator);
149 ktest_destroy_authorization_data(&(authent.authorization_data));
150 encode_run(authent, "authenticator", "(optionals NULL)",
151 encode_krb5_authenticator);
152 ktest_empty_authenticator(&authent);
155 /****************************************************************/
156 /* encode_krb5_ticket */
159 ktest_make_sample_ticket(&tkt);
160 encode_run(tkt, "ticket", "", encode_krb5_ticket);
161 ktest_empty_ticket(&tkt);
164 /****************************************************************/
165 /* encode_krb5_encryption_key */
167 krb5_keyblock keyblk;
168 ktest_make_sample_keyblock(&keyblk);
169 current_appl_type = 1005;
170 encode_run(keyblk, "keyblock", "", encode_krb5_encryption_key);
171 ktest_empty_keyblock(&keyblk);
174 /****************************************************************/
175 /* encode_krb5_enc_tkt_part */
178 memset(&tkt, 0, sizeof(krb5_ticket));
179 tkt.enc_part2 = ealloc(sizeof(krb5_enc_tkt_part));
180 ktest_make_sample_enc_tkt_part(tkt.enc_part2);
182 encode_run(*tkt.enc_part2, "enc_tkt_part", "",
183 encode_krb5_enc_tkt_part);
185 tkt.enc_part2->times.starttime = 0;
186 tkt.enc_part2->times.renew_till = 0;
187 ktest_destroy_address(&(tkt.enc_part2->caddrs[1]));
188 ktest_destroy_address(&(tkt.enc_part2->caddrs[0]));
189 ktest_destroy_authdata(&(tkt.enc_part2->authorization_data[1]));
190 ktest_destroy_authdata(&(tkt.enc_part2->authorization_data[0]));
192 /* ISODE version fails on the empty caddrs field */
193 ktest_destroy_addresses(&(tkt.enc_part2->caddrs));
194 ktest_destroy_authorization_data(&(tkt.enc_part2->authorization_data));
196 encode_run(*tkt.enc_part2, "enc_tkt_part", "(optionals NULL)",
197 encode_krb5_enc_tkt_part);
198 ktest_empty_ticket(&tkt);
201 /****************************************************************/
202 /* encode_krb5_enc_kdc_rep_part */
206 memset(&kdcr, 0, sizeof(kdcr));
208 kdcr.enc_part2 = ealloc(sizeof(krb5_enc_kdc_rep_part));
209 ktest_make_sample_enc_kdc_rep_part(kdcr.enc_part2);
211 encode_run(*kdcr.enc_part2, "enc_kdc_rep_part", "",
212 encode_krb5_enc_kdc_rep_part);
214 kdcr.enc_part2->key_exp = 0;
215 kdcr.enc_part2->times.starttime = 0;
216 kdcr.enc_part2->flags &= ~TKT_FLG_RENEWABLE;
217 ktest_destroy_addresses(&(kdcr.enc_part2->caddrs));
219 encode_run(*kdcr.enc_part2, "enc_kdc_rep_part", "(optionals NULL)",
220 encode_krb5_enc_kdc_rep_part);
222 ktest_empty_kdc_rep(&kdcr);
225 /****************************************************************/
226 /* encode_krb5_as_rep */
229 ktest_make_sample_kdc_rep(&kdcr);
231 /* kdcr.msg_type = KRB5_TGS_REP;
232 test(encode_krb5_as_rep(&kdcr,&code) == KRB5_BADMSGTYPE,
233 "encode_krb5_as_rep type check\n");
234 ktest_destroy_data(&code);*/
236 kdcr.msg_type = KRB5_AS_REP;
237 encode_run(kdcr, "as_rep", "", encode_krb5_as_rep);
239 ktest_destroy_pa_data_array(&(kdcr.padata));
240 encode_run(kdcr, "as_rep", "(optionals NULL)", encode_krb5_as_rep);
242 ktest_empty_kdc_rep(&kdcr);
246 /****************************************************************/
247 /* encode_krb5_tgs_rep */
250 ktest_make_sample_kdc_rep(&kdcr);
252 /* kdcr.msg_type = KRB5_AS_REP;
253 test(encode_krb5_tgs_rep(&kdcr,&code) == KRB5_BADMSGTYPE,
254 "encode_krb5_tgs_rep type check\n");*/
256 kdcr.msg_type = KRB5_TGS_REP;
257 encode_run(kdcr, "tgs_rep", "", encode_krb5_tgs_rep);
259 ktest_destroy_pa_data_array(&(kdcr.padata));
260 encode_run(kdcr, "tgs_rep", "(optionals NULL)", encode_krb5_tgs_rep);
262 ktest_empty_kdc_rep(&kdcr);
266 /****************************************************************/
267 /* encode_krb5_ap_req */
270 ktest_make_sample_ap_req(&apreq);
271 encode_run(apreq, "ap_req", "", encode_krb5_ap_req);
272 ktest_empty_ap_req(&apreq);
275 /****************************************************************/
276 /* encode_krb5_ap_rep */
279 ktest_make_sample_ap_rep(&aprep);
280 encode_run(aprep, "ap_rep", "", encode_krb5_ap_rep);
281 ktest_empty_ap_rep(&aprep);
284 /****************************************************************/
285 /* encode_krb5_ap_rep_enc_part */
287 krb5_ap_rep_enc_part apenc;
288 ktest_make_sample_ap_rep_enc_part(&apenc);
289 encode_run(apenc, "ap_rep_enc_part", "", encode_krb5_ap_rep_enc_part);
291 ktest_destroy_keyblock(&(apenc.subkey));
292 apenc.seq_number = 0;
293 encode_run(apenc, "ap_rep_enc_part", "(optionals NULL)",
294 encode_krb5_ap_rep_enc_part);
295 ktest_empty_ap_rep_enc_part(&apenc);
298 /****************************************************************/
299 /* encode_krb5_as_req */
302 ktest_make_sample_kdc_req(&asreq);
303 asreq.msg_type = KRB5_AS_REQ;
304 asreq.kdc_options &= ~KDC_OPT_ENC_TKT_IN_SKEY;
305 encode_run(asreq, "as_req", "", encode_krb5_as_req);
307 ktest_destroy_pa_data_array(&(asreq.padata));
308 ktest_destroy_principal(&(asreq.client));
310 ktest_destroy_principal(&(asreq.server));
312 asreq.kdc_options |= KDC_OPT_ENC_TKT_IN_SKEY;
315 ktest_destroy_addresses(&(asreq.addresses));
316 ktest_destroy_enc_data(&(asreq.authorization_data));
317 encode_run(asreq, "as_req", "(optionals NULL except second_ticket)",
319 ktest_destroy_sequence_of_ticket(&(asreq.second_ticket));
321 ktest_make_sample_principal(&(asreq.server));
323 asreq.kdc_options &= ~KDC_OPT_ENC_TKT_IN_SKEY;
324 encode_run(asreq, "as_req", "(optionals NULL except server)",
326 ktest_empty_kdc_req(&asreq);
329 /****************************************************************/
330 /* encode_krb5_tgs_req */
333 ktest_make_sample_kdc_req(&tgsreq);
334 tgsreq.msg_type = KRB5_TGS_REQ;
335 tgsreq.kdc_options &= ~KDC_OPT_ENC_TKT_IN_SKEY;
336 encode_run(tgsreq, "tgs_req", "", encode_krb5_tgs_req);
338 ktest_destroy_pa_data_array(&(tgsreq.padata));
339 ktest_destroy_principal(&(tgsreq.client));
341 ktest_destroy_principal(&(tgsreq.server));
343 tgsreq.kdc_options |= KDC_OPT_ENC_TKT_IN_SKEY;
346 ktest_destroy_addresses(&(tgsreq.addresses));
347 ktest_destroy_enc_data(&(tgsreq.authorization_data));
348 encode_run(tgsreq, "tgs_req", "(optionals NULL except second_ticket)",
349 encode_krb5_tgs_req);
351 ktest_destroy_sequence_of_ticket(&(tgsreq.second_ticket));
353 ktest_make_sample_principal(&(tgsreq.server));
355 tgsreq.kdc_options &= ~KDC_OPT_ENC_TKT_IN_SKEY;
356 encode_run(tgsreq, "tgs_req", "(optionals NULL except server)",
357 encode_krb5_tgs_req);
359 ktest_empty_kdc_req(&tgsreq);
362 /****************************************************************/
363 /* encode_krb5_kdc_req_body */
366 memset(&kdcrb, 0, sizeof(kdcrb));
367 ktest_make_sample_kdc_req_body(&kdcrb);
368 kdcrb.kdc_options &= ~KDC_OPT_ENC_TKT_IN_SKEY;
369 current_appl_type = 1007; /* Force interpretation as kdc-req-body */
370 encode_run(kdcrb, "kdc_req_body", "", encode_krb5_kdc_req_body);
372 ktest_destroy_principal(&(kdcrb.client));
374 ktest_destroy_principal(&(kdcrb.server));
376 kdcrb.kdc_options |= KDC_OPT_ENC_TKT_IN_SKEY;
379 ktest_destroy_addresses(&(kdcrb.addresses));
380 ktest_destroy_enc_data(&(kdcrb.authorization_data));
381 current_appl_type = 1007; /* Force interpretation as kdc-req-body */
382 encode_run(kdcrb, "kdc_req_body",
383 "(optionals NULL except second_ticket)",
384 encode_krb5_kdc_req_body);
386 ktest_destroy_sequence_of_ticket(&(kdcrb.second_ticket));
388 ktest_make_sample_principal(&(kdcrb.server));
390 kdcrb.kdc_options &= ~KDC_OPT_ENC_TKT_IN_SKEY;
391 current_appl_type = 1007; /* Force interpretation as kdc-req-body */
392 encode_run(kdcrb, "kdc_req_body", "(optionals NULL except server)",
393 encode_krb5_kdc_req_body);
395 ktest_empty_kdc_req(&kdcrb);
398 /****************************************************************/
399 /* encode_krb5_safe */
402 ktest_make_sample_safe(&s);
403 encode_run(s, "safe", "", encode_krb5_safe);
406 /* s.usec should be opted out by the timestamp */
408 ktest_destroy_address(&(s.r_address));
409 encode_run(s, "safe", "(optionals NULL)", encode_krb5_safe);
411 ktest_empty_safe(&s);
414 /****************************************************************/
415 /* encode_krb5_priv */
418 ktest_make_sample_priv(&p);
419 encode_run(p, "priv", "", encode_krb5_priv);
420 ktest_empty_priv(&p);
423 /****************************************************************/
424 /* encode_krb5_enc_priv_part */
426 krb5_priv_enc_part ep;
427 ktest_make_sample_priv_enc_part(&ep);
428 encode_run(ep, "enc_priv_part", "", encode_krb5_enc_priv_part);
431 /* ep.usec should be opted out along with timestamp */
433 ktest_destroy_address(&(ep.r_address));
434 encode_run(ep, "enc_priv_part", "(optionals NULL)",
435 encode_krb5_enc_priv_part);
437 ktest_empty_priv_enc_part(&ep);
440 /****************************************************************/
441 /* encode_krb5_cred */
444 ktest_make_sample_cred(&c);
445 encode_run(c, "cred", "", encode_krb5_cred);
446 ktest_empty_cred(&c);
449 /****************************************************************/
450 /* encode_krb5_enc_cred_part */
452 krb5_cred_enc_part cep;
453 ktest_make_sample_cred_enc_part(&cep);
454 encode_run(cep, "enc_cred_part", "", encode_krb5_enc_cred_part);
456 ktest_destroy_principal(&(cep.ticket_info[0]->client));
457 ktest_destroy_principal(&(cep.ticket_info[0]->server));
458 cep.ticket_info[0]->flags = 0;
459 cep.ticket_info[0]->times.authtime = 0;
460 cep.ticket_info[0]->times.starttime = 0;
461 cep.ticket_info[0]->times.endtime = 0;
462 cep.ticket_info[0]->times.renew_till = 0;
463 ktest_destroy_addresses(&(cep.ticket_info[0]->caddrs));
466 ktest_destroy_address(&(cep.s_address));
467 ktest_destroy_address(&(cep.r_address));
468 encode_run(cep, "enc_cred_part", "(optionals NULL)",
469 encode_krb5_enc_cred_part);
471 ktest_empty_cred_enc_part(&cep);
474 /****************************************************************/
475 /* encode_krb5_error */
478 ktest_make_sample_error(&kerr);
479 encode_run(kerr, "error", "", encode_krb5_error);
482 ktest_destroy_principal(&(kerr.client));
483 ktest_empty_data(&(kerr.text));
484 ktest_empty_data(&(kerr.e_data));
485 encode_run(kerr, "error", "(optionals NULL)", encode_krb5_error);
487 ktest_empty_error(&kerr);
490 /****************************************************************/
491 /* encode_krb5_authdata */
494 ktest_make_sample_authorization_data(&ad);
496 retval = encode_krb5_authdata(ad,&(code));
498 com_err("encoding authorization_data",retval,"");
501 current_appl_type = 1004; /* Force type to be authdata */
502 encoder_print_results(code, "authorization_data", "");
504 ktest_destroy_authorization_data(&ad);
507 /****************************************************************/
508 /* encode_padata_sequence and encode_krb5_typed_data */
512 ktest_make_sample_pa_data_array(&pa);
513 encode_run(*pa, "padata_sequence", "", encode_krb5_padata_sequence);
514 encode_run(*pa, "typed_data", "", encode_krb5_typed_data);
515 ktest_destroy_pa_data_array(&pa);
517 ktest_make_sample_empty_pa_data_array(&pa);
518 encode_run(*pa, "padata_sequence", "(empty)",
519 encode_krb5_padata_sequence);
520 ktest_destroy_pa_data_array(&pa);
523 /****************************************************************/
524 /* encode_etype_info */
526 krb5_etype_info_entry **info;
528 ktest_make_sample_etype_info(&info);
529 encode_run(*info, "etype_info", "", encode_krb5_etype_info);
531 ktest_destroy_etype_info_entry(info[2]); info[2] = 0;
532 ktest_destroy_etype_info_entry(info[1]); info[1] = 0;
533 encode_run(*info, "etype_info", "(only 1)", encode_krb5_etype_info);
535 ktest_destroy_etype_info_entry(info[0]); info[0] = 0;
536 encode_run(*info, "etype_info", "(no info)", encode_krb5_etype_info);
538 ktest_destroy_etype_info(info);
541 /* encode_etype_info2 */
543 krb5_etype_info_entry **info;
545 ktest_make_sample_etype_info2(&info);
546 encode_run(*info, "etype_info2", "", encode_krb5_etype_info2);
548 ktest_destroy_etype_info_entry(info[2]); info[2] = 0;
549 ktest_destroy_etype_info_entry(info[1]); info[1] = 0;
550 encode_run(*info, "etype_info2", "(only 1)", encode_krb5_etype_info2);
552 /* etype_info2 sequences aren't allowed to be empty. */
554 ktest_destroy_etype_info(info);
557 /****************************************************************/
558 /* encode_pa_enc_ts */
560 krb5_pa_enc_ts pa_enc;
561 ktest_make_sample_pa_enc_ts(&pa_enc);
562 encode_run(pa_enc, "pa_enc_ts", "", encode_krb5_pa_enc_ts);
564 encode_run(pa_enc, "pa_enc_ts (no usec)", "", encode_krb5_pa_enc_ts);
567 /****************************************************************/
568 /* encode_enc_data */
570 krb5_enc_data enc_data;
571 ktest_make_sample_enc_data(&enc_data);
572 current_appl_type = 1001;
573 encode_run(enc_data, "enc_data", "", encode_krb5_enc_data);
574 enc_data.kvno = 0xFF000000;
575 current_appl_type = 1001;
576 encode_run(enc_data, "enc_data", "(MSB-set kvno)",
577 encode_krb5_enc_data);
578 enc_data.kvno = 0xFFFFFFFF;
579 current_appl_type = 1001;
580 encode_run(enc_data, "enc_data", "(kvno=-1)", encode_krb5_enc_data);
581 ktest_destroy_enc_data(&enc_data);
583 /****************************************************************/
584 /* encode_krb5_sam_challenge_2 */
586 krb5_sam_challenge_2 sam_ch2;
587 ktest_make_sample_sam_challenge_2(&sam_ch2);
588 encode_run(sam_ch2, "sam_challenge_2", "",
589 encode_krb5_sam_challenge_2);
590 ktest_empty_sam_challenge_2(&sam_ch2);
592 /****************************************************************/
593 /* encode_krb5_sam_challenge_2_body */
595 krb5_sam_challenge_2_body body;
596 ktest_make_sample_sam_challenge_2_body(&body);
597 encode_run(body, "sam_challenge_2_body", "",
598 encode_krb5_sam_challenge_2_body);
599 ktest_empty_sam_challenge_2_body(&body);
601 /****************************************************************/
602 /* encode_krb5_sam_response_2 */
604 krb5_sam_response_2 sam_ch2;
605 ktest_make_sample_sam_response_2(&sam_ch2);
606 encode_run(sam_ch2, "sam_response_2", "", encode_krb5_sam_response_2);
607 ktest_empty_sam_response_2(&sam_ch2);
609 /****************************************************************/
610 /* encode_krb5_sam_response_enc_2 */
612 krb5_enc_sam_response_enc_2 sam_ch2;
613 ktest_make_sample_enc_sam_response_enc_2(&sam_ch2);
614 encode_run(sam_ch2, "enc_sam_response_enc_2", "",
615 encode_krb5_enc_sam_response_enc_2);
616 ktest_empty_enc_sam_response_enc_2(&sam_ch2);
618 /****************************************************************/
619 /* encode_krb5_pa_for_user */
621 krb5_pa_for_user s4u;
622 ktest_make_sample_pa_for_user(&s4u);
623 encode_run(s4u, "pa_for_user", "", encode_krb5_pa_for_user);
624 ktest_empty_pa_for_user(&s4u);
626 /****************************************************************/
627 /* encode_krb5_pa_s4u_x509_user */
629 krb5_pa_s4u_x509_user s4u;
630 ktest_make_sample_pa_s4u_x509_user(&s4u);
631 encode_run(s4u, "pa_s4u_x509_user", "", encode_krb5_pa_s4u_x509_user);
632 ktest_empty_pa_s4u_x509_user(&s4u);
634 /****************************************************************/
635 /* encode_krb5_ad_kdcissued */
637 krb5_ad_kdcissued kdci;
638 ktest_make_sample_ad_kdcissued(&kdci);
639 encode_run(kdci, "ad_kdcissued", "", encode_krb5_ad_kdcissued);
640 ktest_empty_ad_kdcissued(&kdci);
642 /****************************************************************/
643 /* encode_krb5_ad_signedpath_data */
645 krb5_ad_signedpath_data spd;
646 ktest_make_sample_ad_signedpath_data(&spd);
647 encode_run(spd, "ad_signedpath_data", "",
648 encode_krb5_ad_signedpath_data);
649 ktest_empty_ad_signedpath_data(&spd);
651 /****************************************************************/
652 /* encode_krb5_ad_signedpath */
654 krb5_ad_signedpath sp;
655 ktest_make_sample_ad_signedpath(&sp);
656 encode_run(sp, "ad_signedpath", "", encode_krb5_ad_signedpath);
657 ktest_empty_ad_signedpath(&sp);
659 /****************************************************************/
660 /* encode_krb5_iakerb_header */
662 krb5_iakerb_header ih;
663 ktest_make_sample_iakerb_header(&ih);
664 encode_run(ih, "iakerb_header", "", encode_krb5_iakerb_header);
665 ktest_empty_iakerb_header(&ih);
667 /****************************************************************/
668 /* encode_krb5_iakerb_finished */
670 krb5_iakerb_finished ih;
671 ktest_make_sample_iakerb_finished(&ih);
672 encode_run(ih, "iakerb_finished", "", encode_krb5_iakerb_finished);
673 ktest_empty_iakerb_finished(&ih);
675 /****************************************************************/
676 /* encode_krb5_fast_response */
678 krb5_fast_response fr;
679 ktest_make_sample_fast_response(&fr);
680 encode_run(fr, "fast_response", "", encode_krb5_fast_response);
681 ktest_empty_fast_response(&fr);
683 /****************************************************************/
684 /* encode_krb5_pa_fx_fast_reply */
686 krb5_enc_data enc_data;
687 ktest_make_sample_enc_data(&enc_data);
688 encode_run(enc_data, "pa_fx_fast_reply", "",
689 encode_krb5_pa_fx_fast_reply);
690 ktest_destroy_enc_data(&enc_data);
692 /****************************************************************/
693 /* encode_krb5_otp_tokeninfo */
695 krb5_otp_tokeninfo ti;
696 ktest_make_minimal_otp_tokeninfo(&ti);
697 encode_run(ti, "otp_tokeninfo", "(optionals NULL)",
698 encode_krb5_otp_tokeninfo);
699 ktest_empty_otp_tokeninfo(&ti);
700 ktest_make_maximal_otp_tokeninfo(&ti);
701 encode_run(ti, "otp_tokeninfo", "", encode_krb5_otp_tokeninfo);
702 ktest_empty_otp_tokeninfo(&ti);
704 /****************************************************************/
705 /* encode_krb5_pa_otp_challenge */
707 krb5_pa_otp_challenge ch;
708 ktest_make_minimal_pa_otp_challenge(&ch);
709 encode_run(ch, "pa_otp_challenge", "(optionals NULL)",
710 encode_krb5_pa_otp_challenge);
711 ktest_empty_pa_otp_challenge(&ch);
712 ktest_make_maximal_pa_otp_challenge(&ch);
713 encode_run(ch, "pa_otp_challenge", "", encode_krb5_pa_otp_challenge);
714 ktest_empty_pa_otp_challenge(&ch);
716 /****************************************************************/
717 /* encode_krb5_pa_otp_req */
720 ktest_make_minimal_pa_otp_req(&req);
721 encode_run(req, "pa_otp_req", "(optionals NULL)",
722 encode_krb5_pa_otp_req);
723 ktest_empty_pa_otp_req(&req);
724 ktest_make_maximal_pa_otp_req(&req);
725 encode_run(req, "pa_otp_req", "", encode_krb5_pa_otp_req);
726 ktest_empty_pa_otp_req(&req);
728 /****************************************************************/
729 /* encode_krb5_pa_otp_enc_request */
732 ktest_make_sample_data(&d);
733 encode_run(d, "pa_otp_enc_req", "", encode_krb5_pa_otp_enc_req);
734 ktest_empty_data(&d);
736 /****************************************************************/
737 /* encode_krb5_kkdcp_message */
739 krb5_kkdcp_message info;
740 ktest_make_sample_kkdcp_message(&info);
741 encode_run(info, "kkdcp_message", "", encode_krb5_kkdcp_message);
742 ktest_empty_kkdcp_message(&info);
744 /* encode_krb5_cammac */
747 ktest_make_minimal_cammac(&req);
748 encode_run(req, "cammac", "(optionals NULL)", encode_krb5_cammac);
749 ktest_empty_cammac(&req);
750 ktest_make_maximal_cammac(&req);
751 encode_run(req, "cammac", "", encode_krb5_cammac);
752 ktest_empty_cammac(&req);
754 /****************************************************************/
755 /* encode_krb5_secure_cookie */
757 krb5_secure_cookie cookie;
758 ktest_make_sample_secure_cookie(&cookie);
759 encode_run(cookie, "secure_cookie", "", encode_krb5_secure_cookie);
760 ktest_empty_secure_cookie(&cookie);
762 /****************************************************************/
763 /* encode_krb5_spake_factor */
765 krb5_spake_factor factor;
766 ktest_make_minimal_spake_factor(&factor);
767 encode_run(factor, "spake_factor", "(optionals NULL)",
768 encode_krb5_spake_factor);
769 ktest_empty_spake_factor(&factor);
770 ktest_make_maximal_spake_factor(&factor);
771 encode_run(factor, "spake_factor", "", encode_krb5_spake_factor);
772 ktest_empty_spake_factor(&factor);
774 /****************************************************************/
775 /* encode_krb5_pa_spake */
777 krb5_pa_spake pa_spake;
778 ktest_make_support_pa_spake(&pa_spake);
779 encode_run(pa_spake, "pa_spake", "(support)", encode_krb5_pa_spake);
780 ktest_empty_pa_spake(&pa_spake);
781 ktest_make_challenge_pa_spake(&pa_spake);
782 encode_run(pa_spake, "pa_spake", "(challenge)", encode_krb5_pa_spake);
783 ktest_empty_pa_spake(&pa_spake);
784 ktest_make_response_pa_spake(&pa_spake);
785 encode_run(pa_spake, "pa_spake", "(response)", encode_krb5_pa_spake);
786 ktest_empty_pa_spake(&pa_spake);
787 ktest_make_encdata_pa_spake(&pa_spake);
788 encode_run(pa_spake, "pa_spake", "(encdata)", encode_krb5_pa_spake);
789 ktest_empty_pa_spake(&pa_spake);
791 #ifndef DISABLE_PKINIT
792 /****************************************************************/
793 /* encode_krb5_pa_pk_as_req */
795 krb5_pa_pk_as_req req;
796 ktest_make_sample_pa_pk_as_req(&req);
797 encode_run(req, "pa_pk_as_req", "", acc.encode_krb5_pa_pk_as_req);
798 ktest_empty_pa_pk_as_req(&req);
800 /****************************************************************/
801 /* encode_krb5_pa_pk_as_req_draft9 */
803 krb5_pa_pk_as_req_draft9 req;
804 ktest_make_sample_pa_pk_as_req_draft9(&req);
805 encode_run(req, "pa_pk_as_req_draft9", "",
806 acc.encode_krb5_pa_pk_as_req_draft9);
807 ktest_empty_pa_pk_as_req_draft9(&req);
809 /****************************************************************/
810 /* encode_krb5_pa_pk_as_rep */
812 krb5_pa_pk_as_rep rep;
813 ktest_make_sample_pa_pk_as_rep_dhInfo(&rep);
814 encode_run(rep, "pa_pk_as_rep", "(dhInfo)",
815 acc.encode_krb5_pa_pk_as_rep);
816 ktest_empty_pa_pk_as_rep(&rep);
817 ktest_make_sample_pa_pk_as_rep_encKeyPack(&rep);
818 encode_run(rep, "pa_pk_as_rep", "(encKeyPack)",
819 acc.encode_krb5_pa_pk_as_rep);
820 ktest_empty_pa_pk_as_rep(&rep);
822 /****************************************************************/
823 /* encode_krb5_pa_pk_as_rep_draft9 */
825 krb5_pa_pk_as_rep_draft9 rep;
826 ktest_make_sample_pa_pk_as_rep_draft9_dhSignedData(&rep);
827 encode_run(rep, "pa_pk_as_rep_draft9", "(dhSignedData)",
828 acc.encode_krb5_pa_pk_as_rep_draft9);
829 ktest_empty_pa_pk_as_rep_draft9(&rep);
830 ktest_make_sample_pa_pk_as_rep_draft9_encKeyPack(&rep);
831 encode_run(rep, "pa_pk_as_rep_draft9", "(encKeyPack)",
832 acc.encode_krb5_pa_pk_as_rep_draft9);
833 ktest_empty_pa_pk_as_rep_draft9(&rep);
835 /****************************************************************/
836 /* encode_krb5_auth_pack */
839 ktest_make_sample_auth_pack(&pack);
840 encode_run(pack, "auth_pack", "", acc.encode_krb5_auth_pack);
841 ktest_empty_auth_pack(&pack);
843 /****************************************************************/
844 /* encode_krb5_auth_pack_draft9_draft9 */
846 krb5_auth_pack_draft9 pack;
847 ktest_make_sample_auth_pack_draft9(&pack);
848 encode_run(pack, "auth_pack_draft9", "",
849 acc.encode_krb5_auth_pack_draft9);
850 ktest_empty_auth_pack_draft9(&pack);
852 /****************************************************************/
853 /* encode_krb5_kdc_dh_key_info */
855 krb5_kdc_dh_key_info ki;
856 ktest_make_sample_kdc_dh_key_info(&ki);
857 encode_run(ki, "kdc_dh_key_info", "", acc.encode_krb5_kdc_dh_key_info);
858 ktest_empty_kdc_dh_key_info(&ki);
860 /****************************************************************/
861 /* encode_krb5_reply_key_pack */
863 krb5_reply_key_pack pack;
864 ktest_make_sample_reply_key_pack(&pack);
865 encode_run(pack, "reply_key_pack", "", acc.encode_krb5_reply_key_pack);
866 ktest_empty_reply_key_pack(&pack);
868 /****************************************************************/
869 /* encode_krb5_reply_key_pack_draft9 */
871 krb5_reply_key_pack_draft9 pack;
872 ktest_make_sample_reply_key_pack_draft9(&pack);
873 encode_run(pack, "reply_key_pack_draft9", "",
874 acc.encode_krb5_reply_key_pack_draft9);
875 ktest_empty_reply_key_pack_draft9(&pack);
877 /****************************************************************/
878 /* encode_krb5_sp80056a_other_info */
880 krb5_sp80056a_other_info info;
881 ktest_make_sample_sp80056a_other_info(&info);
882 encode_run(info, "sp80056a_other_info", "",
883 encode_krb5_sp80056a_other_info);
884 ktest_empty_sp80056a_other_info(&info);
886 /****************************************************************/
887 /* encode_krb5_pkinit_supp_pub_info */
889 krb5_pkinit_supp_pub_info info;
890 ktest_make_sample_pkinit_supp_pub_info(&info);
891 encode_run(info, "pkinit_supp_pub_info", "",
892 encode_krb5_pkinit_supp_pub_info);
893 ktest_empty_pkinit_supp_pub_info(&info);
895 #endif /* not DISABLE_PKINIT */
898 ldap_seqof_key_data skd;
900 ktest_make_sample_ldap_seqof_key_data(&skd);
901 encode_run(skd, "ldap_seqof_key_data", "",
902 acc.asn1_ldap_encode_sequence_of_keys);
903 ktest_empty_ldap_seqof_key_data(test_context, &skd);
907 krb5_free_context(test_context);