Blame 0018-update-allow-to-add-service-names.patch

461678c
From 54c3d176326f719ffefded17bb797bc9e6c7f3c0 Mon Sep 17 00:00:00 2001
461678c
From: Sumit Bose <sbose@redhat.com>
461678c
Date: Mon, 4 Jun 2018 10:49:33 +0200
461678c
Subject: [PATCH 18/23] update: allow to add service names
461678c
461678c
Related to https://bugzilla.redhat.com/show_bug.cgi?id=1547013
461678c
           https://bugzilla.redhat.com/show_bug.cgi?id=1545568
461678c
---
461678c
 library/adenroll.c  | 136 +++++++++++++++++++++++++++++++++-------------------
461678c
 library/adkrb5.c    | 113 +++++++++++++++++++++++++++++++++++++++++++
461678c
 library/adprivate.h |   6 +++
461678c
 3 files changed, 206 insertions(+), 49 deletions(-)
461678c
461678c
diff --git a/library/adenroll.c b/library/adenroll.c
461678c
index ee845ef..6fdc773 100644
461678c
--- a/library/adenroll.c
461678c
+++ b/library/adenroll.c
461678c
@@ -305,13 +305,37 @@ ensure_service_names (adcli_result res,
461678c
 }
461678c
 
461678c
 static adcli_result
