165     krb5_context context;  in main()  local
170     ret = krb5_init_context(&context);  in main()
174     krb5_enctype_enable(context, ETYPE_DES_CBC_MD5);  in main()
176     ret = krb5_parse_name_flags(context, user,  in main()
179 	krb5_err(context, 1, ret, "krb5_parse_name");  in main()
181     ret = krb5_pac_parse(context, saved_pac, sizeof(saved_pac), &pac);  in main()
183 	krb5_err(context, 1, ret, "krb5_pac_parse");  in main()
185     ret = krb5_pac_verify(context, pac, authtime, p,  in main()
188 	krb5_err(context, 1, ret, "krb5_pac_verify");  in main()
190     ret = _krb5_pac_sign(context, pac, authtime, p,  in main()
193 	krb5_err(context, 1, ret, "_krb5_pac_sign");  in main()
195     krb5_pac_free(context, pac);  in main()
197     ret = krb5_pac_parse(context, data.data, data.length, &pac);  in main()
200 	krb5_err(context, 1, ret, "krb5_pac_parse 2");  in main()
202     ret = krb5_pac_verify(context, pac, authtime, p,  in main()
205 	krb5_err(context, 1, ret, "krb5_pac_verify 2");  in main()
213 	ret = krb5_pac_init(context, &pac2);  in main()
215 	    krb5_err(context, 1, ret, "krb5_pac_init");  in main()
218 	ret = krb5_pac_get_types(context, pac, &len, &list);  in main()
220 	    krb5_err(context, 1, ret, "krb5_pac_get_types");  in main()
227 	    ret = krb5_pac_get_buffer(context, pac, list[i], &data);  in main()
229 		krb5_err(context, 1, ret, "krb5_pac_get_buffer");  in main()
233 		    krb5_errx(context, 1, "type 1 have wrong length: %lu",  in main()
236 		krb5_errx(context, 1, "unknown type %lu",  in main()
239 	    ret = krb5_pac_add_buffer(context, pac2, list[i], &data);  in main()
241 		krb5_err(context, 1, ret, "krb5_pac_add_buffer");  in main()
246 	ret = _krb5_pac_sign(context, pac2, authtime, p,  in main()
249 	    krb5_err(context, 1, ret, "_krb5_pac_sign 4");  in main()
251 	krb5_pac_free(context, pac2);  in main()
253 	ret = krb5_pac_parse(context, data.data, data.length, &pac2);  in main()
256 	    krb5_err(context, 1, ret, "krb5_pac_parse 4");  in main()
258 	ret = krb5_pac_verify(context, pac2, authtime, p,  in main()
261 	    krb5_err(context, 1, ret, "krb5_pac_verify 4");  in main()
263 	krb5_pac_free(context, pac2);  in main()
266     krb5_pac_free(context, pac);  in main()
272     ret = krb5_parse_name_flags(context, user2,  in main()
275 	krb5_err(context, 1, ret, "krb5_parse_name");  in main()
277     ret = krb5_pac_parse(context, saved_pac2, sizeof(saved_pac2) -1, &pac);  in main()
279 	krb5_err(context, 1, ret, "krb5_pac_parse");  in main()
281     ret = krb5_pac_verify(context, pac, authtime2, p2,  in main()
284 	krb5_err(context, 1, ret, "krb5_pac_verify c1");  in main()
286     krb5_pac_free(context, pac);  in main()
287     krb5_free_principal(context, p2);  in main()
293     ret = krb5_pac_init(context, &pac);  in main()
295 	krb5_err(context, 1, ret, "krb5_pac_init");  in main()
296     krb5_pac_free(context, pac);  in main()
302     ret = krb5_pac_init(context, &pac);  in main()
304 	krb5_err(context, 1, ret, "krb5_pac_init");  in main()
309 	ret = krb5_pac_add_buffer(context, pac, 1, &cdata);  in main()
311 	    krb5_err(context, 1, ret, "krb5_pac_add_buffer");  in main()
314 	ret = krb5_pac_get_buffer(context, pac, 1, &data);  in main()
316 	    krb5_err(context, 1, ret, "krb5_pac_get_buffer");  in main()
318 	    krb5_errx(context, 1, "krb5_pac_get_buffer data not the same");  in main()
325 	ret = krb5_pac_add_buffer(context, pac, 2, &cdata);  in main()
327 	    krb5_err(context, 1, ret, "krb5_pac_add_buffer");  in main()
330 	ret = krb5_pac_get_buffer(context, pac, 1, &data);  in main()
332 	    krb5_err(context, 1, ret, "krb5_pac_get_buffer");  in main()
334 	    krb5_errx(context, 1, "krb5_pac_get_buffer data not the same");  in main()
337 	ret = krb5_pac_get_buffer(context, pac, 2, &data);  in main()
339 	    krb5_err(context, 1, ret, "krb5_pac_get_buffer");  in main()
341 	    krb5_errx(context, 1, "krb5_pac_get_buffer data not the same");  in main()
345     ret = _krb5_pac_sign(context, pac, authtime, p,  in main()
348 	krb5_err(context, 1, ret, "_krb5_pac_sign");  in main()
350     krb5_pac_free(context, pac);  in main()
352     ret = krb5_pac_parse(context, data.data, data.length, &pac);  in main()
355 	krb5_err(context, 1, ret, "krb5_pac_parse 3");  in main()
357     ret = krb5_pac_verify(context, pac, authtime, p,  in main()
360 	krb5_err(context, 1, ret, "krb5_pac_verify 3");  in main()
367 	ret = krb5_pac_get_types(context, pac, &len, &list);  in main()
369 	    krb5_err(context, 1, ret, "krb5_pac_get_types");  in main()
371 	    krb5_errx(context, 1, "list wrong length");  in main()
375     krb5_pac_free(context, pac);  in main()
377     krb5_free_principal(context, p);  in main()
378     krb5_free_context(context);  in main()