--- /dev/null
+/*
+ * $Source$
+ * $Author$
+ *
+ * Copyright 1991 by the Massachusetts Institute of Technology.
+ * All Rights Reserved.
+ *
+ * For copying and distribution information, please see the file
+ * <krb5/copyright.h>.
+ *
+ */
+
+#if !defined(lint) && !defined(SABER)
+static char rcsid_pp_c[] =
+"$Id$";
+#endif /* !lint & !SABER */
+#include <krb5/krb5.h>
+
+void
+print_principal(p)
+ krb5_principal p;
+{
+ char *buf;
+ krb5_error_code retval;
+
+ if (retval = krb5_unparse_name(p, &buf)) {
+ com_err("DEBUG: Print_principal", retval,
+ "while unparsing name");
+ exit(1);
+ }
+ printf("%s\n", buf);
+ free(buf);
+}
--- /dev/null
+/*
+ * $Source$
+ * $Author$
+ *
+ * Copyright 1991 by the Massachusetts Institute of Technology.
+ * All Rights Reserved.
+ *
+ * For copying and distribution information, please see the file
+ * <krb5/copyright.h>.
+ *
+ */
+
+#if !defined(lint) && !defined(SABER)
+static char rcsid_pkey_c [] =
+"$Id$";
+#endif /* !lint & !SABER */
+#include <stdio.h>
+
+void pkey(k)
+ unsigned char *k;
+{
+ int i;
+ unsigned int foo;
+
+ for (i = 0 ; i < 8 ; i++) {
+ foo = *k++;
+ fprintf(stderr, "%x ", foo);
+ }
+}