461678c
-ensure_service_principals (adcli_result res,
461678c
-                           adcli_enroll *enroll)
461678c
+add_service_names_to_service_principals (adcli_enroll *enroll)
461678c
 {
461678c
 	char *name;
461678c
 	int length = 0;
461678c
 	int i;
461678c
 
461678c
+	if (enroll->service_principals != NULL) {
461678c
+		length = seq_count (enroll->service_principals);
461678c
+	}
461678c
+
461678c
+	for (i = 0; enroll->service_names[i] != NULL; i++) {
461678c
+		if (asprintf (&name, "%s/%s", enroll->service_names[i], enroll->computer_name) < 0)
461678c
+			return_unexpected_if_reached ();
461678c
+		enroll->service_principals = _adcli_strv_add (enroll->service_principals,
461678c
+			                                      name, &length);
461678c
+
461678c
+		if (enroll->host_fqdn) {
461678c
+			if (asprintf (&name, "%s/%s", enroll->service_names[i], enroll->host_fqdn) < 0)
461678c
+				return_unexpected_if_reached ();
461678c
+			enroll->service_principals = _adcli_strv_add (enroll->service_principals,
461678c
+				                                      name, &length);
461678c
+		}
461678c
+	}
461678c
+
461678c
+	return ADCLI_SUCCESS;
461678c
+}
461678c
+
461678c
+static adcli_result
461678c
+ensure_service_principals (adcli_result res,
461678c
+                           adcli_enroll *enroll)
461678c
+{
461678c
 	if (res != ADCLI_SUCCESS)
461678c
 		return res;
461678c
 
461678c
@@ -319,20 +343,7 @@ ensure_service_principals (adcli_result res,
461678c
 
461678c
 	if (!enroll->service_principals) {
461678c
 		assert (enroll->service_names != NULL);
461678c
-
461678c
-		for (i = 0; enroll->service_names[i] != NULL; i++) {
461678c
-			if (asprintf (&name, "%s/%s", enroll->service_names[i], enroll->computer_name) < 0)
461678c
-				return_unexpected_if_reached ();
461678c
-			enroll->service_principals = _adcli_strv_add (enroll->service_principals,
461678c
-			                                              name, &length);
461678c
-
461678c
-			if (enroll->host_fqdn) {
461678c
-				if (asprintf (&name, "%s/%s", enroll->service_names[i], enroll->host_fqdn) < 0)
461678c
-					return_unexpected_if_reached ();
461678c
-				enroll->service_principals = _adcli_strv_add (enroll->service_principals,
461678c
-				                                              name, &length);
461678c
-			}
461678c
-		}
461678c
+		return add_service_names_to_service_principals (enroll);
461678c
 	}
461678c
 
461678c
 	return ADCLI_SUCCESS;
461678c
@@ -356,6 +367,7 @@ ensure_keytab_principals (adcli_result res,
461678c
 	return_unexpected_if_fail (k5 != NULL);
461678c
 
461678c
 	enroll->keytab_principals = calloc (count + 3, sizeof (krb5_principal));
461678c
+	return_unexpected_if_fail (enroll->keytab_principals != NULL);
461678c
 	at = 0;
461678c
 
461678c
 	/* First add the principal for the computer account name */
461678c
@@ -1266,7 +1278,7 @@ update_computer_account (adcli_enroll *enroll)
461678c
 		}
461678c
 	}
461678c
 
461678c
-	if (res == ADCLI_SUCCESS && !enroll->user_princpal_generate) {
461678c
+	if (res == ADCLI_SUCCESS && enroll->user_principal != NULL && !enroll->user_princpal_generate) {
461678c
 		char *vals_userPrincipalName[] = { enroll->user_principal, NULL };
461678c
 		LDAPMod userPrincipalName = { LDAP_MOD_REPLACE, "userPrincipalName", { vals_userPrincipalName, }, };
461678c
 		LDAPMod *mods[] = { &userPrincipalName, NULL, };
461678c
@@ -1519,7 +1531,8 @@ add_principal_to_keytab (adcli_enroll *enroll,
461678c
                          krb5_context k5,
461678c
                          krb5_principal principal,
461678c
                          const char *principal_name,
461678c
-                         int *which_salt)
461678c
+                         int *which_salt,
461678c
+                         adcli_enroll_flags flags)
461678c
 {
461678c
 	match_principal_kvno closure;
461678c
 	krb5_data password;
461678c
@@ -1547,41 +1560,47 @@ add_principal_to_keytab (adcli_enroll *enroll,
461678c
 		             enroll->keytab_name);
461678c
 	}
461678c
 
461678c
-	password.data = enroll->computer_password;
461678c
-	password.length = strlen (enroll->computer_password);
461678c
-
461678c
 	enctypes = adcli_enroll_get_keytab_enctypes (enroll);
461678c
 
461678c
-	/*
461678c
-	 * So we need to discover which salt to use. As a side effect we are
461678c
-	 * also testing that our account works.
461678c
-	 */
461678c
+	if (flags & ADCLI_ENROLL_PASSWORD_VALID) {
461678c
+		code = _adcli_krb5_keytab_copy_entries (k5, enroll->keytab, principal,
461678c
+		                                        enroll->kvno, enctypes);
461678c
+	} else {
461678c
 
461678c
-	salts = build_principal_salts (enroll, k5, principal);
461678c
-	return_unexpected_if_fail (salts != NULL);
461678c
+		password.data = enroll->computer_password;
461678c
+		password.length = strlen (enroll->computer_password);
461678c
 
461678c
-	if (*which_salt < 0) {
461678c
-		code = _adcli_krb5_keytab_discover_salt (k5, principal, enroll->kvno, &password,
461678c
-		                                         enctypes, salts, which_salt);
461678c
-		if (code != 0) {
461678c
-			_adcli_warn ("Couldn't authenticate with keytab while discovering which salt to use: %s: %s",
461678c
-			             principal_name, krb5_get_error_message (k5, code));
461678c
-			*which_salt = DEFAULT_SALT;
461678c
-		} else {
461678c
-			assert (*which_salt >= 0);
461678c
-			_adcli_info ("Discovered which keytab salt to use");
461678c
+		/*
461678c
+		 * So we need to discover which salt to use. As a side effect we are
461678c
+		 * also testing that our account works.
461678c
+		 */
461678c
+
461678c
+		salts = build_principal_salts (enroll, k5, principal);
461678c
+		return_unexpected_if_fail (salts != NULL);
461678c
+
461678c
+		if (*which_salt < 0) {
461678c
+			code = _adcli_krb5_keytab_discover_salt (k5, principal, enroll->kvno, &password,
461678c
+			                                         enctypes, salts, which_salt);
461678c
+			if (code != 0) {
461678c
+				_adcli_warn ("Couldn't authenticate with keytab while discovering which salt to use: %s: %s",
461678c
+				             principal_name, krb5_get_error_message (k5, code));
461678c
+				*which_salt = DEFAULT_SALT;
461678c
+			} else {
461678c
+				assert (*which_salt >= 0);
461678c
+				_adcli_info ("Discovered which keytab salt to use");
461678c
+			}
461678c
 		}
461678c
-	}
461678c
 
461678c
-	code = _adcli_krb5_keytab_add_entries (k5, enroll->keytab, principal,
461678c
-	                                       enroll->kvno, &password, enctypes, &salts[*which_salt]);
461678c
+		code = _adcli_krb5_keytab_add_entries (k5, enroll->keytab, principal,
461678c
+		                                       enroll->kvno, &password, enctypes, &salts[*which_salt]);
461678c
 
461678c
-	free_principal_salts (k5, salts);
461678c
+		free_principal_salts (k5, salts);
461678c
 
461678c
-	if (code != 0) {
461678c
-		_adcli_err ("Couldn't add keytab entries: %s: %s",
461678c
-		            enroll->keytab_name, krb5_get_error_message (k5, code));
461678c
-		return ADCLI_ERR_FAIL;
461678c
+		if (code != 0) {
461678c
+			_adcli_err ("Couldn't add keytab entries: %s: %s",
461678c
+			            enroll->keytab_name, krb5_get_error_message (k5, code));
461678c
+			return ADCLI_ERR_FAIL;
461678c
+		}
461678c
 	}
461678c
 
461678c
 
461678c
@@ -1591,7 +1610,8 @@ add_principal_to_keytab (adcli_enroll *enroll,
461678c
 }
461678c
 
461678c
 static adcli_result
461678c
-update_keytab_for_principals (adcli_enroll *enroll)
461678c
+update_keytab_for_principals (adcli_enroll *enroll,
461678c
+                              adcli_enroll_flags flags)
461678c
 {
461678c
 	krb5_context k5;
461678c
 	adcli_result res;
461678c
@@ -1608,7 +1628,7 @@ update_keytab_for_principals (adcli_enroll *enroll)
461678c
 		if (krb5_unparse_name (k5, enroll->keytab_principals[i], &name) != 0)
461678c
 			name = "";
461678c
 		res = add_principal_to_keytab (enroll, k5, enroll->keytab_principals[i],
461678c
-		                               name, &which_salt);
461678c
+		                               name, &which_salt, flags);
461678c
 		krb5_free_unparsed_name (k5, name);
461678c
 
461678c
 		if (res != ADCLI_SUCCESS)
461678c
@@ -1807,6 +1827,20 @@ enroll_join_or_update_tasks (adcli_enroll *enroll,
461678c
 	/* We ignore failures of setting these fields */
461678c
 	update_and_calculate_enctypes (enroll);
461678c
 	update_computer_account (enroll);
461678c
+
461678c
+	/* service_names is only set from input on the command line, so no
461678c
+	 * additional check for explicit is needed here */
461678c
+	if (enroll->service_names != NULL) {
461678c
+		res = add_service_names_to_service_principals (enroll);
461678c
+		if (res != ADCLI_SUCCESS) {
461678c
+			return res;
461678c
+		}
461678c
+		res = ensure_keytab_principals (res, enroll);
461678c
+		if (res != ADCLI_SUCCESS) {
461678c
+			return res;
461678c
+		}
461678c
+	}
461678c
+
461678c
 	update_service_principals (enroll);
461678c
 
461678c
 	if ( (flags & ADCLI_ENROLL_ADD_SAMBA_DATA) && ! (flags & ADCLI_ENROLL_PASSWORD_VALID)) {
461678c
@@ -1826,7 +1860,7 @@ enroll_join_or_update_tasks (adcli_enroll *enroll,
461678c
 	 * that we use for salting.
461678c
 	 */
461678c
 
461678c
-	return update_keytab_for_principals (enroll);
461678c
+	return update_keytab_for_principals (enroll, flags);
461678c
 }
461678c
 
461678c
 adcli_result
461678c
@@ -1927,7 +1961,11 @@ adcli_enroll_update (adcli_enroll *enroll,
461678c
 
461678c
 	if (_adcli_check_nt_time_string_lifetime (value,
461678c
 	                adcli_enroll_get_computer_password_lifetime (enroll))) {
461678c
-		flags |= ADCLI_ENROLL_NO_KEYTAB;
461678c
+		/* Do not update keytab if neither new service principals have
461678c
+                 * to be added nor the user principal has to be changed. */
461678c
+		if (enroll->service_names == NULL && (enroll->user_principal == NULL || enroll->user_princpal_generate)) {
461678c
+			flags |= ADCLI_ENROLL_NO_KEYTAB;
461678c
+		}
461678c
 		flags |= ADCLI_ENROLL_PASSWORD_VALID;
461678c
 	}
461678c
 	free (value);
461678c
diff --git a/library/adkrb5.c b/library/adkrb5.c
461678c
index b0e903e..033c181 100644
461678c
--- a/library/adkrb5.c
461678c
+++ b/library/adkrb5.c
461678c
@@ -204,6 +204,119 @@ _adcli_krb5_open_keytab (krb5_context k5,
461678c
 	return ADCLI_SUCCESS;
461678c
 }
461678c
 
461678c
+typedef struct {
461678c
+	krb5_kvno kvno;
461678c
+	krb5_enctype enctype;
461678c
+	int matched;
461678c
+} match_enctype_kvno;
461678c
+
461678c
+static krb5_boolean
461678c
+match_enctype_and_kvno (krb5_context k5,
461678c
+                        krb5_keytab_entry *entry,
461678c
+                        void *data)
461678c
+{
461678c
+	krb5_boolean similar = FALSE;
461678c
+	match_enctype_kvno *closure = data;
461678c
+	krb5_error_code code;
461678c
+
461678c
+	assert (closure->enctype);
461678c
+
461678c
+	code = krb5_c_enctype_compare (k5, closure->enctype, entry->key.enctype,
461678c
+	                               &similar);
461678c
+
461678c
+	if (code == 0 && entry->vno == closure->kvno && similar) {
461678c
+		closure->matched = 1;
461678c
+		return 1;
461678c
+	}
461678c
+
461678c
+	return 0;
461678c
+}
461678c
+
461678c
+static krb5_error_code
461678c
+_adcli_krb5_get_keyblock (krb5_context k5,
461678c
+                          krb5_keytab keytab,
461678c
+                          krb5_keyblock *keyblock,
461678c
+                          krb5_boolean (* match_func) (krb5_context,
461678c
+                                                       krb5_keytab_entry *,
461678c
+                                                       void *),
461678c
+                          void *match_data)
461678c
+{
461678c
+	krb5_kt_cursor cursor;
461678c
+	krb5_keytab_entry entry;
461678c
+	krb5_error_code code;
461678c
+
461678c
+	code = krb5_kt_start_seq_get (k5, keytab, &cursor);
461678c
+	if (code == KRB5_KT_END || code == ENOENT)
461678c
+		return 0;
461678c
+	else if (code != 0)
461678c
+		return code;
461678c
+
461678c
+	for (;;) {
461678c
+		code = krb5_kt_next_entry (k5, keytab, &entry, &cursor);
461678c
+		if (code != 0)
461678c
+			break;
461678c
+
461678c
+		/* See if we should remove this entry */
461678c
+		if (!match_func (k5, &entry, match_data)) {
461678c
+			krb5_free_keytab_entry_contents (k5, &entry);
461678c
+			continue;
461678c
+		}
461678c
+
461678c
+		code = krb5_copy_keyblock_contents (k5, &entry.key, keyblock);
461678c
+		krb5_free_keytab_entry_contents (k5, &entry);
461678c
+		break;
461678c
+
461678c
+
461678c
+	}
461678c
+
461678c
+	if (code == KRB5_KT_END)
461678c
+		code = 0;
461678c
+
461678c
+	krb5_kt_end_seq_get (k5, keytab, &cursor);
461678c
+	return code;
461678c
+}
461678c
+
461678c
+krb5_error_code
461678c
+_adcli_krb5_keytab_copy_entries (krb5_context k5,
461678c
+                                 krb5_keytab keytab,
461678c
+                                 krb5_principal principal,
461678c
+                                 krb5_kvno kvno,
461678c
+                                 krb5_enctype *enctypes)
461678c
+{
461678c
+	krb5_keytab_entry entry;
461678c
+	krb5_error_code code;
461678c
+	int i;
461678c
+	match_enctype_kvno closure;
461678c
+
461678c
+	for (i = 0; enctypes[i] != 0; i++) {
461678c
+
461678c
+		closure.kvno = kvno;
461678c
+		closure.enctype = enctypes[i];
461678c
+		closure.matched = 0;
461678c
+
461678c
+		memset (&entry, 0, sizeof (entry));
461678c
+
461678c
+		code = _adcli_krb5_get_keyblock (k5, keytab, &entry.key,
461678c
+		                                 match_enctype_and_kvno, &closure);
461678c
+		if (code != 0) {
461678c
+			return code;
461678c
+		}
461678c
+
461678c
+
461678c
+		entry.principal = principal;
461678c
+		entry.vno = kvno;
461678c
+
461678c
+		code = krb5_kt_add_entry (k5, keytab, &entry);
461678c
+
461678c
+		entry.principal = NULL;
461678c
+		krb5_free_keytab_entry_contents (k5, &entry);
461678c
+
461678c
+		if (code != 0)
461678c
+			return code;
461678c
+	}
461678c
+
461678c
+	return 0;
461678c
+}
461678c
 
461678c
 krb5_error_code
461678c
 _adcli_krb5_keytab_add_entries (krb5_context k5,
461678c
diff --git a/library/adprivate.h b/library/adprivate.h
461678c
index 83a88f6..7485249 100644
461678c
--- a/library/adprivate.h
461678c
+++ b/library/adprivate.h
461678c
@@ -282,6 +282,12 @@ krb5_enctype *   _adcli_krb5_parse_enctypes       (const char *value);
461678c
 
461678c
 char *           _adcli_krb5_format_enctypes      (krb5_enctype *enctypes);
461678c
 
461678c
+krb5_error_code  _adcli_krb5_keytab_copy_entries  (krb5_context k5,
461678c
+                                                   krb5_keytab keytab,
461678c
+                                                   krb5_principal principal,
461678c
+                                                   krb5_kvno kvno,
461678c
+                                                   krb5_enctype *enctypes);
461678c
+
461678c
 struct _adcli_attrs {
461678c
 	LDAPMod **mods;
461678c
 	int len;
461678c
-- 
461678c
2.14.4
461678c