From d0578774307c15d577b4821b825e86acb388b79b Mon Sep 17 00:00:00 2001
From: John Kohl <jtkohl@mit.edu>
Date: Tue, 25 Sep 1990 10:10:56 +0000
Subject: [PATCH] use krb5_init_ets() clean up use of argv[0] vs. progname add
 registration of krb5_ktf_writable_ops

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@1144 dc483132-0cff-0310-8789-dd5450dbe970
---
 src/admin/edit/kdb5_edit.c | 22 ++++++++++++++--------
 1 file changed, 14 insertions(+), 8 deletions(-)

diff --git a/src/admin/edit/kdb5_edit.c b/src/admin/edit/kdb5_edit.c
index e862508c2..fe913a654 100644
--- a/src/admin/edit/kdb5_edit.c
+++ b/src/admin/edit/kdb5_edit.c
@@ -109,10 +109,9 @@ char *argv[];
     krb5_enctype etype = -1;
     register krb5_cryptosystem_entry *csentry;
     int sci_idx;
+    extern krb5_kt_ops krb5_ktf_writable_ops;
 
-    initialize_krb5_error_table();
-    initialize_kdb5_error_table();
-    initialize_isod_error_table();
+    krb5_init_ets();
 
     if (rindex(argv[0], '/'))
 	argv[0] = rindex(argv[0], '/')+1;
@@ -142,16 +141,23 @@ char *argv[];
 	    break;
 	case '?':
 	default:
-	    usage(argv[0], 1);
+	    usage(progname, 1);
 	    /*NOTREACHED*/
 	}
     }
 
+
+    if (retval = krb5_kt_register(&krb5_ktf_writable_ops)) {
+	com_err(progname, retval,
+		"while registering writable key table functions");
+	exit(1);
+    }
+
     if (!keytypedone)
 	master_keyblock.keytype = KEYTYPE_DES;
 
     if (!valid_keytype(master_keyblock.keytype)) {
-	com_err(argv[0], KRB5_PROG_KEYTYPE_NOSUPP,
+	com_err(progname, KRB5_PROG_KEYTYPE_NOSUPP,
 		"while setting up keytype %d", master_keyblock.keytype);
 	exit(1);
     }
@@ -160,7 +166,7 @@ char *argv[];
 	etype = krb5_keytype_array[master_keyblock.keytype]->system->proto_enctype;
 
     if (!valid_etype(etype)) {
-	com_err(argv[0], KRB5_PROG_ETYPE_NOSUPP,
+	com_err(progname, KRB5_PROG_ETYPE_NOSUPP,
 		"while setting up etype %d", etype);
 	exit(1);
     }
@@ -179,12 +185,12 @@ char *argv[];
 
     if (!cur_realm) {
 	if (retval = krb5_get_default_realm(sizeof(defrealm), defrealm)) {
-	    com_err(argv[0], retval, "while retrieving default realm name");
+	    com_err(progname, retval, "while retrieving default realm name");
 	    exit(1);
 	}	    
 	cur_realm = defrealm;
     }
-    if (retval = set_dbname_help(argv[0], dbname))
+    if (retval = set_dbname_help(progname, dbname))
 	exit(retval);
 
     ss_listen(sci_idx, &retval);
-- 
2.26.2